summaryrefslogtreecommitdiff
path: root/libguile/init.c
diff options
context:
space:
mode:
authorAndy Wingo <wingo@pobox.com>2009-12-01 22:20:03 +0100
committerAndy Wingo <wingo@pobox.com>2009-12-01 22:20:03 +0100
commit67e2d80a6a97b51aefea701cf10112102b09b392 (patch)
treeac3dfda730ddb8ffb6dabbde888dc838a8723d95 /libguile/init.c
parentcc8d1f5fcd97de920111d407d2c9e88d6aedbc6d (diff)
downloadguile-67e2d80a6a97b51aefea701cf10112102b09b392.tar.gz
apply goes to the vm, not the interpreter
* libguile/eval.c (eval): Call scm_vm_apply instead of apply. (apply): Deleted, no longer referenced. Heh. (scm_apply): Call scm_vm_apply. * libguile/init.c (scm_i_init_guile): Bootstrap the VM before the evaluator. * libguile/vm.c (scm_vm_apply): Actually it's not necessary that the procedure is a program; so that's cool, relax the check.
Diffstat (limited to 'libguile/init.c')
-rw-r--r--libguile/init.c3
1 files changed, 1 insertions, 2 deletions
diff --git a/libguile/init.c b/libguile/init.c
index 85b277b32..a7434b33d 100644
--- a/libguile/init.c
+++ b/libguile/init.c
@@ -551,6 +551,7 @@ scm_i_init_guile (SCM_STACKITEM *base)
scm_init_weaks ();
scm_init_guardians ();
scm_init_vports ();
+ scm_bootstrap_vm ();
scm_init_memoize ();
scm_init_eval ();
scm_init_evalext ();
@@ -588,8 +589,6 @@ scm_i_init_guile (SCM_STACKITEM *base)
scm_init_rw ();
scm_init_extensions ();
- scm_bootstrap_vm ();
-
atexit (cleanup_for_exit);
scm_load_startup_files ();
}