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

fix problem in module->namespace related to renamed exports

Browse Source 
svn: r15365
This commit is contained in:
Matthew Flatt 2009-07-02 22:29:15 +00:00
parent 8fbc4f86aa
commit 1c49a8c6ff
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/mzscheme/src/module.c
View File

@ -2360,7 +2360,7 @@ void scheme_prep_namespace_rename(Scheme_Env *menv)
/* Local, provided: */ /* Local, provided: */
for (i = 0; i < m->me->rt->num_provides; i++) { for (i = 0; i < m->me->rt->num_provides; i++) {
if (SCHEME_FALSEP(m->me->rt->provide_srcs[i])) { if (SCHEME_FALSEP(m->me->rt->provide_srcs[i])) {
name = m->me->rt->provides[i]; name = m->me->rt->provide_src_names[i];
scheme_extend_module_rename(one_rn, m->self_modidx, name, name, m->self_modidx, name, 0, scheme_extend_module_rename(one_rn, m->self_modidx, name, name, m->self_modidx, name, 0,
scheme_make_integer(0), NULL, NULL, 0); scheme_make_integer(0), NULL, NULL, 0);
} }