Go to the documentation of this file.
28 #define lua_lock(L) ((void) 0)
32 #define lua_unlock(L) ((void) 0)
36 #ifndef lua_userstateopen
37 #define lua_userstateopen(l)
46 #define defaultmeta(L) (&G(L)->_defaultmeta)
49 #define gt(L) (&L->_gt)
52 #define registry(L) (&G(L)->_registry)
59 #define BASIC_CI_SIZE 8
61 #define BASIC_STACK_SIZE (2*LUA_MINSTACK)
102 #define CI_HASFRAME (1<<1)
105 #define CI_CALLING (1<<2)
106 #define CI_SAVEDPC (1<<3)
107 #define CI_YIELD (1<<4)
110 #define ci_func(ci) (clvalue((ci)->base - 1))
178 #define G(L) (L->l_G)
197 #define gcotots(o) check_exp((o)->gch.tt == LUA_TSTRING, &((o)->ts))
198 #define gcotou(o) check_exp((o)->gch.tt == LUA_TUSERDATA, &((o)->u))
199 #define gcotocl(o) check_exp((o)->gch.tt == LUA_TFUNCTION, &((o)->cl))
200 #define gcotoh(o) check_exp((o)->gch.tt == LUA_TTABLE, &((o)->h))
201 #define gcotop(o) check_exp((o)->gch.tt == LUA_TPROTO, &((o)->p))
202 #define gcotouv(o) check_exp((o)->gch.tt == LUA_TUPVAL, &((o)->uv))
203 #define ngcotouv(o) \
204 check_exp((o) == NULL || (o)->gch.tt == LUA_TUPVAL, &((o)->uv))
205 #define gcototh(o) check_exp((o)->gch.tt == LUA_TTHREAD, &((o)->th))
208 #define valtogco(v) (cast(GCObject *, (v)))