Using Patterns with Wildcards
> (match4 '(a (? x)) '(a y))
((X . Y) (:YES . :YES))
> (match4 '(a (? x) (? y)) '(a (1 2)(3 4)))
((X 1 2) (Y 3 4) (:YES . :YES))
Previous slide
Next slide
Back to first slide
View graphic version