sjs/lake
1
0
Fork 0
mirror of https://github.com/samsonjs/lake.git synced 2026-04-27 14:57:43 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

check # of fixed args when applying vararg functions

Browse source
This commit is contained in:
Sami Samhuri 2011-04-21 15:40:00 -07:00
parent 90e935f93c
commit 67c785179e
1 changed files with 4 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
src/eval.c
View file

@ -311,6 +311,10 @@ LakeVal *apply(LakeVal *fnVal, LakeList *args)
/* bind varargs */ /* bind varargs */
if (fn->varargs) { if (fn->varargs) {
if (LIST_N(args) < nparams) {
ERR("expected at least %zu params but got %zu", nparams, LIST_N(args));
return NULL;
}
LakeList *remainingArgs = list_make_with_capacity(LIST_N(args) - nparams); LakeList *remainingArgs = list_make_with_capacity(LIST_N(args) - nparams);
for (; i < LIST_N(args); ++i) { for (; i < LIST_N(args); ++i) {
list_append(remainingArgs, LIST_VAL(args, i)); list_append(remainingArgs, LIST_VAL(args, i));