diff options
Diffstat (limited to 'tests/011/patmatch.tl')
| -rw-r--r-- | tests/011/patmatch.tl | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/tests/011/patmatch.tl b/tests/011/patmatch.tl index 09d294a8..da2f8de4 100644 --- a/tests/011/patmatch.tl +++ b/tests/011/patmatch.tl @@ -526,3 +526,8 @@ (eval-only (compile-file (base-name *load-path*) "temp.tlo") (remove-path "temp.tlo"))) + +(mtest + (match @`foo-@a` "foo-abc" a) "abc" + (match ^(,`foo-@a`) '("foo-abc") a) "abc" + (match ^#J[~`foo-@a`] #("foo-abc") a) "abc") |