squeeze created arrays in F⍟arr
This commit is contained in:
parent
94b1d90995
commit
c785b3a7b8
@ -83,7 +83,7 @@ NOINLINE B repeat_replaceR(B g, B* q) {
|
|||||||
usz ia = IA(g);
|
usz ia = IA(g);
|
||||||
M_HARR(r, ia);
|
M_HARR(r, ia);
|
||||||
for (usz i = 0; i < ia; i++) HARR_ADD(r, i, repeat_replace(GetU(g,i), q));
|
for (usz i = 0; i < ia; i++) HARR_ADD(r, i, repeat_replace(GetU(g,i), q));
|
||||||
return HARR_FC(r, g);
|
return any_squeeze(HARR_FC(r, g));
|
||||||
}
|
}
|
||||||
#define REPEAT_T(CN, END, ...) \
|
#define REPEAT_T(CN, END, ...) \
|
||||||
B g = CN(d->g, __VA_ARGS__ inc(x)); \
|
B g = CN(d->g, __VA_ARGS__ inc(x)); \
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user