| 152 | |
| 153 | |
| 154 | void luaS_remove (lua_State *L, TString *ts) { |
| 155 | stringtable *tb = &G(L)->strt; |
| 156 | TString **p = &tb->hash[lmod(ts->hash, tb->size)]; |
| 157 | while (*p != ts) /* find previous element */ |
| 158 | p = &(*p)->u.hnext; |
| 159 | *p = (*p)->u.hnext; /* remove element from its list */ |
| 160 | tb->nuse--; |
| 161 | } |
| 162 | |
| 163 | |
| 164 | /* |