From b7393ea123eb0f27d99ba1c38bd944f78b90eb42 Mon Sep 17 00:00:00 2001 From: Andy Wingo Date: Fri, 5 Jun 2009 11:47:19 +0200 Subject: refactoring for toplevel-ref, toplevel-set, link-now * libguile/vm-i-system.c (toplevel-ref, toplevel-set) * libguile/vm-i-loader.c (link-now): * libguile/vm.c (resolve_variable): Factor out common code to a static method. The compiler can still inline it, so it shouldn't have a significant performance effect. * libguile/vm-engine.c (vm_error_no_such_module): Remove now-unused label. --- libguile/vm-engine.c | 4 ---- 1 file changed, 4 deletions(-) (limited to 'libguile/vm-engine.c') diff --git a/libguile/vm-engine.c b/libguile/vm-engine.c index f43f8c7fe..34764c659 100644 --- a/libguile/vm-engine.c +++ b/libguile/vm-engine.c @@ -212,10 +212,6 @@ VM_NAME (struct scm_vm *vp, SCM program, SCM *argv, int nargs) finish_args = SCM_EOL; goto vm_error; - vm_error_no_such_module: - err_msg = scm_from_locale_string ("VM: No such module: ~A"); - goto vm_error; - #if VM_CHECK_IP vm_error_invalid_address: err_msg = scm_from_locale_string ("VM: Invalid program address"); -- cgit v1.2.3