don't use the cell appender for Arith⌜

This commit is contained in:
dzaima 2023-04-29 13:13:58 +03:00
parent 0534c4ccc5
commit ba1b853936

View File

@ -78,10 +78,10 @@ B tbl_c2(Md1D* d, B w, B x) { B f = d->f;
r = fc2(f, C2(slash, m_i32(xia), taga(wd)), C2(shape, m_f64(ria), incG(x)));
} else if (xia>7) {
SGet(w)
M_APD_SH1(rm, wia)
M_APD_TOT(rm, ria)
incByG(x, wia);
for (usz wi = 0; wi < wia; wi++) APDD(rm, fc2(f, Get(w,wi), x));
r = taga(APD_SH_GET(rm, 0));
r = taga(APD_TOT_GET(rm));
} else goto generic;
if (RNK(r)>1) {
SRNK(r, 0); // otherwise the following arr_shAlloc failing will result in r->sh dangling