(define impc:ti:print-polytype-cache (lambda () (println '*impc:ti:polytype-cache*: *impc:ti:polytype-cache*)))