From f231a30057c40c90d223b64de98078a215b5cfd7 Mon Sep 17 00:00:00 2001 From: dzaima Date: Tue, 20 Sep 2022 17:36:55 +0300 Subject: [PATCH] =?UTF-8?q?fix=20=F0=9D=95=A8=E2=8A=940?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- src/builtins/group.c | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/src/builtins/group.c b/src/builtins/group.c index 097c5cdd..8468a20b 100644 --- a/src/builtins/group.c +++ b/src/builtins/group.c @@ -30,8 +30,9 @@ static void allocGroups(B* rp, usz ria, B z, u8 xt, ur xr, usz* xsh, i32* len, u extern B rt_group; B group_c2(B t, B w, B x) { + if (!isArr(x)) thrM("⊔: 𝕩 must be an array"); ur xr = RNK(x); - if (isArr(w)&isArr(x) && RNK(w)==1 && xr>=1 && depth(w)==1) { + if (isArr(w) && RNK(w)==1 && xr>=1 && depth(w)==1) { usz wia = IA(w); usz* xsh = SH(x); usz xia = *xsh;