summary refs log tree commit diff
path: root/tests
diff options
context:
space:
mode:
authorLeah Neukirchen <leah@vuxu.org>2022-12-07 01:49:46 +0100
committerLeah Neukirchen <leah@vuxu.org>2022-12-07 01:49:46 +0100
commit9142bb19726b62492e2f4c6ecb8bc7a5fe9b712f (patch)
treed09b55680b5056a7fc4513e22a179fba10a3486b /tests
parentbf2318462d7024050635fd4620e207d6d5a7281d (diff)
downloadmew-9142bb19726b62492e2f4c6ecb8bc7a5fe9b712f.tar.gz
mew-9142bb19726b62492e2f4c6ecb8bc7a5fe9b712f.tar.xz
mew-9142bb19726b62492e2f4c6ecb8bc7a5fe9b712f.zip
op=> only transform lists which contain _
Diffstat (limited to 'tests')
-rw-r--r--tests/test.mew1
1 files changed, 1 insertions, 0 deletions
diff --git a/tests/test.mew b/tests/test.mew
index c01bb08..589b63e 100644
--- a/tests/test.mew
+++ b/tests/test.mew
@@ -551,6 +551,7 @@
   (test 42 (op=> 40 ,(op inc _) inc))
   (test #f (op=> 40 inc even?))
   (test 43 (op=> '(6 7) (apply * _) inc))
+  (test 43 (op=> '(6 7) unlist (compose *) inc))
   (test 42 (op=> 42)))
 
 (test-group "fun=>"