diff options
Diffstat (limited to 'libguile/vm.c')
-rw-r--r-- | libguile/vm.c | 8 |
1 files changed, 0 insertions, 8 deletions
diff --git a/libguile/vm.c b/libguile/vm.c index fdca9ea54..37f74e582 100644 --- a/libguile/vm.c +++ b/libguile/vm.c @@ -269,14 +269,6 @@ apply_foreign (SCM proc, SCM *args, int nargs, int headroom) switch (SCM_TYP7 (proc)) { - case scm_tcs_closures: - /* FIXME: pre-boot closures should be smobs */ - { - SCM arglist = SCM_EOL; - while (nargs--) - arglist = scm_cons (args[nargs], arglist); - return scm_closure_apply (proc, arglist); - } case scm_tc7_smob: if (!SCM_SMOB_APPLICABLE_P (proc)) goto badproc; |