[Chicken-janitors] #1333: match from matchable doesn't handle keywords properly

[Chicken Trac]

#1333: match from matchable doesn't handle keywords properly
-----------------------------+--------------------------------
 Reporter:  xificurC         |                 Owner:
     Type:  defect           |                Status:  new
 Priority:  major            |             Milestone:  someday
Component:  extensions       |               Version:  4.11.0
 Keywords:  match matchable  |  Estimated difficulty:  easy
-----------------------------+--------------------------------
 `(match '(#:key 1) [(#:foo x) x])` matches and returns `1`, whereas I
 would expect keywords to be self evaluating and therefore throw a match
 error.

 And this throws a match error, not sure why: `(match '(#:key #:key)
 [(#:foo #:foo) "here"])`. Again the expected behavior would be a match
 error.

 As a last example: `(match '(#:key) [(#:foo) 1] [(#:key) 2])` should
 return `2` but returns `1`.

--
Ticket URL: <https://bugs.call-cc.org/ticket/1333>
CHICKEN Scheme <https://www.call-cc.org/>
CHICKEN Scheme is a compiler for the Scheme programming language.