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