diff options
Diffstat (limited to 'lstate.c')
-rw-r--r-- | lstate.c | 10 |
1 files changed, 5 insertions, 5 deletions
@@ -69,10 +69,10 @@ static void f_luaopen (lua_State *L, void *ud) { | |||
69 | G(L)->tmudata = NULL; | 69 | G(L)->tmudata = NULL; |
70 | G(L)->nblocks = sizeof(lua_State) + sizeof(global_State); | 70 | G(L)->nblocks = sizeof(lua_State) + sizeof(global_State); |
71 | stack_init(L, L, so->stacksize); /* init stack */ | 71 | stack_init(L, L, so->stacksize); /* init stack */ |
72 | /* create default event table with a dummy table, and then close the loop */ | 72 | /* create default meta table with a dummy table, and then close the loop */ |
73 | sethvalue(defaultet(L), NULL); | 73 | sethvalue(defaultmeta(L), NULL); |
74 | sethvalue(defaultet(L), luaH_new(L, 0, 4)); | 74 | sethvalue(defaultmeta(L), luaH_new(L, 0, 4)); |
75 | hvalue(defaultet(L))->eventtable = hvalue(defaultet(L)); | 75 | hvalue(defaultmeta(L))->metatable = hvalue(defaultmeta(L)); |
76 | sethvalue(gt(L), luaH_new(L, 0, 4)); /* table of globals */ | 76 | sethvalue(gt(L), luaH_new(L, 0, 4)); /* table of globals */ |
77 | sethvalue(registry(L), luaH_new(L, 0, 0)); /* registry */ | 77 | sethvalue(registry(L), luaH_new(L, 0, 0)); /* registry */ |
78 | luaS_resize(L, 4); /* initial size of string table */ | 78 | luaS_resize(L, 4); /* initial size of string table */ |
@@ -107,7 +107,7 @@ LUA_API lua_State *lua_newthread (lua_State *OL, int stacksize) { | |||
107 | OL->next = L; | 107 | OL->next = L; |
108 | L->previous = OL; | 108 | L->previous = OL; |
109 | stack_init(L, OL, stacksize); /* init stack */ | 109 | stack_init(L, OL, stacksize); /* init stack */ |
110 | setobj(defaultet(L), defaultet(OL)); /* share default event table */ | 110 | setobj(defaultmeta(L), defaultmeta(OL)); /* share default meta table */ |
111 | setobj(gt(L), gt(OL)); /* share table of globals */ | 111 | setobj(gt(L), gt(OL)); /* share table of globals */ |
112 | setobj(registry(L), registry(OL)); /* share registry */ | 112 | setobj(registry(L), registry(OL)); /* share registry */ |
113 | lua_unlock(OL); | 113 | lua_unlock(OL); |