From 1236298b23b17937829e58a63e7d9e13059e49f8 Mon Sep 17 00:00:00 2001
From: Kaz Kylheku <kaz@kylheku.com>
Date: Tue, 19 Jan 2021 07:37:48 -0800
Subject: matcher: add another broken test case.

* tests/011/patmatch.tl: Breaking test case added. The @(some)
pattern match has the same vars misalignment problem.
---
 tests/011/patmatch.tl | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/tests/011/patmatch.tl b/tests/011/patmatch.tl
index 61b28c58..1d06b252 100644
--- a/tests/011/patmatch.tl
+++ b/tests/011/patmatch.tl
@@ -82,3 +82,5 @@
   (3 5 3 2021 (vec tor)))
 
 (test (when-match (@(and @a @b) (x . @c)) '(1 (x 2 3 4)) c) (2 3 4))
+
+(test (when-match (@(some @a) . @b) '((1 2 3) 2) (list a b)) (1 (2)))
-- 
cgit v1.2.3