diff options
author | Marius Vollmer <mvo@zagadka.de> | 2001-02-22 20:52:46 +0000 |
---|---|---|
committer | Marius Vollmer <mvo@zagadka.de> | 2001-02-22 20:52:46 +0000 |
commit | f1b7a06676950dd77c6d81f205fd52f59cfac3a6 (patch) | |
tree | 1684c45b361ded564680ecdfa357f9974d4b4088 /libguile/load.c | |
parent | b42ff180903838650e2f6c0ba1fee55640e5a76b (diff) | |
download | guile-f1b7a06676950dd77c6d81f205fd52f59cfac3a6.tar.gz |
* load.c (load): Use scm_primtive_eval_x instead of scm_i_eval_x.
Diffstat (limited to 'libguile/load.c')
-rw-r--r-- | libguile/load.c | 9 |
1 files changed, 1 insertions, 8 deletions
diff --git a/libguile/load.c b/libguile/load.c index 71a661d37..5002be721 100644 --- a/libguile/load.c +++ b/libguile/load.c @@ -97,14 +97,7 @@ load (void *data) SCM form = scm_read (port); if (SCM_EOF_OBJECT_P (form)) break; - /* Ugh! We need to re-check the environment for every form. - * We should change this in the new module system. - */ - scm_i_eval_x (form, - scm_module_system_booted_p - ? (scm_top_level_env - (SCM_MODULE_EVAL_CLOSURE (scm_current_module ()))) - : SCM_EOL); + scm_primitive_eval_x (form); } return SCM_UNSPECIFIED; } |