diff options
Diffstat (limited to 'lstate.c')
-rw-r--r-- | lstate.c | 6 |
1 files changed, 3 insertions, 3 deletions
@@ -1,5 +1,5 @@ | |||
1 | /* | 1 | /* |
2 | ** $Id: lstate.c,v 1.24 2000/01/13 16:30:47 roberto Exp roberto $ | 2 | ** $Id: lstate.c,v 1.25 2000/03/31 16:28:45 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 | */ |
@@ -18,6 +18,7 @@ | |||
18 | #include "lref.h" | 18 | #include "lref.h" |
19 | #include "lstate.h" | 19 | #include "lstate.h" |
20 | #include "lstring.h" | 20 | #include "lstring.h" |
21 | #include "ltable.h" | ||
21 | #include "ltm.h" | 22 | #include "ltm.h" |
22 | 23 | ||
23 | 24 | ||
@@ -35,7 +36,6 @@ static lua_State *newstate_aux (int stacksize, int put_builtin) { | |||
35 | L->numCblocks = 0; | 36 | L->numCblocks = 0; |
36 | L->rootproto = NULL; | 37 | L->rootproto = NULL; |
37 | L->rootcl = NULL; | 38 | L->rootcl = NULL; |
38 | L->rootglobal = NULL; | ||
39 | L->roottable = NULL; | 39 | L->roottable = NULL; |
40 | L->IMtable = NULL; | 40 | L->IMtable = NULL; |
41 | L->refArray = NULL; | 41 | L->refArray = NULL; |
@@ -47,6 +47,7 @@ static lua_State *newstate_aux (int stacksize, int put_builtin) { | |||
47 | L->callhook = NULL; | 47 | L->callhook = NULL; |
48 | L->linehook = NULL; | 48 | L->linehook = NULL; |
49 | L->allowhooks = 1; | 49 | L->allowhooks = 1; |
50 | L->gt = luaH_new(L, 10); | ||
50 | luaD_init(L, stacksize); | 51 | luaD_init(L, stacksize); |
51 | luaS_init(L); | 52 | luaS_init(L); |
52 | luaX_init(L); | 53 | luaX_init(L); |
@@ -87,7 +88,6 @@ void lua_close (lua_State *L) { | |||
87 | luaC_collect(L, 1); /* collect all elements */ | 88 | luaC_collect(L, 1); /* collect all elements */ |
88 | LUA_ASSERT(L, L->rootproto == NULL, "list should be empty"); | 89 | LUA_ASSERT(L, L->rootproto == NULL, "list should be empty"); |
89 | LUA_ASSERT(L, L->rootcl == NULL, "list should be empty"); | 90 | LUA_ASSERT(L, L->rootcl == NULL, "list should be empty"); |
90 | LUA_ASSERT(L, L->rootglobal == NULL, "list should be empty"); | ||
91 | LUA_ASSERT(L, L->roottable == NULL, "list should be empty"); | 91 | LUA_ASSERT(L, L->roottable == NULL, "list should be empty"); |
92 | luaS_freeall(L); | 92 | luaS_freeall(L); |
93 | luaM_free(L, L->stack); | 93 | luaM_free(L, L->stack); |