pattern-procedure?   scheme


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

Implementation

;; @ignore
;; True if c{obj} is a procedure that dispatches
;; based on argument patterns, false otherwise.
(define (pattern-procedure? obj)
  (note:get obj 'is-pattern-procedure #f))


Back to Index