maskcolors
(gch(x)->marked = cast_byte((gch(x)->marked & maskcolors) | luaC_white(g)))
toclear = maskcolors; /* clear all color bits + old bit */