From b9232a1f6843c254e16ba84458a53f190805740e Mon Sep 17 00:00:00 2001 From: dzaima Date: Mon, 6 Dec 2021 11:01:52 +0200 Subject: [PATCH] =?UTF-8?q?fix=20handling=20of=20first=20element=20in=20/?= =?UTF-8?q?=E2=81=BC?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- src/builtins/sfns.c | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/src/builtins/sfns.c b/src/builtins/sfns.c index 9bb39863..6b6d28c5 100644 --- a/src/builtins/sfns.c +++ b/src/builtins/sfns.c @@ -648,9 +648,9 @@ B slash_im(B t, B x) { SLOW1("/⁼", x); B* xp = arr_bptr(x); if (xp==NULL) { HArr* xa=cpyHArr(x); x=taga(xa); xp=xa->a; } - if(o2i64(xp[0])<0) thrM("/⁼: Argument cannot contain negative numbers"); + i64 prev = o2i64(xp[0]); + if(prev<0) thrM("/⁼: Argument cannot contain negative numbers"); bool bitres = true; - i64 prev = 0; for (usz i = 1; i < xia; i++) { i64 c = o2i64(xp[i]); if (prev>=c) { bitres=false; if (prev>c) thrM("/⁼: Argument must be sorted"); }