** Traverse a list making all its elements white and clearing their ** age. */
| 1031 | ** age. |
| 1032 | */ |
| 1033 | static void whitelist (global_State *g, GCObject *p) { |
| 1034 | int white = luaC_white(g); |
| 1035 | for (; p != NULL; p = p->next) |
| 1036 | p->marked = cast_byte((p->marked & maskcolors) | white); |
| 1037 | } |
| 1038 | |
| 1039 | |
| 1040 | /* |