aboutsummaryrefslogtreecommitdiff
path: root/lstate.c
diff options
context:
space:
mode:
Diffstat (limited to 'lstate.c')
-rw-r--r--lstate.c10
1 files changed, 5 insertions, 5 deletions
diff --git a/lstate.c b/lstate.c
index 15b771ee..d5984794 100644
--- a/lstate.c
+++ b/lstate.c
@@ -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);