From d8b61b0f671567659d0d1d63dc7d6b2adcdcc166 Mon Sep 17 00:00:00 2001 From: Kaz Kylheku Date: Fri, 15 Jan 2021 16:12:09 -0800 Subject: maprod, maprend: correct self name. * eval.c (maprodv, maprendv): These functions implement maprod and maprend; the v suffix is just in the C code and must not be part of the self name. --- eval.c | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/eval.c b/eval.c index a466fde8..71901251 100644 --- a/eval.c +++ b/eval.c @@ -5473,12 +5473,12 @@ static val prod_common(val self, val fun, struct args *lists, val maprodv(val fun, struct args *lists) { - return prod_common(lit("maprodv"), fun, lists, list_collect, mapcarv); + return prod_common(lit("maprod"), fun, lists, list_collect, mapcarv); } val maprendv(val fun, struct args *lists) { - return prod_common(lit("maprendv"), fun, lists, list_collect_append, mappendv); + return prod_common(lit("maprend"), fun, lists, list_collect_append, mappendv); } static loc collect_nothing(loc ptail, val obj) -- cgit v1.2.3