diff options
| author | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 1999-04-13 16:30:51 -0300 |
|---|---|---|
| committer | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 1999-04-13 16:30:51 -0300 |
| commit | cb7f027380b9eebcf7ce2c00c6e1c5450d53b47a (patch) | |
| tree | 066b9633bb085fa8b95c082e3bcf0cf50a90d207 | |
| parent | 0bbd96bd5f973f716a93a704e04cf1c78145795f (diff) | |
| download | lua-cb7f027380b9eebcf7ce2c00c6e1c5450d53b47a.tar.gz lua-cb7f027380b9eebcf7ce2c00c6e1c5450d53b47a.tar.bz2 lua-cb7f027380b9eebcf7ce2c00c6e1c5450d53b47a.zip | |
IMtable must be initialized (and IMtable_size is not needed any more) due
to new way to handle growing vectors (previous modification).
| -rw-r--r-- | lstate.c | 13 | ||||
| -rw-r--r-- | lstate.h | 3 |
2 files changed, 8 insertions, 8 deletions
| @@ -1,5 +1,5 @@ | |||
| 1 | /* | 1 | /* |
| 2 | ** $Id: lstate.c,v 1.8 1999/02/04 17:47:59 roberto Exp roberto $ | 2 | ** $Id: lstate.c,v 1.9 1999/02/25 15:17:01 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 | */ |
| @@ -24,11 +24,15 @@ void lua_open (void) | |||
| 24 | { | 24 | { |
| 25 | if (lua_state) return; | 25 | if (lua_state) return; |
| 26 | lua_state = luaM_new(lua_State); | 26 | lua_state = luaM_new(lua_State); |
| 27 | L->numCblocks = 0; | ||
| 28 | L->Cstack.base = 0; | 27 | L->Cstack.base = 0; |
| 29 | L->Cstack.lua2C = 0; | 28 | L->Cstack.lua2C = 0; |
| 30 | L->Cstack.num = 0; | 29 | L->Cstack.num = 0; |
| 31 | L->errorJmp = NULL; | 30 | L->errorJmp = NULL; |
| 31 | L->Mbuffer = NULL; | ||
| 32 | L->Mbuffbase = 0; | ||
| 33 | L->Mbuffsize = 0; | ||
| 34 | L->Mbuffnext = 0; | ||
| 35 | L->numCblocks = 0; | ||
| 32 | L->debug = 0; | 36 | L->debug = 0; |
| 33 | L->callhook = NULL; | 37 | L->callhook = NULL; |
| 34 | L->linehook = NULL; | 38 | L->linehook = NULL; |
| @@ -40,12 +44,9 @@ void lua_open (void) | |||
| 40 | L->rootglobal.marked = 0; | 44 | L->rootglobal.marked = 0; |
| 41 | L->roottable.next = NULL; | 45 | L->roottable.next = NULL; |
| 42 | L->roottable.marked = 0; | 46 | L->roottable.marked = 0; |
| 47 | L->IMtable = NULL; | ||
| 43 | L->refArray = NULL; | 48 | L->refArray = NULL; |
| 44 | L->refSize = 0; | 49 | L->refSize = 0; |
| 45 | L->Mbuffsize = 0; | ||
| 46 | L->Mbuffnext = 0; | ||
| 47 | L->Mbuffbase = 0; | ||
| 48 | L->Mbuffer = NULL; | ||
| 49 | L->GCthreshold = GARBAGE_BLOCK; | 50 | L->GCthreshold = GARBAGE_BLOCK; |
| 50 | L->nblocks = 0; | 51 | L->nblocks = 0; |
| 51 | luaD_init(); | 52 | luaD_init(); |
| @@ -1,5 +1,5 @@ | |||
| 1 | /* | 1 | /* |
| 2 | ** $Id: lstate.h,v 1.14 1999/02/04 17:47:59 roberto Exp roberto $ | 2 | ** $Id: lstate.h,v 1.15 1999/02/25 15:17:01 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 | */ |
| @@ -71,7 +71,6 @@ struct lua_State { | |||
| 71 | GCnode rootglobal; /* list of strings with global values */ | 71 | GCnode rootglobal; /* list of strings with global values */ |
| 72 | stringtable *string_root; /* array of hash tables for strings and udata */ | 72 | stringtable *string_root; /* array of hash tables for strings and udata */ |
| 73 | struct IM *IMtable; /* table for tag methods */ | 73 | struct IM *IMtable; /* table for tag methods */ |
| 74 | int IMtable_size; /* size of IMtable */ | ||
| 75 | int last_tag; /* last used tag in IMtable */ | 74 | int last_tag; /* last used tag in IMtable */ |
| 76 | struct ref *refArray; /* locked objects */ | 75 | struct ref *refArray; /* locked objects */ |
| 77 | int refSize; /* size of refArray */ | 76 | int refSize; /* size of refArray */ |
