mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-29 22:40:34 +02:00
Code Activity

Fix boot closure wrong-num-args error

Browse source 
* libguile/eval.c (prepare_boot_closure_env_for_eval): Fix issue if
  fixed closure is called with wrong number of arguments during
  bootstrap.
This commit is contained in:
Andy Wingo 2015-10-21 10:48:15 +02:00
parent 0da0308b84
commit 9b1ac02a85
1 changed files with 2 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

3
libguile/eval.c
View file

@ -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;