summaryrefslogtreecommitdiff
path: root/functions.c
diff options
context:
space:
mode:
Diffstat (limited to 'functions.c')
-rw-r--r--functions.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/functions.c b/functions.c
index f73ff29..2e95316 100644
--- a/functions.c
+++ b/functions.c
@@ -1404,7 +1404,7 @@ fnDrop(Array *left, Array *right)
if(GetSize(left) > GetRank(right))
throwerror(nil, ELength);
else if(GetSize(left) == GetRank(right))
- left = fnSame(left);
+ left = duparray(left);
else{
Array *old = left;
left = allocarray(AtypeInt, 1, GetRank(right));