(define impc:ir:genericfunc-stringify-generic-arg-strings
(lambda (args)
(string-join (map (lambda (a)
(if (null? a)
"_"
(let ((r (impc:ir:pptype a)))
(if (null? r)
"_"
r))))
args) ",")))