From 7a256fbb726237100095823a9c4b65ce144d5b93 Mon Sep 17 00:00:00 2001 From: Matthew Flatt Date: Fri, 2 Nov 2012 17:05:07 -0600 Subject: [PATCH] yet another repair for backtraces Compacting of the old generation breaks backtrace info. We could try to fixup backtrace info, but it's simpler to just disable compaction. --- src/racket/gc2/newgc.c | 9 ++++++--- 1 file changed, 6 insertions(+), 3 deletions(-) diff --git a/src/racket/gc2/newgc.c b/src/racket/gc2/newgc.c index f456871d90..6faa63ca29 100644 --- a/src/racket/gc2/newgc.c +++ b/src/racket/gc2/newgc.c @@ -4596,9 +4596,12 @@ static void garbage_collect(NewGC *gc, int force_full, int switching_master, Log TIME_STEP("finalized2"); - if(gc->gc_full) - if (premaster_or_place_gc(gc) || switching_master) - do_heap_compact(gc); +#if MZ_GC_BACKTRACE + if (0) +#endif + if(gc->gc_full) + if (premaster_or_place_gc(gc) || switching_master) + do_heap_compact(gc); TIME_STEP("compacted"); /* do some cleanup structures that either change state based on the