From 0d238f2b8820d17ef5abaa51f18f11bbcbcc35e5 Mon Sep 17 00:00:00 2001 From: dzaima Date: Mon, 7 Oct 2024 04:52:45 +0300 Subject: [PATCH] =?UTF-8?q?mark=20=E2=86=95n=20with=20fl=5Fsquoze?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- src/builtins/fns.c | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/src/builtins/fns.c b/src/builtins/fns.c index 8f8ebe31..8ce26bef 100644 --- a/src/builtins/fns.c +++ b/src/builtins/fns.c @@ -99,10 +99,11 @@ B ud_c1(B t, B x) { if (LIKELY(xu<=I8_MAX+1)) { if (RARE(xu<=2)) return taga(ptr_inc(bitUD[xu])); i8* rp; B r = m_i8arrv(&rp, xu); + FL_SET(r, fl_asc|fl_squoze); NOUNROLL for (usz i = 0; i < xu; i++) rp[i] = i; return r; } - return intRange(0, xu); + return FL_SET(intRange(0, xu), fl_asc|fl_squoze); } B slash_c2(B t, B w, B x);