nik/lush
1
1
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

bug: string table must be initialized.

Browse Source
This commit is contained in:
Roberto Ierusalimschy
1997-05-05 17:21:23 -03:00
parent 4aade854bb
commit 12d9731a49
1 changed files with 15 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

18
tree.c
View File

@@ -3,7 +3,7 @@
** TecCGraf - PUC-Rio ** TecCGraf - PUC-Rio
*/ */
char *rcs_tree="$Id: tree.c,v 1.23 1997/03/31 14:02:58 roberto Exp roberto $"; char *rcs_tree="$Id: tree.c,v 1.24 1997/03/31 14:17:09 roberto Exp roberto $";
#include <string.h> #include <string.h>
@@ -40,9 +40,22 @@ static unsigned long hash (char *buff, long size)
return h; return h;
} }
static void luaI_inittree (void)
{
int i;
for (i=0; i<NUM_HASHS; i++) {
string_root[i].size = 0;
string_root[i].nuse = 0;
string_root[i].hash = NULL;
}
}
static void initialize (void) static void initialize (void)
{ {
initialized = 1; initialized = 1;
luaI_inittree();
luaI_addReserved(); luaI_addReserved();
luaI_initsymbol(); luaI_initsymbol();
luaI_initconstant(); luaI_initconstant();
@@ -60,8 +73,7 @@ static void grow (stringtable *tb)
/* rehash */ /* rehash */
tb->nuse = 0; tb->nuse = 0;
for (i=0; i<tb->size; i++) for (i=0; i<tb->size; i++)
if (tb->hash[i] != NULL && tb->hash[i] != &EMPTY) if (tb->hash[i] != NULL && tb->hash[i] != &EMPTY) {
{
int h = tb->hash[i]->hash%newsize; int h = tb->hash[i]->hash%newsize;
while (newhash[h]) while (newhash[h])
h = (h+1)%newsize; h = (h+1)%newsize;