From da4191880ce968530a0e5c84073613ffbce27e6a Mon Sep 17 00:00:00 2001
From: Matthew Flatt <mflatt@racket-lang.org>
Date: Thu, 15 Feb 2007 22:14:15 +0000
Subject: [PATCH] fix pre-processor defn

svn: r5620
---
 src/mzscheme/src/stxobj.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/mzscheme/src/stxobj.c b/src/mzscheme/src/stxobj.c
index 3c88e01976..358960db64 100644
--- a/src/mzscheme/src/stxobj.c
+++ b/src/mzscheme/src/stxobj.c
@@ -3315,7 +3315,7 @@ int scheme_stx_bound_eq(Scheme_Object *a, Scheme_Object *b, long phase)
   return scheme_stx_env_bound_eq(a, b, NULL, phase);
 }
 
-#if EXPLAIN
+#if EXPLAIN_RESOLVE
 Scheme_Object *scheme_explain_resolve_env(Scheme_Object *a)
 {
   explain_resolves++;