From 17e97bbed7abc59fb754cf463e825e890b16815d Mon Sep 17 00:00:00 2001 From: Peter Mikkelsen Date: Wed, 26 Jan 2022 15:09:20 +0000 Subject: =?UTF-8?q?Implement=20replicate=20first=20and=20last=20=E2=8C=BF?= =?UTF-8?q?=20/?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- functions.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'functions.c') diff --git a/functions.c b/functions.c index 0e302de..6c9f837 100644 --- a/functions.c +++ b/functions.c @@ -747,7 +747,7 @@ fnSelfReference1(Array *right) Array *name(Array *left, Array *right){\ Array *leftarr, *rightarr;\ if(!commontype(left, right, &leftarr, &rightarr, forcefloat)) throwerror(nil, EType);\ - if(!scalarextend(leftarr, rightarr, &left, &right)) throwerror(nil, ERank);\ + if(!scalarextend(leftarr, rightarr, &left, &right)) throwerror(L"scalar extension fail", ERank);\ Array *res;\ if(left->type != AtypeArray && restype != left->type)\ res = duparrayshape(left, restype);\ -- cgit v1.2.3