31 #if !defined(LUAI_GCPAUSE) 32 #define LUAI_GCPAUSE 200 35 #if !defined(LUAI_GCMUL) 36 #define LUAI_GCMUL 200 44 #if !defined(luai_makeseed) 46 #define luai_makeseed() cast(unsigned int, time(NULL)) 70 #define fromstate(L) (cast(LX *, cast(lu_byte *, (L)) - offsetof(LX, l))) 77 #define addbuff(b,p,e) \ 78 { size_t t = cast(size_t, e); \ 79 memcpy(b + p, &t, sizeof(t)); p += sizeof(t); } 82 char buff[4 *
sizeof(size_t)];
126 while ((ci = next) != NULL) {
141 while (ci->
next != NULL && (next2 = ci->
next->
next) != NULL) {
172 if (L->
stack == NULL)
300 if (l == NULL)
return NULL;
342 L =
G(L)->mainthread;
unsigned short callstatus
void luaE_setdebt(global_State *g, l_mem debt)
void luaE_freethread(lua_State *L, lua_State *L1)
static unsigned int makeseed(lua_State *L)
#define luai_userstateclose(L)
#define luai_userstatefree(L, L1)
void luaF_close(lua_State *L, StkId level)
#define luaM_newvector(L, n, t)
void luaE_shrinkCI(lua_State *L)
unsigned int luaS_hash(const char *str, size_t l, unsigned int seed)
#define luaM_freearray(L, b, n)
LUA_API const lua_Number * lua_version(lua_State *L)
void luaC_freeallobjects(lua_State *L)
void luaE_freeCI(lua_State *L)
static void stack_init(lua_State *L1, lua_State *L)
static void close_state(lua_State *L)
const lua_Number * version
static void f_luaopen(lua_State *L, void *ud)
#define LUA_RIDX_MAINTHREAD
#define sethvalue(L, obj, x)
struct lua_State * mainthread
#define luai_userstateopen(L)
void *(* lua_Alloc)(void *ud, void *ptr, size_t osize, size_t nsize)
lu_byte extra_[LUA_EXTRASPACE]
#define luaM_newobject(L, tag, s)
void luaT_init(lua_State *L)
LUA_API void lua_close(lua_State *L)
#define lua_getextraspace(L)
void luaX_init(lua_State *L)
struct Table * mt[LUA_NUMTAGS]
#define resethookcount(L)
static void init_registry(lua_State *L, global_State *g)
Table * luaH_new(lua_State *L)
void luaH_resize(lua_State *L, Table *t, unsigned int nasize, unsigned int nhsize)
static void freestack(lua_State *L)
LUA_API lua_State * lua_newstate(lua_Alloc f, void *ud)
int luaD_rawrunprotected(lua_State *L, Pfunc f, void *ud)
static void preinit_thread(lua_State *L, global_State *g)
struct CallInfo * previous
#define luai_userstatethread(L, L1)
#define setthvalue(L, obj, x)
LUA_API lua_State * lua_newthread(lua_State *L)
void luaH_setint(lua_State *L, Table *t, lua_Integer key, TValue *value)
struct lua_longjmp * errorJmp
void luaS_init(lua_State *L)
CallInfo * luaE_extendCI(lua_State *L)