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