diff options
Diffstat (limited to 'tests/012')
-rw-r--r-- | tests/012/seq.tl | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/tests/012/seq.tl b/tests/012/seq.tl index 148f1899..5d63fbf5 100644 --- a/tests/012/seq.tl +++ b/tests/012/seq.tl @@ -1617,3 +1617,7 @@ (seq-like "" #\a #\b 3) (#\a #\b 3) (seq-like #() 1 2 3) #(1 2 3) (seq-like #b'' 1 2 3) #b'010203') + +(mtest + [keep-if (lop find "aiueo") "vertebrate" : chr-toupper] "EEAE" + [remove-if (lop find "aiueo") "vertebrate" : chr-toupper] "VRTBRT") |