From ddf3a5b48e2a2f7f1703d997070fe99a9666885e Mon Sep 17 00:00:00 2001 From: dzaima Date: Mon, 24 May 2021 01:38:44 +0300 Subject: [PATCH] =?UTF-8?q?correct=20error=20message=20of=20=E2=88=8A?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- src/builtins/fns.c | 7 ++----- 1 file changed, 2 insertions(+), 5 deletions(-) diff --git a/src/builtins/fns.c b/src/builtins/fns.c index 9cbce486..9d9ec517 100644 --- a/src/builtins/fns.c +++ b/src/builtins/fns.c @@ -222,17 +222,14 @@ B indexOf_c2(B t, B w, B x) { extern B rt_memberOf; B memberOf_c1(B t, B x) { - if (isAtm(x) || rnk(x)==0) thrM("⍷: Argument cannot have rank 0"); + if (isAtm(x) || rnk(x)==0) thrM("∊: Argument cannot have rank 0"); if (rnk(x)!=1) x = toCells(x); usz xia = a(x)->ia; i32* rp; B r = m_i32arrv(&rp, xia); H_Sb* set = m_Sb(64); BS2B xgetU = TI(x).getU; - for (usz i = 0; i < xia; i++) { - B c = xgetU(x,i); - rp[i] = !ins_Sb(&set, c); - } + for (usz i = 0; i < xia; i++) rp[i] = !ins_Sb(&set, xgetU(x,i)); free_Sb(set); dec(x); return r; }