summaryrefslogtreecommitdiff
path: root/libguile/vm-engine.c
diff options
context:
space:
mode:
authorAndy Wingo <wingo@pobox.com>2013-11-19 20:05:45 +0100
committerAndy Wingo <wingo@pobox.com>2013-11-19 20:05:45 +0100
commitef6b7f718acaceba9408ad16d007cc4cb76e0a84 (patch)
treeac7d5b6778a2fcbc2ebc240dc1695d8a7fc719d7 /libguile/vm-engine.c
parent827c2c26fc75c6c6686efbaca737d2736be5887e (diff)
downloadguile-ef6b7f718acaceba9408ad16d007cc4cb76e0a84.tar.gz
Internal RTL excision in vm.c
* libguile/vm.c (vm_boot_continuation, vm_boot_continuation_code): Rename from rtl_boot_continuation[_code]. (scm_bootstrap_vm): * libguile/vm-engine.c (rtl_vm_engine): Adapt.
Diffstat (limited to 'libguile/vm-engine.c')
-rw-r--r--libguile/vm-engine.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/libguile/vm-engine.c b/libguile/vm-engine.c
index 703fea392..b13fab0cc 100644
--- a/libguile/vm-engine.c
+++ b/libguile/vm-engine.c
@@ -470,9 +470,9 @@ RTL_VM_NAME (SCM vm, SCM program, SCM *argv, size_t nargs_)
continuation. */
base[0] = SCM_PACK (fp); /* dynamic link */
base[1] = SCM_PACK (ip); /* ra */
- base[2] = rtl_boot_continuation;
+ base[2] = vm_boot_continuation;
fp = &base[2];
- ip = (scm_t_uint32 *) rtl_boot_continuation_code;
+ ip = (scm_t_uint32 *) vm_boot_continuation_code;
/* MV-call frame, function & arguments */
base[3] = SCM_PACK (fp); /* dynamic link */