summary refs log tree commit diff
path: root/tests
diff options
context:
space:
mode:
Diffstat (limited to 'tests')
-rw-r--r--tests/test.mew6
1 files changed, 6 insertions, 0 deletions
diff --git a/tests/test.mew b/tests/test.mew
index feaf357..9cbef3e 100644
--- a/tests/test.mew
+++ b/tests/test.mew
@@ -444,4 +444,10 @@
   (test #t (void? (void)))
   (test #t (void? (if #f #f))))
 
+(test-group "proj"
+  (test 1 ((proj 0) 1 2 3))
+  (test 2 ((proj 1) 1 2 3))
+  (test 3 ((proj 2) 1 2 3))
+  (test-error ((proj 4) 1 2 3)))
+
 (test-exit)