From: Joe Marshall <eval.apply@gmail.com>
Date: Thu, 22 Sep 2011 18:51:25 +0000 (-0700)
Subject: Don't call OS_free_pages after GC flip.  We don't resize the heap and we will be... 
X-Git-Tag: release-9.2.0~347^2~1
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=f372dae7d971166dc4a66955ea40e54e7ab04cb4;p=mit-scheme.git

Don't call OS_free_pages after GC flip.  We don't resize the heap and we will be reusing it.
---

diff --git a/src/microcode/memmag.c b/src/microcode/memmag.c
index 45580386f..739e543fb 100644
--- a/src/microcode/memmag.c
+++ b/src/microcode/memmag.c
@@ -326,7 +326,6 @@ void
 std_gc_pt2 (void)
 {
   SCHEME_OBJECT * p = (get_newspace_ptr ());
-  OS_free_pages (heap_start, heap_end);
   (void) save_tospace (save_tospace_copy, 0);
   Free = p;