diff options
Diffstat (limited to 'tests/011/patmatch.tl')
-rw-r--r-- | tests/011/patmatch.tl | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/tests/011/patmatch.tl b/tests/011/patmatch.tl index ac474738..c9326eda 100644 --- a/tests/011/patmatch.tl +++ b/tests/011/patmatch.tl @@ -144,3 +144,6 @@ (test (when-match #R(1 @a) 1..2 a) 2) (test (when-match #R(2 @a) 1..2 a) nil) (test (when-match #R(@a 1) 1..2 a) nil) + +(test (when-match @a..@b '1..2 (list a b)) (1 2)) +(test (when-match (rcons @a @b) '(rcons 1 2) (list a b)) (1 2)) |