(define impc:ti:get-polyfunc-candidate-names
(lambda (polyfunc-name)
(let ((candidates (impc:ti:get-polyfunc-candidate-list polyfunc-name)))
(and candidates
(map (lambda (func-vector) (vector-ref func-vector 0)) candidates)))))