From 578a99566965396df51623eb701dc3d76793c3ea Mon Sep 17 00:00:00 2001 From: Kaz Kylheku Date: Thu, 3 Jul 2014 07:47:18 -0700 Subject: * eval.c (apf, ipf): Bugfix: do_apf and do_ipf should be registered as variadic functions. --- eval.c | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'eval.c') diff --git a/eval.c b/eval.c index 0d2a6144..55cda3cf 100644 --- a/eval.c +++ b/eval.c @@ -3182,7 +3182,7 @@ static val do_apf(val fun, val args) static val apf(val fun) { - return func_f1(fun, do_apf); + return func_f0v(fun, do_apf); } static val do_ipf(val fun, val args) @@ -3192,7 +3192,7 @@ static val do_ipf(val fun, val args) static val ipf(val fun) { - return func_f1(fun, do_ipf); + return func_f0v(fun, do_ipf); } static val prinl(val obj, val stream) -- cgit v1.2.3