suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

remove debugging printf

Browse Source 
svn: r16135
This commit is contained in:
Matthew Flatt 2009-09-26 19:43:46 +00:00
parent b9c1fafb74
commit c3602ff740
1 changed files with 1 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
src/mzscheme/src/syntax.c
View File

@ -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) static Scheme_Object *stx_val(Scheme_Object *name, Scheme_Object *_env)
{ {
Scheme_Env *env = (Scheme_Env *)_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 * static Scheme_Object *