From 2ffb546c95e3a641a8ba8de6c68eb6e9c3c6df93 Mon Sep 17 00:00:00 2001 From: Matthew Flatt Date: Thu, 22 Jan 2015 13:03:00 -0700 Subject: [PATCH] fix `vector-set-performance-stats!` for CGC Also, fix the build for a no-futures, no-places configuration. --- racket/src/racket/src/thread.c | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/racket/src/racket/src/thread.c b/racket/src/racket/src/thread.c index f0e82ce5d8..a29a6dcc57 100644 --- a/racket/src/racket/src/thread.c +++ b/racket/src/racket/src/thread.c @@ -177,9 +177,7 @@ THREAD_LOCAL_DECL(static int thread_swap_count); THREAD_LOCAL_DECL(int scheme_did_gc_count); THREAD_LOCAL_DECL(static intptr_t process_time_at_swap); -#ifdef MZ_PRECISE_GC THREAD_LOCAL_DECL(static intptr_t max_gc_pre_used_bytes); -#endif SHARED_OK static int init_load_on_demand = 1; @@ -8936,6 +8934,10 @@ static void get_ready_for_GC() start_this_gc_real_time = scheme_get_inexact_milliseconds(); start_this_gc_time = scheme_get_process_milliseconds(); +#ifndef MZ_PRECISE_GC + max_gc_pre_used_bytes = GC_get_memory_use(); +#endif + #ifdef MZ_USE_FUTURES scheme_future_block_until_gc(); #endif