fix pointer check in eachm_fn

This commit is contained in:
dzaima 2023-05-20 14:03:06 +03:00
parent e781ae21ee
commit bc19e7372d

View File

@ -81,7 +81,7 @@ B eachm_fn(B fo, B x, FC1 f) {
case t_fillslice: {
FillSlice* s = c(FillSlice,x);
Arr* p = s->p;
if (p->refc==1 && (p->type==t_fillarr || p->type==t_harr) && ((FillArr*)p)->a == s->a && PIA(p)==ia) {
if (p->refc==1 && ((p->type==t_fillarr && ((FillArr*)p)->a==s->a) || (p->type==t_harr && ((HArr*)p)->a==s->a)) && PIA(p)==ia) {
ur sr = PRNK(s);
if (sr<=1) {
arr_shErase(p, sr);