From 1af8cd07adbb0942d182eec00fefe8df0c5c46e0 Mon Sep 17 00:00:00 2001 From: Matthew Flatt Date: Wed, 29 Jun 2011 21:32:48 -0600 Subject: [PATCH] minor clean-up --- src/racket/src/syntax.c | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/src/racket/src/syntax.c b/src/racket/src/syntax.c index a14545f3f5..cd701516bf 100644 --- a/src/racket/src/syntax.c +++ b/src/racket/src/syntax.c @@ -1886,7 +1886,6 @@ Scheme_Object *scheme_delayed_rename(Scheme_Object **o, intptr_t i) { Scheme_Object *rename, *v; Resolve_Prefix *rp; - int added = 0; rename = o[0]; @@ -1908,7 +1907,7 @@ Scheme_Object *scheme_delayed_rename(Scheme_Object **o, intptr_t i) rename = SCHEME_VEC_ELS(rename)[4]; if (!SCHEME_FALSEP(rename)) { /* need to propagate the inspector for dye packs, too */ - (void)set_false_insp((Scheme_Object *)v, rename, added); + (void)set_false_insp((Scheme_Object *)v, rename, 0); } return v;