| 241 | |
| 242 | |
| 243 | void luaC_fix (lua_State *L, GCObject *o) { |
| 244 | global_State *g = G(L); |
| 245 | lua_assert(g->allgc == o); /* object must be 1st in 'allgc' list! */ |
| 246 | set2gray(o); /* they will be gray forever */ |
| 247 | setage(o, G_OLD); /* and old forever */ |
| 248 | g->allgc = o->next; /* remove object from 'allgc' list */ |
| 249 | o->next = g->fixedgc; /* link it to 'fixedgc' list */ |
| 250 | g->fixedgc = o; |
| 251 | } |
| 252 | |
| 253 | |
| 254 | /* |