make namespace-require/copy replace import and syntax bindings

svn: r5351
This commit is contained in:
Matthew Flatt 2007-01-13 21:28:36 +00:00
parent 47cca352ab
commit e4bf3d4f47

View File

@ -5541,6 +5541,7 @@ void add_single_require(Scheme_Module_Exports *me, /* from module */
menv = scheme_module_access(modidx, env, 0);
val = scheme_lookup_in_table(menv->toplevel, (char *)exsns[j]);
scheme_add_global_symbol(iname, val, env);
scheme_shadow(env, iname, 1);
} else if (!for_unmarshal || !has_context) {
if (!save_marshal_info && !has_context && can_save_marshal)
save_marshal_info = 1;