Mercurial > lbo > hg > ylisp
changeset 109:7217a4cb2b97
eval: In yeval_list_return_last(), don't evaluate last expression twice
author | Lewin Bormann <lbo@spheniscida.de> |
---|---|
date | Thu, 29 Aug 2019 22:24:31 +0200 |
parents | 145e36e5857d |
children | dae58f4aa15e |
files | src/eval.c |
diffstat | 1 files changed, 1 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/src/eval.c Thu Aug 29 08:51:52 2019 +0200 +++ b/src/eval.c Thu Aug 29 22:24:31 2019 +0200 @@ -11,7 +11,7 @@ yexpr_t yeval_list_return_last(yeval_state_t* state, yvec_t* list, size_t off) { if (list->len - off == 0) return yexpr_new(); assert(list->size == sizeof(yexpr_t)); - for (size_t i = off; i < list->len; i++) { + for (size_t i = off; i < list->len - 1; i++) { yeval(state, YVEC_AT(list, i, yexpr_t), true); } return yeval(state, YVEC_AT(list, list->len - 1, yexpr_t), false);