diff options
Diffstat (limited to 'tests')
| -rw-r--r-- | tests/delete.bth | 16 | ||||
| -rw-r--r-- | tests/delete.out | 4 |
2 files changed, 20 insertions, 0 deletions
diff --git a/tests/delete.bth b/tests/delete.bth new file mode 100644 index 0000000..58063a3 --- /dev/null +++ b/tests/delete.bth @@ -0,0 +1,16 @@ +(let (a [10 20 30 40 50]) + (delete! a 0) + (say a)) + +(let (a [10 20 30 40 50]) + (delete! a 3) + (say a)) + +(let (a [10 20 30 40 50]) + (delete! a 4) + (say a)) + +(let (a [10 20 30 40 50]) + (delete! a 5) + (say a)) + diff --git a/tests/delete.out b/tests/delete.out new file mode 100644 index 0000000..d5ec9d6 --- /dev/null +++ b/tests/delete.out @@ -0,0 +1,4 @@ +[20 30 40 50] +[10 20 30 50] +[10 20 30 40] +array index out of bounds |