From 6f9c197b969dae836c238ac1a3bfe121efc4877c Mon Sep 17 00:00:00 2001
From: Matthew Flatt <mflatt@racket-lang.org>
Date: Wed, 6 Jul 2011 19:58:37 -0600
Subject: [PATCH] avoid compiler warnings in --disable-places mode

---
 src/racket/gc2/newgc.c | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/src/racket/gc2/newgc.c b/src/racket/gc2/newgc.c
index 557a51f144..6ed11a845a 100644
--- a/src/racket/gc2/newgc.c
+++ b/src/racket/gc2/newgc.c
@@ -2242,7 +2242,9 @@ int GC_merely_accounting()
 /* administration / initialization                                           */
 /*****************************************************************************/
 
+#ifdef MZ_USE_PLACES
 static void free_child_gc(void);
+#endif
 
 inline static int page_mmu_type(mpage *page) {
   switch (page->size_class) { 
@@ -4579,6 +4581,7 @@ void GC_dump_variable_stack(void **var_stack,
 /*                              GC free all                                   */
 /******************************************************************************/
 
+#ifdef MZ_USE_PLACES
 static void free_child_gc(void)
 {
   NewGC *gc = GC_get_GC();
@@ -4610,6 +4613,7 @@ static void free_child_gc(void)
   mmu_free(gc->mmu);
   free(gc);
 }
+#endif
 
 void GC_free_all(void)
 {