| 174 | |
| 175 | |
| 176 | void luaS_remove (lua_State *L, TString *ts) { |
| 177 | stringtable *tb = &G(L)->strt; |
| 178 | TString **p = &tb->hash[lmod(ts->hash, tb->size)]; |
| 179 | while (*p != ts) /* find previous element */ |
| 180 | p = &(*p)->u.hnext; |
| 181 | *p = (*p)->u.hnext; /* remove element from its list */ |
| 182 | tb->nuse--; |
| 183 | } |
| 184 | |
| 185 | |
| 186 | static void growstrtab (lua_State *L, stringtable *tb) { |