impc:ir:get-arity-from-pretty-closure   scheme


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

Implementation

(define impc:ir:get-arity-from-pretty-closure
  (lambda (pretty-str)
    (let ((arg-strings (impc:ir:get-pretty-closure-arg-strings pretty-str)))
      (if (list? arg-strings)
          (- (length arg-strings) 1)
          #f))))


Back to Index