From 991e694b558691264f82d80a7aa1b86ef3d2c92c Mon Sep 17 00:00:00 2001
From: ubq323 <ubq323@ubq323.website>
Date: Thu, 27 Jun 2024 12:01:33 +0100
Subject: more tests

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

(limited to 'tests/whilelet.bth')

diff --git a/tests/whilelet.bth b/tests/whilelet.bth
new file mode 100644
index 0000000..ce8a482
--- /dev/null
+++ b/tests/whilelet.bth
@@ -0,0 +1,11 @@
+(do
+	(let (i 0
+		  a [])
+		(while (< i 10)
+			(append a i)
+			(set i (+ i 1)))
+		(let (x 100
+			  y 200
+			  z 300)
+			(say y))
+		(say a)))
-- 
cgit v1.2.3