Added tests
This commit is contained in:
parent
c7aad6e21e
commit
14ce4eb176
|
@ -58,15 +58,22 @@ prefix-anything = anything-suffix (substring 2) test
|
|||
(?(?x (?x ?x)) abc) = (abc abc) (lambda 1) test
|
||||
abc ?(?x) def = abc (lambda 2) test
|
||||
|
||||
?(?-) (Explode)
|
||||
?(?-) (op: explode)
|
||||
|
||||
(?(?* ?*) cow) = (c (o (w ()))) (explode 1) test
|
||||
(?(?* ?*) (12 34 45)) = (12 (34 (45 ()))) (explode 2) test
|
||||
(?(?* ?*) cow) = (c (o (w ()))) (explode word) test
|
||||
(?(?* ?*) (12 34 45)) = (12 (34 (45 ()))) (explode tuple) test
|
||||
(?(?* ?*) ()) = () (explode empty) test
|
||||
|
||||
?(?-) (op: join)
|
||||
|
||||
?(?^ ?^) (b (a (t ()))) = bat (join 1) test
|
||||
?(?^ ?^) (12 (34 (56 ()))) = 123456 (join 2) test
|
||||
(?(?^ ?^) ()) = () (join empty) test
|
||||
|
||||
?(?-) (op: unwrap)
|
||||
|
||||
?(?. ?.) (abcd) = abcd (unwrap 1) test
|
||||
(?(?. ?.) ()) = () (unwrap empty) test
|
||||
|
||||
?(?-) (List reversal)
|
||||
|
||||
|
|
Loading…
Reference in New Issue