|
lua5.4
|
类 | |
| struct | stringtable |
| struct | CallInfo |
| struct | global_State |
| struct | lua_State |
| union | GCUnion |
宏定义 | |
| #define | yieldable(L) (((L)->nCcalls & 0xffff0000) == 0) |
| #define | getCcalls(L) ((L)->nCcalls & 0xffff) |
| #define | incnny(L) ((L)->nCcalls += 0x10000) |
| #define | decnny(L) ((L)->nCcalls -= 0x10000) |
| #define | nyci (0x10000 | 1) |
| #define | l_signalT sig_atomic_t |
| #define | EXTRA_STACK 5 |
| #define | BASIC_STACK_SIZE (2*LUA_MINSTACK) |
| #define | stacksize(th) cast_int((th)->stack_last - (th)->stack) |
| #define | KGC_INC 0 /* incremental gc */ |
| #define | KGC_GEN 1 /* generational gc */ |
| #define | CIST_OAH (1<<0) /* original value of 'allowhook' */ |
| #define | CIST_C (1<<1) /* call is running a C function */ |
| #define | CIST_FRESH (1<<2) /* call is on a fresh "luaV_execute" frame */ |
| #define | CIST_HOOKED (1<<3) /* call is running a debug hook */ |
| #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_FIN (1<<7) /* call is running a finalizer */ |
| #define | CIST_TRAN (1<<8) /* 'ci' has transfer information */ |
| #define | isLua(ci) (!((ci)->callstatus & CIST_C)) |
| #define | isLuacode(ci) (!((ci)->callstatus & (CIST_C | CIST_HOOKED))) |
| #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_VUSERDATA, &((cast_u(o))->u)) |
| #define | gco2lcl(o) check_exp((o)->tt == LUA_VLCL, &((cast_u(o))->cl.l)) |
| #define | gco2ccl(o) check_exp((o)->tt == LUA_VCCL, &((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_VTABLE, &((cast_u(o))->h)) |
| #define | gco2p(o) check_exp((o)->tt == LUA_VPROTO, &((cast_u(o))->p)) |
| #define | gco2th(o) check_exp((o)->tt == LUA_VTHREAD, &((cast_u(o))->th)) |
| #define | gco2upv(o) check_exp((o)->tt == LUA_VUPVAL, &((cast_u(o))->upv)) |
| #define | obj2gco(v) check_exp((v)->tt >= LUA_TSTRING, &(cast_u(v)->gc)) |
| #define | gettotalbytes(g) cast(lu_mem, (g)->totalbytes + (g)->GCdebt) |
类型定义 | |
| typedef struct stringtable | stringtable |
| typedef struct CallInfo | CallInfo |
| typedef struct global_State | global_State |
函数 | |
| LUAI_FUNC void | luaE_setdebt (global_State *g, l_mem debt) |
| LUAI_FUNC void | luaE_freethread (lua_State *L, lua_State *L1) |
| LUAI_FUNC CallInfo * | luaE_extendCI (lua_State *L) |
| LUAI_FUNC void | luaE_freeCI (lua_State *L) |
| LUAI_FUNC void | luaE_shrinkCI (lua_State *L) |
| LUAI_FUNC void | luaE_checkcstack (lua_State *L) |
| LUAI_FUNC void | luaE_incCstack (lua_State *L) |
| LUAI_FUNC void | luaE_warning (lua_State *L, const char *msg, int tocont) |
| LUAI_FUNC void | luaE_warnerror (lua_State *L, const char *where) |
| #define BASIC_STACK_SIZE (2*LUA_MINSTACK) |
| #define CIST_C (1<<1) /* call is running a C function */ |
| #define CIST_FIN (1<<7) /* call is running a finalizer */ |
| #define CIST_FRESH (1<<2) /* call is on a fresh "luaV_execute" frame */ |
| #define CIST_HOOKED (1<<3) /* call is running a debug hook */ |
| #define CIST_HOOKYIELD (1<<6) /* last hook called yielded */ |
| #define CIST_OAH (1<<0) /* original value of 'allowhook' */ |
| #define CIST_TAIL (1<<5) /* call was tail called */ |
| #define CIST_TRAN (1<<8) /* 'ci' has transfer information */ |
| #define CIST_YPCALL (1<<4) /* call is a yieldable protected call */ |
| #define decnny | ( | L | ) | ((L)->nCcalls -= 0x10000) |
| #define EXTRA_STACK 5 |
| #define G | ( | L | ) | (L->l_G) |
| #define gco2cl | ( | o | ) | check_exp(novariant((o)->tt) == LUA_TFUNCTION, &((cast_u(o))->cl)) |
| #define gco2p | ( | o | ) | check_exp((o)->tt == LUA_VPROTO, &((cast_u(o))->p)) |
| #define gco2t | ( | o | ) | check_exp((o)->tt == LUA_VTABLE, &((cast_u(o))->h)) |
| #define gco2th | ( | o | ) | check_exp((o)->tt == LUA_VTHREAD, &((cast_u(o))->th)) |
| #define gco2ts | ( | o | ) | check_exp(novariant((o)->tt) == LUA_TSTRING, &((cast_u(o))->ts)) |
| #define gco2u | ( | o | ) | check_exp((o)->tt == LUA_VUSERDATA, &((cast_u(o))->u)) |
| #define gco2upv | ( | o | ) | check_exp((o)->tt == LUA_VUPVAL, &((cast_u(o))->upv)) |
| #define getCcalls | ( | L | ) | ((L)->nCcalls & 0xffff) |
| #define getoah | ( | st | ) | ((st) & CIST_OAH) |
| #define incnny | ( | L | ) | ((L)->nCcalls += 0x10000) |
| #define isLua | ( | ci | ) | (!((ci)->callstatus & CIST_C)) |
| #define isLuacode | ( | ci | ) | (!((ci)->callstatus & (CIST_C | CIST_HOOKED))) |
| #define KGC_GEN 1 /* generational gc */ |
| #define KGC_INC 0 /* incremental gc */ |
| #define l_signalT sig_atomic_t |
| #define nyci (0x10000 | 1) |
| #define obj2gco | ( | v | ) | check_exp((v)->tt >= LUA_TSTRING, &(cast_u(v)->gc)) |
| #define setoah | ( | st, | |
| v | |||
| ) | ((st) = ((st) & ~CIST_OAH) | (v)) |
| #define stacksize | ( | th | ) | cast_int((th)->stack_last - (th)->stack) |
| #define yieldable | ( | L | ) | (((L)->nCcalls & 0xffff0000) == 0) |
| typedef struct global_State global_State |
| typedef struct stringtable stringtable |
| LUAI_FUNC void luaE_setdebt | ( | global_State * | g, |
| l_mem | debt | ||
| ) |
1.8.18