vaclavt/mlisp
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

do not repeatedly evaluate second argument in for

Browse Source
This commit is contained in:
VaclavT
2021-03-22 06:47:53 +01:00
parent 29d8eda238
commit e981d6b67f
1 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
ml.cpp
View File

@@ -948,11 +948,11 @@ namespace builtin {
for (size_t i = 0; i < list.size(); i++) { for (size_t i = 0; i < list.size(); i++) {
env.set(args[0].as_atom(), list[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); args[j].eval(env);
acc = args[args.size() - 1].eval(env); acc = args[args.size() - 1].eval(env);
} }
return acc; return acc;
} }