From ae21f8f875c638fc279dc0dcee58c4f80220be4d Mon Sep 17 00:00:00 2001 From: James Bornholt Date: Mon, 26 Dec 2016 11:19:00 -0800 Subject: [PATCH] Make PLTDISABLEGC work again In e59f888, new GCs no longer inherit the `avoid_collection` value set by PLTDISABLEGC, and so that setting is lost as soon as the master place spawns (due to `GC_switch_out_master_gc`). --- racket/src/racket/gc2/newgc.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/racket/src/racket/gc2/newgc.c b/racket/src/racket/gc2/newgc.c index 5baf3e8db2..7881929c2d 100644 --- a/racket/src/racket/gc2/newgc.c +++ b/racket/src/racket/gc2/newgc.c @@ -726,7 +726,7 @@ static void NewGC_initialize(NewGC *newgc, NewGC *inheritgc, NewGC *parentgc) { memcpy(newgc->mark_table, inheritgc->mark_table, newgc->number_of_tags * sizeof(Mark2_Proc)); memcpy(newgc->fixup_table, inheritgc->fixup_table, newgc->number_of_tags * sizeof(Fixup2_Proc)); } - newgc->avoid_collection = 0; + newgc->avoid_collection = inheritgc->avoid_collection; #ifdef MZ_USE_PLACES newgc->parent_gc = parentgc; #endif