lua/src/lstring.c

62 static void tablerehash (TString **vect, int osize, int nsize) {
64   for (i = osize; i < nsize; i++)  /* clear new elements */
71       unsigned int h = lmod(p->hash, nsize);  /* new position */
85 void luaS_resize (lua_State *L, int nsize) {
89   if (nsize < osize)  /* shrinking table? */
90     tablerehash(tb->hash, osize, nsize);  /* depopulate shrinking part */
91   newvect = luaM_reallocvector(L, tb->hash, osize, nsize, TString*);
93     if (nsize < osize)  /* was it shrinking table? */
94       tablerehash(tb->hash, nsize, osize);  /* restore to original size */
99     tb->size = nsize;
100     if (nsize > osize)
101       tablerehash(newvect, osize, nsize);  /* rehash for new size */