pat3   scheme


Defined in:  https://github.com/digego/extempore/tree/v0.8.9/libs/core/pattern.xtm

Implementation

(define pat3 (match '(?symbol ?list ?symbol))) ;; match 1 symbol followed by 1 list followed by 1 symbol
(println 'pat3a: (pat3 '(a (b c) d))) ;; success!
(println 'pat3b: (pat3 '(a (b . c) d))) ;; fails - pairs are not lists!


Back to Index