From 57ea02616c6fd119451f1e3f6b11e4a122df88ea Mon Sep 17 00:00:00 2001
From: Matthew Flatt <mflatt@racket-lang.org>
Date: Mon, 20 Jul 2015 13:41:04 -0600
Subject: [PATCH] fix inspector tracking in syntax objects

Repair a NULL vs. #f mismatch.
---
 racket/src/racket/src/syntax.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/racket/src/racket/src/syntax.c b/racket/src/racket/src/syntax.c
index 8166ac15e3..0f1e72f6d3 100644
--- a/racket/src/racket/src/syntax.c
+++ b/racket/src/racket/src/syntax.c
@@ -4424,7 +4424,7 @@ void scheme_extend_module_context_with_shared(Scheme_Object *mc, /* (vector <sco
   SCHEME_VEC_ELS(pes)[1] = (Scheme_Object *)pt;
   SCHEME_VEC_ELS(pes)[2] = src_phase;
   SCHEME_VEC_ELS(pes)[3] = unmarshal_info;
-  SCHEME_VEC_ELS(pes)[4] = insp_desc;
+  SCHEME_VEC_ELS(pes)[4] = (insp_desc ? insp_desc : scheme_false);
 
   if (replace_at) {
     SCHEME_BINDING_VAL(SCHEME_CAR(replace_at)) = pes;