From 107f5a7ee5fee13c7c56a83bab54886f0b156451 Mon Sep 17 00:00:00 2001 From: dzaima Date: Wed, 28 May 2025 04:03:35 +0300 Subject: [PATCH] =?UTF-8?q?atom=E2=8A=B8=C2=AB=E2=8E=89k=20can=20only=20le?= =?UTF-8?q?gally=20do=20k=3D=3D1?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit noticed by test/cells.bqn --- src/builtins/cells.c | 5 +---- 1 file changed, 1 insertion(+), 4 deletions(-) diff --git a/src/builtins/cells.c b/src/builtins/cells.c index 7c2315c2..2d149399 100644 --- a/src/builtins/cells.c +++ b/src/builtins/cells.c @@ -762,13 +762,10 @@ NOINLINE B for_cells_SA(B f, B w, B x, ur xcr, ur xr, u32 chr) { // w⊸F⎉xcr return pick_cells(WRAP(o2i64(w), l, thrF("𝕨⊑𝕩: Indexing out-of-bounds (𝕨≡%R, %s≡≠𝕩)", w, l)), x, xr, cam, xk); } break; case n_shifta: case n_shiftb: + if (xcr!=1) break; if (isAtm(w)) { shift_atm:; if (IA(x)==0) return x; - if (xcr!=1) { - if (xcr==0) break; - if (!(xsh[xk]==1 || shProd(xsh, xk+1, xr)==1)) break; - } return shift_cells(w, x, cam, xsh[xk], el_or(TI(x,elType), selfElType(w)), rtid); } if (RNK(w)==0) {