From b579440f5e10a5377ebd7fb8a54b34785f565bc6 Mon Sep 17 00:00:00 2001 From: Marshall Lochbaum Date: Sat, 13 Aug 2022 19:02:22 -0400 Subject: [PATCH] =?UTF-8?q?Change=20=C3=97=20and=20=E2=88=A7=20integer=20r?= =?UTF-8?q?eductions=20to=20reverse=20order?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- src/builtins/md1.c | 12 ++++++------ 1 file changed, 6 insertions(+), 6 deletions(-) diff --git a/src/builtins/md1.c b/src/builtins/md1.c index d10ff34e..b6e653ad 100644 --- a/src/builtins/md1.c +++ b/src/builtins/md1.c @@ -311,9 +311,9 @@ B fold_c1(Md1D* d, B x) { B f = d->f; if (xe==el_f64) { f64* xp = f64any_ptr(x); f64 c=0; usz i=ia; if (i) do { c+= xp[--i]; } while(i); decG(x); return m_f64(c); } } if (rtid==n_mul | rtid==n_and) { // ×/∧ - if (xe==el_i8 ) { i8* xp = i8any_ptr (x); i32 c=1; for (usz i=0; if; if (xe==el_i32) { i32* xp = i32any_ptr(x); i32 c=wi; for (usz i=0; i