From c320afdf356675ccd82d750be3d82f7e3edeeb5e Mon Sep 17 00:00:00 2001
From: Taylor R Campbell <campbell@mumble.net>
Date: Sun, 6 Apr 2014 22:09:32 +0000
Subject: [PATCH] Mark scan unused in non-debug builds.

---
 src/microcode/gcloop.c | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/src/microcode/gcloop.c b/src/microcode/gcloop.c
index 9d9ddd163..7439075c0 100644
--- a/src/microcode/gcloop.c
+++ b/src/microcode/gcloop.c
@@ -962,6 +962,8 @@ scan_newspace_addr (SCHEME_OBJECT * addr)
 #ifdef ENABLE_GC_DEBUGGING_TOOLS
   if (scan != (addr + 1))
     std_gc_death ("scan_newspace_addr overflowed");
+#else
+  (void) scan;			/* ignore */
 #endif
 }
 
-- 
2.25.1