summaryrefslogtreecommitdiff
path: root/libguile/eval.c
diff options
context:
space:
mode:
Diffstat (limited to 'libguile/eval.c')
-rw-r--r--libguile/eval.c3
1 files changed, 2 insertions, 1 deletions
diff --git a/libguile/eval.c b/libguile/eval.c
index 09fa71df4..6f2751970 100644
--- a/libguile/eval.c
+++ b/libguile/eval.c
@@ -882,7 +882,8 @@ prepare_boot_closure_env_for_eval (SCM proc, unsigned int argc,
*out_body = BOOT_CLOSURE_BODY (proc);
*inout_env = new_env;
}
- else if (BOOT_CLOSURE_IS_REST (proc) && argc >= nreq)
+ else if (!BOOT_CLOSURE_IS_FIXED (proc) &&
+ BOOT_CLOSURE_IS_REST (proc) && argc >= nreq)
{
SCM rest;
int i;