add delete! and objarr_delete

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