fix define-for-syntax bug when the name is macro-introduced
svn: r467
This commit is contained in:
parent
2ff54dc636
commit
266e6c75cd
|
@ -3875,7 +3875,7 @@ static Scheme_Object *do_module_begin(Scheme_Object *form, Scheme_Comp_Env *env,
|
||||||
count++;
|
count++;
|
||||||
}
|
}
|
||||||
|
|
||||||
names = scheme_named_map_1(NULL, stx_sym, names, (Scheme_Object *)env->genv);
|
names = scheme_named_map_1(NULL, stx_sym, names, (Scheme_Object *)oenv->genv);
|
||||||
|
|
||||||
mrec.comp = 1;
|
mrec.comp = 1;
|
||||||
mrec.dont_mark_local_use = 0;
|
mrec.dont_mark_local_use = 0;
|
||||||
|
|
Loading…
Reference in New Issue
Block a user