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