| 163 | |
| 164 | |
| 165 | void luaS_remove (lua_State *L, TString *ts) { |
| 166 | stringtable *tb = &G(L)->strt; |
| 167 | TString **p = &tb->hash[lmod(ts->hash, tb->size)]; |
| 168 | while (*p != ts) /* find previous element */ |
| 169 | p = &(*p)->u.hnext; |
| 170 | *p = (*p)->u.hnext; /* remove element from its list */ |
| 171 | tb->nuse--; |
| 172 | } |
| 173 | |
| 174 | |
| 175 | static void growstrtab (lua_State *L, stringtable *tb) { |