4 files changed, 15 insertions, 0 deletions
diff --git a/tests/000/binding.expected b/tests/000/binding.expected
new file mode 100644
index 00000000..9e5303f0
--- /dev/null
+++ b/tests/000/binding.expected
@@ -0,0 +1,6 @@
+x="1"
+y="2"
+z[0]="1"
+z[1]="2"
+a="1"
+b="0"
diff --git a/tests/000/binding.txr b/tests/000/binding.txr
new file mode 100644
index 00000000..95faa20d
--- /dev/null
+++ b/tests/000/binding.txr
@@ -0,0 +1,5 @@
+@(bind x 1)
+@(bind y 2)
+@(rebind z (x y))
+@(bind (a b) (0 1))
+@(rebind (a b) (b a))
diff --git a/tests/000/nilvar.expected b/tests/000/nilvar.expected
new file mode 100644
index 00000000..70985094
--- /dev/null
+++ b/tests/000/nilvar.expected
@@ -0,0 +1 @@
+a:c
diff --git a/tests/000/nilvar.txr b/tests/000/nilvar.txr
new file mode 100644
index 00000000..a6d1391c
--- /dev/null
+++ b/tests/000/nilvar.txr
@@ -0,0 +1,3 @@
+@(next :string "a !b c")
+@(coll)@(cases)@{nil /!\S+/}@(or)@{var /\S+/}@(end)@(end)
+@(do (put-line (join-with ":" var)))