From c3602ff740bc57e3a49b4693bec7479b8c0c13b5 Mon Sep 17 00:00:00 2001
From: Matthew Flatt <mflatt@racket-lang.org>
Date: Sat, 26 Sep 2009 19:43:46 +0000
Subject: [PATCH] remove debugging printf

svn: r16135
---
 src/mzscheme/src/syntax.c | 9 +--------
 1 file changed, 1 insertion(+), 8 deletions(-)

diff --git a/src/mzscheme/src/syntax.c b/src/mzscheme/src/syntax.c
index 3f327eae92..c2147ea69d 100644
--- a/src/mzscheme/src/syntax.c
+++ b/src/mzscheme/src/syntax.c
@@ -5610,15 +5610,8 @@ static Scheme_Object *define_for_syntaxes_sfs(Scheme_Object *data, SFS_Info *inf
 static Scheme_Object *stx_val(Scheme_Object *name, Scheme_Object *_env)
 {
   Scheme_Env *env = (Scheme_Env *)_env;
-  Scheme_Object *r;
-
-  r = scheme_tl_id_sym(env, name, NULL, 2, NULL, NULL);
-    printf("%s %s %p\n", 
-           scheme_write_to_string(name, NULL),
-           scheme_write_to_string(r, NULL),
-           env);
-    return r;
 
+  return scheme_tl_id_sym(env, name, NULL, 2, NULL, NULL);
 }
 
 static Scheme_Object *