diff --git a/src/builtins/sfns.c b/src/builtins/sfns.c index 2eb4e3a1..e3bab7f3 100644 --- a/src/builtins/sfns.c +++ b/src/builtins/sfns.c @@ -137,7 +137,7 @@ B shape_c2(B t, B w, B x) { B xf; if (isAtm(x)) { - xf = asFill(x); + xf = asFill(inc(x)); // goes to unit } else { if (nia <= xia) {