From 53266ffd88abee2e989f244fe06316029c458a38 Mon Sep 17 00:00:00 2001 From: dzaima Date: Mon, 10 Jul 2023 23:21:36 +0300 Subject: [PATCH] =?UTF-8?q?fix=20(<1)=E2=8C=88`=E2=86=9510?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- src/builtins/scan.c | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/src/builtins/scan.c b/src/builtins/scan.c index 071ed98d..a6b18c60 100644 --- a/src/builtins/scan.c +++ b/src/builtins/scan.c @@ -274,8 +274,8 @@ B scan_c2(Md1D* d, B w, B x) { B f = d->f; if (rtid==n_ltack) return C2(shape, C1(fne, x), w); if (!(xr==1 && elNum(xe) && xe<=el_f64)) goto base; - if (rtid==n_floor) return scan2_min_num(w, x, xe, ia); // ⌊ - if (rtid==n_ceil ) return scan2_max_num(w, x, xe, ia); // ⌈ + if (rtid==n_floor && isF64(w)) return scan2_min_num(w, x, xe, ia); // ⌊ + if (rtid==n_ceil && isF64(w)) return scan2_max_num(w, x, xe, ia); // ⌈ if (rtid==n_add) { // + if (xe==el_bit) {