diff options
author | Leah Neukirchen <leah@vuxu.org> | 2022-12-07 01:49:46 +0100 |
---|---|---|
committer | Leah Neukirchen <leah@vuxu.org> | 2022-12-07 01:49:46 +0100 |
commit | 9142bb19726b62492e2f4c6ecb8bc7a5fe9b712f (patch) | |
tree | d09b55680b5056a7fc4513e22a179fba10a3486b /tests | |
parent | bf2318462d7024050635fd4620e207d6d5a7281d (diff) | |
download | mew-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.mew | 1 |
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=>" |