From 18bfa25b243653ae06956e2d029a3ccbd5d3f4e8 Mon Sep 17 00:00:00 2001 From: Leah Neukirchen Date: Sun, 8 Jan 2023 16:13:38 +0100 Subject: add cr --- tests/test.mew | 6 ++++++ 1 file changed, 6 insertions(+) (limited to 'tests') diff --git a/tests/test.mew b/tests/test.mew index 837edd8..633588a 100644 --- a/tests/test.mew +++ b/tests/test.mew @@ -285,6 +285,12 @@ (test 42 ((op* * 7) 2 3)) (test 42 ((op* * 2 ... 3) 7))) +(test-group "cr" + (test '(foo) (cr '(foo))) + (test 42 (cr 42)) + (test-error (cr)) + (test-error (cr 42 43))) + (test-group "rep" (test #t (void? (rep loop ()))) (test 42 (rep loop (x 27 y 5) -- cgit 1.4.1