impc:ti:get-closure-body   scheme


Defined in:  https://github.com/digego/extempore/tree/v0.8.9/runtime/llvmti.xtm

Implementation

(define impc:ti:get-closure-body
  (lambda (closure-name)
    (let ((closure-data (assoc-strcmp closure-name *impc:ti:closure-cache*)))
      (if closure-data (vector-ref (cdr closure-data) 3) #f))))


Back to Index