From e981d6b67fca94e6b906fc68ec8d2ec3cb9cd028 Mon Sep 17 00:00:00 2001 From: VaclavT Date: Mon, 22 Mar 2021 06:47:53 +0100 Subject: [PATCH] do not repeatedly evaluate second argument in for --- ml.cpp | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/ml.cpp b/ml.cpp index 6a618c2..5e4a90c 100644 --- a/ml.cpp +++ b/ml.cpp @@ -948,11 +948,11 @@ namespace builtin { for (size_t i = 0; i < list.size(); i++) { env.set(args[0].as_atom(), list[i]); - for (size_t j = 1; j < args.size() - 1; j++) + for (size_t j = 2; j < args.size() - 1; j++) args[j].eval(env); + acc = args[args.size() - 1].eval(env); } - return acc; }