diff options
Diffstat (limited to 'tests/test.mew')
-rw-r--r-- | tests/test.mew | 6 |
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) |