fix reference leak on heapAllocatedAtom⊸»˘0‿2⥊0

caught by test/cells.bqn
This commit is contained in:
dzaima 2025-05-28 04:21:21 +03:00
parent 107f5a7ee5
commit 45a756a6a0

View File

@ -765,7 +765,10 @@ NOINLINE B for_cells_SA(B f, B w, B x, ur xcr, ur xr, u32 chr) { // w⊸F⎉xcr
if (xcr!=1) break; if (xcr!=1) break;
if (isAtm(w)) { if (isAtm(w)) {
shift_atm:; shift_atm:;
if (IA(x)==0) return x; if (IA(x)==0) {
dec(w);
return x;
}
return shift_cells(w, x, cam, xsh[xk], el_or(TI(x,elType), selfElType(w)), rtid); return shift_cells(w, x, cam, xsh[xk], el_or(TI(x,elType), selfElType(w)), rtid);
} }
if (RNK(w)==0) { if (RNK(w)==0) {