summary refs log tree commit diff
path: root/tests
diff options
context:
space:
mode:
Diffstat (limited to 'tests')
-rw-r--r--tests/test.mew5
1 files changed, 5 insertions, 0 deletions
diff --git a/tests/test.mew b/tests/test.mew
index 9220312..904059d 100644
--- a/tests/test.mew
+++ b/tests/test.mew
@@ -478,6 +478,11 @@
   (test 43 (=> '(6 7) (op apply * _) inc))
   (test 42 (=> 42)))
 
+(test-group "=>*"
+  (test 42 (=>* (values 6 7) * dec inc))
+  (test '(6 7) (receive (=>* (values 6 7))))
+  (test '(7 6) (receive (=>* (values 6 7) (proj 1 0)))))
+
 (test-group "set=>"
   (test 42 (seq
              (def x 40)