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