RetroArch
Classes | Macros | Typedefs | Functions
lstate.h File Reference
#include "lua.h"
#include "lobject.h"
#include "ltm.h"
#include "lzio.h"
#include <signal.h>
Include dependency graph for lstate.h:
This graph shows which files directly or indirectly include this file:

Go to the source code of this file.

Classes

struct  stringtable
 
struct  CallInfo
 
struct  global_State
 
struct  lua_State
 
union  GCUnion
 

Macros

#define l_signalT   sig_atomic_t
 
#define EXTRA_STACK   5
 
#define BASIC_STACK_SIZE   (2*LUA_MINSTACK)
 
#define KGC_NORMAL   0
 
#define KGC_EMERGENCY   1 /* gc was forced by an allocation failure */
 
#define CIST_OAH   (1<<0) /* original value of 'allowhook' */
 
#define CIST_LUA   (1<<1) /* call is running a Lua function */
 
#define CIST_HOOKED   (1<<2) /* call is running a debug hook */
 
#define CIST_FRESH
 
#define CIST_YPCALL   (1<<4) /* call is a yieldable protected call */
 
#define CIST_TAIL   (1<<5) /* call was tail called */
 
#define CIST_HOOKYIELD   (1<<6) /* last hook called yielded */
 
#define CIST_LEQ   (1<<7) /* using __lt for __le */
 
#define CIST_FIN   (1<<8) /* call is running a finalizer */
 
#define isLua(ci)   ((ci)->callstatus & CIST_LUA)
 
#define setoah(st, v)   ((st) = ((st) & ~CIST_OAH) | (v))
 
#define getoah(st)   ((st) & CIST_OAH)
 
#define G(L)   (L->l_G)
 
#define cast_u(o)   cast(union GCUnion *, (o))
 
#define gco2ts(o)   check_exp(novariant((o)->tt) == LUA_TSTRING, &((cast_u(o))->ts))
 
#define gco2u(o)   check_exp((o)->tt == LUA_TUSERDATA, &((cast_u(o))->u))
 
#define gco2lcl(o)   check_exp((o)->tt == LUA_TLCL, &((cast_u(o))->cl.l))
 
#define gco2ccl(o)   check_exp((o)->tt == LUA_TCCL, &((cast_u(o))->cl.c))
 
#define gco2cl(o)   check_exp(novariant((o)->tt) == LUA_TFUNCTION, &((cast_u(o))->cl))
 
#define gco2t(o)   check_exp((o)->tt == LUA_TTABLE, &((cast_u(o))->h))
 
#define gco2p(o)   check_exp((o)->tt == LUA_TPROTO, &((cast_u(o))->p))
 
#define gco2th(o)   check_exp((o)->tt == LUA_TTHREAD, &((cast_u(o))->th))
 
#define obj2gco(v)   check_exp(novariant((v)->tt) < LUA_TDEADKEY, (&(cast_u(v)->gc)))
 
#define gettotalbytes(g)   cast(lu_mem, (g)->totalbytes + (g)->GCdebt)
 

Typedefs

typedef struct stringtable stringtable
 
typedef struct CallInfo CallInfo
 
typedef struct global_State global_State
 

Functions

LUAI_FUNC void luaE_setdebt (global_State *g, l_mem debt)
 
LUAI_FUNC void luaE_freethread (lua_State *L, lua_State *L1)
 
LUAI_FUNC CallInfoluaE_extendCI (lua_State *L)
 
LUAI_FUNC void luaE_freeCI (lua_State *L)
 
LUAI_FUNC void luaE_shrinkCI (lua_State *L)
 

Macro Definition Documentation

◆ BASIC_STACK_SIZE

#define BASIC_STACK_SIZE   (2*LUA_MINSTACK)

◆ cast_u

#define cast_u (   o)    cast(union GCUnion *, (o))

◆ CIST_FIN

#define CIST_FIN   (1<<8) /* call is running a finalizer */

◆ CIST_FRESH

#define CIST_FRESH
Value:
(1<<3) /* call is running on a fresh invocation
of luaV_execute */

◆ CIST_HOOKED

#define CIST_HOOKED   (1<<2) /* call is running a debug hook */

◆ CIST_HOOKYIELD

#define CIST_HOOKYIELD   (1<<6) /* last hook called yielded */

◆ CIST_LEQ

#define CIST_LEQ   (1<<7) /* using __lt for __le */

◆ CIST_LUA

#define CIST_LUA   (1<<1) /* call is running a Lua function */

◆ CIST_OAH

#define CIST_OAH   (1<<0) /* original value of 'allowhook' */

◆ CIST_TAIL

#define CIST_TAIL   (1<<5) /* call was tail called */

◆ CIST_YPCALL

#define CIST_YPCALL   (1<<4) /* call is a yieldable protected call */

◆ EXTRA_STACK

#define EXTRA_STACK   5

◆ G

#define G (   L)    (L->l_G)

◆ gco2ccl

#define gco2ccl (   o)    check_exp((o)->tt == LUA_TCCL, &((cast_u(o))->cl.c))

◆ gco2cl

#define gco2cl (   o)    check_exp(novariant((o)->tt) == LUA_TFUNCTION, &((cast_u(o))->cl))

◆ gco2lcl

#define gco2lcl (   o)    check_exp((o)->tt == LUA_TLCL, &((cast_u(o))->cl.l))

◆ gco2p

#define gco2p (   o)    check_exp((o)->tt == LUA_TPROTO, &((cast_u(o))->p))

◆ gco2t

#define gco2t (   o)    check_exp((o)->tt == LUA_TTABLE, &((cast_u(o))->h))

◆ gco2th

#define gco2th (   o)    check_exp((o)->tt == LUA_TTHREAD, &((cast_u(o))->th))

◆ gco2ts

#define gco2ts (   o)    check_exp(novariant((o)->tt) == LUA_TSTRING, &((cast_u(o))->ts))

◆ gco2u

#define gco2u (   o)    check_exp((o)->tt == LUA_TUSERDATA, &((cast_u(o))->u))

◆ getoah

#define getoah (   st)    ((st) & CIST_OAH)

◆ gettotalbytes

#define gettotalbytes (   g)    cast(lu_mem, (g)->totalbytes + (g)->GCdebt)

◆ isLua

#define isLua (   ci)    ((ci)->callstatus & CIST_LUA)

◆ KGC_EMERGENCY

#define KGC_EMERGENCY   1 /* gc was forced by an allocation failure */

◆ KGC_NORMAL

#define KGC_NORMAL   0

◆ l_signalT

#define l_signalT   sig_atomic_t

◆ obj2gco

#define obj2gco (   v)    check_exp(novariant((v)->tt) < LUA_TDEADKEY, (&(cast_u(v)->gc)))

◆ setoah

#define setoah (   st,
  v 
)    ((st) = ((st) & ~CIST_OAH) | (v))

Typedef Documentation

◆ CallInfo

typedef struct CallInfo CallInfo

◆ global_State

typedef struct global_State global_State

◆ stringtable

typedef struct stringtable stringtable

Function Documentation

◆ luaE_extendCI()

LUAI_FUNC CallInfo* luaE_extendCI ( lua_State L)
Here is the call graph for this function:

◆ luaE_freeCI()

LUAI_FUNC void luaE_freeCI ( lua_State L)
Here is the call graph for this function:
Here is the caller graph for this function:

◆ luaE_freethread()

LUAI_FUNC void luaE_freethread ( lua_State L,
lua_State L1 
)
Here is the call graph for this function:
Here is the caller graph for this function:

◆ luaE_setdebt()

LUAI_FUNC void luaE_setdebt ( global_State g,
l_mem  debt 
)
Here is the caller graph for this function:

◆ luaE_shrinkCI()

LUAI_FUNC void luaE_shrinkCI ( lua_State L)
Here is the call graph for this function:
Here is the caller graph for this function: