From f5424bdb870afc969bf23231123602ea3dbde8a6 Mon Sep 17 00:00:00 2001 From: Leah Neukirchen Date: Mon, 7 Nov 2022 22:10:14 +0100 Subject: add proj --- tests/test.mew | 6 ++++++ 1 file changed, 6 insertions(+) (limited to 'tests/test.mew') 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) -- cgit 1.4.1