[MATCH-61] Exception thrown when matching using :seq when there is a seq call in the tail of the occurrences

Wed, 19 Jun 2013 17:59:19 -0500

The following match throws:

(let [q '(a) y '(b) z '(c)]
(match [q (seq y) z]
  [([_] :seq) _ _] 'a
  [_ _ _] 'b))

Looking at the macro expansion there's something clearly wrong simply with the fact that the seq expression occurs in multiple places instead of just at the beginning of the macro expansion.

Clojure JIRA

[MATCH-61] Exception thrown when matching using :seq when there is a seq call in the tail of the occurrences