From ef6b7f718acaceba9408ad16d007cc4cb76e0a84 Mon Sep 17 00:00:00 2001 From: Andy Wingo Date: Tue, 19 Nov 2013 20:05:45 +0100 Subject: 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. --- libguile/vm-engine.c | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'libguile/vm-engine.c') 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 */ -- cgit v1.2.3