| 223 | |
| 224 | |
| 225 | void luaC_fix (lua_State *L, GCObject *o) { |
| 226 | global_State *g = G(L); |
| 227 | lua_assert(g->allgc == o); /* object must be 1st in 'allgc' list! */ |
| 228 | white2gray(o); /* they will be gray forever */ |
| 229 | setage(o, G_OLD); /* and old forever */ |
| 230 | g->allgc = o->next; /* remove object from 'allgc' list */ |
| 231 | o->next = g->fixedgc; /* link it to 'fixedgc' list */ |
| 232 | g->fixedgc = o; |
| 233 | } |
| 234 | |
| 235 | |
| 236 | /* |