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

fix module restart and instantiation of imports

Browse Source 
svn: r11433
This commit is contained in:
Matthew Flatt 2008-08-26 11:18:23 +00:00
parent 33d2d5de32
commit 7418796a32
1 changed files with 10 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -3821,6 +3821,16 @@ static void start_module(Scheme_Module *m, Scheme_Env *env, int restart,
menv = instantiate_module(m, env, restart, syntax_idx);
if (restart) {
menv->did_eval_run = 0;
menv->did_eval_exp = 0;
menv->require_names = NULL;
menv->et_require_names = NULL;
menv->tt_require_names = NULL;
menv->dt_require_names = NULL;
menv->other_require_names = NULL;
}
show("strt", menv, eval_exp, eval_run);
chain_start_module(menv, env, eval_exp, eval_run, base_phase, cycle_list, syntax_idx);