diff --git a/src/builtins/sfns.c b/src/builtins/sfns.c index 59de1b0d..8ed5f584 100644 --- a/src/builtins/sfns.c +++ b/src/builtins/sfns.c @@ -890,7 +890,7 @@ B join_c2(B t, B w, B x) { } if (c-wr > 1 || c-xr > 1) thrF("∾: Argument ranks must differ by 1 or less (%i≡=𝕨, %i≡=𝕩)", wr, xr); if (c==1) { - B r = vec_join(w, x); + B r = vec_join_inline(w, x); if (rnk(r)==0) srnk(r,1); return qWithFill(r, f); } diff --git a/src/utils/mut.c b/src/utils/mut.c index 827f30d6..2d91ba70 100644 --- a/src/utils/mut.c +++ b/src/utils/mut.c @@ -61,3 +61,8 @@ void mutF_init() { } } } + + +B vec_join(B w, B x) { + return vec_join_inline(w, x); +} \ No newline at end of file diff --git a/src/utils/mut.h b/src/utils/mut.h index 330be673..68b70996 100644 --- a/src/utils/mut.h +++ b/src/utils/mut.h @@ -252,8 +252,8 @@ static void mut_copy(Mut* m, usz ms, B x, usz xs, usz l) { assert(isArr(x)); } - -static B vec_join(B w, B x) { // consumes both +B vec_join(B w, B x); // consumes both +FORCE_INLINE B vec_join_inline(B w, B x) { usz wia = a(w)->ia; usz xia = a(x)->ia; usz ria = wia+xia;