From 6e552fedf59c1b1599b76b512e10ce86a275cee5 Mon Sep 17 00:00:00 2001 From: dzaima Date: Sat, 5 Nov 2022 19:00:59 +0200 Subject: [PATCH] =?UTF-8?q?base=20case=20implementation=20for=20=E2=8D=8Bc?= =?UTF-8?q?8arr=20&=20=E2=8D=8Bc16arr?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- src/builtins/grade.h | 2 ++ 1 file changed, 2 insertions(+) diff --git a/src/builtins/grade.h b/src/builtins/grade.h index 712acd58..7852a3da 100644 --- a/src/builtins/grade.h +++ b/src/builtins/grade.h @@ -241,6 +241,7 @@ B GRADE_CAT(c1)(B t, B x) { goto decG_sq; } if (xe==el_i32 || xe==el_c32) { // safe to use the same comparison for i32 & c32 as c32 is 0≤x≤1114111 + el32:; i32* xp = tyany_ptr(x); i32 min=I32_MAX, max=I32_MIN; i32 sum=0; @@ -282,6 +283,7 @@ B GRADE_CAT(c1)(B t, B x) { TFREE(tmp); goto decG_sq; } + if (elChr(xe)) { x = taga(cpyC32Arr(x)); goto el32; } SLOW1(GRADE_CHR"𝕩", x); TALLOC(BI32p, tmp, ia);