diff options
Diffstat (limited to 'lstate.c')
-rw-r--r-- | lstate.c | 4 |
1 files changed, 3 insertions, 1 deletions
@@ -1,5 +1,5 @@ | |||
1 | /* | 1 | /* |
2 | ** $Id: lstate.c,v 1.131 2003/12/03 12:30:41 roberto Exp roberto $ | 2 | ** $Id: lstate.c,v 1.132 2003/12/03 20:03:07 roberto Exp roberto $ |
3 | ** Global State | 3 | ** Global State |
4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
5 | */ | 5 | */ |
@@ -81,6 +81,7 @@ static void f_luaopen (lua_State *L, void *ud) { | |||
81 | u->uv.metatable = NULL; | 81 | u->uv.metatable = NULL; |
82 | G(L)->firstudata = valtogco(u); | 82 | G(L)->firstudata = valtogco(u); |
83 | luaC_link(L, valtogco(u), LUA_TUSERDATA); | 83 | luaC_link(L, valtogco(u), LUA_TUSERDATA); |
84 | setbit(u->uv.marked, FIXEDBIT); | ||
84 | stack_init(L, L); /* init stack */ | 85 | stack_init(L, L); /* init stack */ |
85 | sethvalue(gt(L), luaH_new(L, 0, 4)); /* table of globals */ | 86 | sethvalue(gt(L), luaH_new(L, 0, 4)); /* table of globals */ |
86 | sethvalue(registry(L), luaH_new(L, 4, 4)); /* registry */ | 87 | sethvalue(registry(L), luaH_new(L, 4, 4)); /* registry */ |
@@ -167,6 +168,7 @@ LUA_API lua_State *lua_newstate (lua_Alloc f, void *ud) { | |||
167 | g->panic = NULL; | 168 | g->panic = NULL; |
168 | g->gcstate = 0; | 169 | g->gcstate = 0; |
169 | g->rootgc = NULL; | 170 | g->rootgc = NULL; |
171 | g->sweepstrgc = 0; | ||
170 | g->currentwhite = bitmask(WHITE0BIT); | 172 | g->currentwhite = bitmask(WHITE0BIT); |
171 | g->firstudata = NULL; | 173 | g->firstudata = NULL; |
172 | g->gray = NULL; | 174 | g->gray = NULL; |