| 189 | |
| 190 | |
| 191 | void luaS_remove (lua_State *L, TString *ts) { |
| 192 | stringtable *tb = &G(L)->strt; |
| 193 | TString **p = &tb->hash[lmod(ts->hash, tb->size)]; |
| 194 | while (*p != ts) /* find previous element */ |
| 195 | p = &(*p)->u.hnext; |
| 196 | *p = (*p)->u.hnext; /* remove element from its list */ |
| 197 | tb->nuse--; |
| 198 | } |
| 199 | |
| 200 | |
| 201 | static void growstrtab (lua_State *L, stringtable *tb) { |