mirrors/lua
1
0
Fork 0
mirror of https://github.com/lua/lua synced 2024-12-27 12:49:43 +03:00
Code Issues Packages Projects Releases Wiki Activity

details

Browse Source
This commit is contained in:
Roberto Ierusalimschy 2000-12-22 14:57:46 -02:00
parent 1db05793a0
commit 0066bbbb0b
2 changed files with 6 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
lstring.c
View File

@ -1,5 +1,5 @@
/*
** $Id: lstring.c,v 1.45 2000/10/30 17:49:19 roberto Exp roberto $
** $Id: lstring.c,v 1.46 2000/11/24 17:39:56 roberto Exp roberto $
** String table (keeps all strings handled by Lua)
** See Copyright Notice in lua.h
*/
@ -72,10 +72,8 @@ void luaS_resize (lua_State *L, stringtable *tb, int newsize) {
}
}
luaM_free(L, tb->hash);
if (newsize > tb->size) /* avoid "unsigned negative" values */
L->nblocks += (newsize - tb->size)*sizeof(TString *);
else
L->nblocks -= (tb->size - newsize)*sizeof(TString *);
L->nblocks -= tb->size*sizeof(TString *);
L->nblocks += newsize*sizeof(TString *);
tb->size = newsize;
tb->hash = newhash;
}

8
ltable.c
View File

@ -1,5 +1,5 @@
/*
** $Id: ltable.c,v 1.59 2000/11/24 17:39:56 roberto Exp roberto $
** $Id: ltable.c,v 1.60 2000/12/04 18:33:40 roberto Exp roberto $
** Lua tables (hash)
** See Copyright Notice in lua.h
*/
@ -167,10 +167,8 @@ static void setnodevector (lua_State *L, Hash *t, luint32 size) {
ttype(&t->node[i].key) = ttype(&t->node[i].val) = LUA_TNIL;
t->node[i].next = NULL;
}
if ((int)size > t->size) /* avoid "unsigned negative" values */
L->nblocks += gcsize(L, size) - gcsize(L, t->size);
else
L->nblocks -= gcsize(L, t->size) - gcsize(L, size);
L->nblocks -= gcsize(L, t->size); /* old size */
L->nblocks += gcsize(L, size); /* new size */
t->size = size;
t->firstfree = &t->node[size-1]; /* first free position to be used */
}