diff options
Diffstat (limited to 'lgc.c')
| -rw-r--r-- | lgc.c | 10 |
1 files changed, 2 insertions, 8 deletions
| @@ -1146,15 +1146,9 @@ static GCObject **correctgraylist (GCObject **p) { | |||
| 1146 | } | 1146 | } |
| 1147 | else { /* everything else is removed */ | 1147 | else { /* everything else is removed */ |
| 1148 | lua_assert(isold(curr)); /* young objects should be white here */ | 1148 | lua_assert(isold(curr)); /* young objects should be white here */ |
| 1149 | if (getage(curr) == G_TOUCHED2) { /* advance from TOUCHED2... */ | 1149 | if (getage(curr) == G_TOUCHED2) /* advance from TOUCHED2... */ |
| 1150 | changeage(curr, G_TOUCHED2, G_OLD); /* ... to OLD */ | 1150 | changeage(curr, G_TOUCHED2, G_OLD); /* ... to OLD */ |
| 1151 | lua_assert(isblack(curr)); /* TOUCHED2 objects are always black */ | 1151 | gray2black(curr); /* make object black (to be removed) */ |
| 1152 | } | ||
| 1153 | else { | ||
| 1154 | /* everything else in a gray list should be gray */ | ||
| 1155 | lua_assert(isgray(curr)); | ||
| 1156 | gray2black(curr); /* make object black (to be removed) */ | ||
| 1157 | } | ||
| 1158 | goto remove; | 1152 | goto remove; |
| 1159 | } | 1153 | } |
| 1160 | remove: *p = *next; continue; | 1154 | remove: *p = *next; continue; |