From aa0485fe33204169724d020f9c5e3b91e558ab1e Mon Sep 17 00:00:00 2001
From: ubq323 <ubq323@ubq323.website>
Date: Tue, 23 Jul 2024 17:00:56 +0100
Subject: add pend builtin function

---
 tests/pend.bth | 25 +++++++++++++++++++++++++
 1 file changed, 25 insertions(+)
 create mode 100644 tests/pend.bth

(limited to 'tests/pend.bth')

diff --git a/tests/pend.bth b/tests/pend.bth
new file mode 100644
index 0000000..9a37f00
--- /dev/null
+++ b/tests/pend.bth
@@ -0,0 +1,25 @@
+(def xs [
+	(, 10)
+	(, [100 200])
+
+	(, 22 33)
+	(, 11 [111 222])
+	(, [333 444] 99)
+	(, [555 666] [777 888])
+
+	(, 10 11 12)
+	(, 10 11 [20 30])
+	(, 10 [222 333] 99)
+	(, 10 [22 33] [44 55])
+	(, [100 200] 33 44)
+	(, [100 200] 33 [444 555])
+	(, [100 200] [33 44] 55)
+	(, [100 200] [333 444] [555 666])
+
+	(, [])
+	(, [1])
+	(, 10 [])
+	(, [] 20)
+	(, [] [])	
+])
+(each (x xs) (say x))
-- 
cgit v1.2.3