diff options
author | Peter Mikkelsen <petermikkelsen10@gmail.com> | 2022-01-31 21:22:19 +0000 |
---|---|---|
committer | Peter Mikkelsen <petermikkelsen10@gmail.com> | 2022-01-31 21:22:19 +0000 |
commit | e5839bb98ee4e011c43d01d0204f8c513dcd3c2e (patch) | |
tree | bcda391481f35ecd0cfa321a4709fa96cb62baeb /functions.c | |
parent | 1e0b30405dd8a9fdd8d3ebf72560a1baecec2387 (diff) |
Make pick (⊃) check that the index is within range
Diffstat (limited to 'functions.c')
-rw-r--r-- | functions.c | 2 |
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); |