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

back to open hashing for the string table (but with a different

Browse Source 
'hnext' field, to strings are still collected like all other
objects)
This commit is contained in:
Roberto Ierusalimschy
2013-09-05 16:31:49 -03:00
parent 0ad15fc100
commit d3bbb34c24
5 changed files with 61 additions and 92 deletions
Download Patch File Download Diff File Expand all files Collapse all files

20
ltests.c
View File

@@ -1,5 +1,5 @@
/*
** $Id: ltests.c,v 2.153 2013/09/03 15:37:10 roberto Exp roberto $
** $Id: ltests.c,v 2.154 2013/09/04 15:34:24 roberto Exp roberto $
** Internal Module for Debugging of the Lua Implementation
** See Copyright Notice in lua.h
*/
@@ -730,17 +730,21 @@ static int table_query (lua_State *L) {
static int string_query (lua_State *L) {
stringtable *tb = &G(L)->strt;
int s = luaL_optint(L, 2, 0) - 1;
if (s < 0) {
lua_pushinteger(L ,tb->nuse);
int s = luaL_optint(L, 1, 0) - 1;
if (s == -1) {
lua_pushinteger(L ,tb->size);
lua_pushinteger(L ,tb->nuse);
return 2;
}
else if (s < tb->size) {
TString *ts = tb->hash[s];
setsvalue2s(L, L->top, ts);
api_incr_top(L);
return 1;
TString *ts;
int n = 0;
for (ts = tb->hash[s]; ts != NULL; ts = ts->tsv.hnext) {
setsvalue2s(L, L->top, ts);
api_incr_top(L);
n++;
}
return n;
}
else return 0;
}