summaryrefslogtreecommitdiff
path: root/functions.c
diff options
context:
space:
mode:
authorPeter Mikkelsen <petermikkelsen10@gmail.com>2022-01-31 21:22:19 +0000
committerPeter Mikkelsen <petermikkelsen10@gmail.com>2022-01-31 21:22:19 +0000
commite5839bb98ee4e011c43d01d0204f8c513dcd3c2e (patch)
treebcda391481f35ecd0cfa321a4709fa96cb62baeb /functions.c
parent1e0b30405dd8a9fdd8d3ebf72560a1baecec2387 (diff)
Make pick (⊃) check that the index is within range
Diffstat (limited to 'functions.c')
-rw-r--r--functions.c2
1 files changed, 2 insertions, 0 deletions
diff --git a/functions.c b/functions.c
index e3987ff..4b93b44 100644
--- a/functions.c
+++ b/functions.c
@@ -1325,6 +1325,8 @@ fnPick(Array *left, Array *right)
add *= result->shape[k];
index += add;
}
+ if(index >= result->size)
+ throwerror(nil, EIndex);
Array *tmp = result;
result = arrayitem(result, index);
freearray(tmp);