(define xtmdoc-all-doc-alists
(lambda (include-nativefuncs?)
(let* ((closure-alists
(map (lambda (data) (xtmdoc-closure-handler (string->symbol (car data))))
*impc:ti:closure-cache*))
(all-doc-alists
(append
(map (lambda (data) (xtmdoc-builtin-handler (string->symbol (car data)))) *impc:ti:builtin-cache*)
(map (lambda (data) (xtmdoc-typealias-handler (string->symbol (car data)))) *impc:ti:typealias-cache*)
(map (lambda (data) (xtmdoc-generictype-handler (car data))) *impc:ti:generictype-cache*)
(map (lambda (data) (xtmdoc-genericfunc-handler (car data))) *impc:ti:genericfunc-cache*)