diff options
Diffstat (limited to 'src/lj_gc.c')
-rw-r--r-- | src/lj_gc.c | 12 |
1 files changed, 0 insertions, 12 deletions
diff --git a/src/lj_gc.c b/src/lj_gc.c index 5d795596..aba19d3f 100644 --- a/src/lj_gc.c +++ b/src/lj_gc.c | |||
@@ -33,7 +33,6 @@ | |||
33 | 33 | ||
34 | /* Macros to set GCobj colors and flags. */ | 34 | /* Macros to set GCobj colors and flags. */ |
35 | #define white2gray(x) ((x)->gch.marked &= (uint8_t)~LJ_GC_WHITES) | 35 | #define white2gray(x) ((x)->gch.marked &= (uint8_t)~LJ_GC_WHITES) |
36 | #define black2gray(x) ((x)->gch.marked &= (uint8_t)~LJ_GC_BLACK) | ||
37 | #define gray2black(x) ((x)->gch.marked |= LJ_GC_BLACK) | 36 | #define gray2black(x) ((x)->gch.marked |= LJ_GC_BLACK) |
38 | #define makewhite(g, x) \ | 37 | #define makewhite(g, x) \ |
39 | ((x)->gch.marked = ((x)->gch.marked & (uint8_t)~LJ_GC_COLORS) | curwhite(g)) | 38 | ((x)->gch.marked = ((x)->gch.marked & (uint8_t)~LJ_GC_COLORS) | curwhite(g)) |
@@ -740,17 +739,6 @@ void lj_gc_fullgc(lua_State *L) | |||
740 | 739 | ||
741 | /* -- Write barriers ------------------------------------------------------ */ | 740 | /* -- Write barriers ------------------------------------------------------ */ |
742 | 741 | ||
743 | /* Move the GC propagation frontier back for tables (make it gray again). */ | ||
744 | void lj_gc_barrierback(global_State *g, GCtab *t) | ||
745 | { | ||
746 | GCobj *o = obj2gco(t); | ||
747 | lua_assert(isblack(o) && !isdead(g, o)); | ||
748 | lua_assert(g->gc.state != GCSfinalize && g->gc.state != GCSpause); | ||
749 | black2gray(o); | ||
750 | setgcrefr(t->gclist, g->gc.grayagain); | ||
751 | setgcref(g->gc.grayagain, o); | ||
752 | } | ||
753 | |||
754 | /* Move the GC propagation frontier forward. */ | 742 | /* Move the GC propagation frontier forward. */ |
755 | void lj_gc_barrierf(global_State *g, GCobj *o, GCobj *v) | 743 | void lj_gc_barrierf(global_State *g, GCobj *o, GCobj *v) |
756 | { | 744 | { |