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

details

Browse Source
This commit is contained in:
Roberto Ierusalimschy
1997-12-30 17:15:52 -02:00
parent f76bca23ef
commit 90d87e3a78
1 changed files with 2 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
lstring.c
View File

@@ -1,5 +1,5 @@
/* /*
** $Id: lstring.c,v 1.7 1997/12/01 20:31:25 roberto Exp roberto $ ** $Id: lstring.c,v 1.8 1997/12/09 13:35:19 roberto Exp roberto $
** String table (keeps all strings handled by Lua) ** String table (keeps all strings handled by Lua)
** See Copyright Notice in lua.h ** See Copyright Notice in lua.h
*/ */
@@ -106,16 +106,13 @@ static TaggedString *insert (char *buff, int tag, stringtable *tb)
int j = -1; int j = -1;
if ((long)tb->nuse*3 >= (long)tb->size*2) if ((long)tb->nuse*3 >= (long)tb->size*2)
grow(tb); grow(tb);
i = h%tb->size; for (i = h%tb->size; (ts = tb->hash[i]) != NULL; i = (i+1)%tb->size) {
while ((ts = tb->hash[i]) != NULL)
{
if (ts == &EMPTY) if (ts == &EMPTY)
j = i; j = i;
else if ((ts->constindex >= 0) ? /* is a string? */ else if ((ts->constindex >= 0) ? /* is a string? */
(tag == LUA_T_STRING && (strcmp(buff, ts->str) == 0)) : (tag == LUA_T_STRING && (strcmp(buff, ts->str) == 0)) :
((tag == ts->u.d.tag || tag == LUA_ANYTAG) && buff == ts->u.d.v)) ((tag == ts->u.d.tag || tag == LUA_ANYTAG) && buff == ts->u.d.v))
return ts; return ts;
i = (i+1)%tb->size;
} }
/* not found */ /* not found */
if (j != -1) /* is there an EMPTY space? */ if (j != -1) /* is there an EMPTY space? */