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