subst   macro


Defined in:  https://github.com/digego/extempore/tree/v0.8.9/libs/contrib/cas.xtm

Implementation

;; substitution
(define-macro (subst e . args)
  (if (list? e)
      (list 'quote (apply scmcas 'subst e args))
      (list 'quote (apply scmcas 'subst (eval e) args))))


Back to Index

Similar Entries