(bind-func PaHostErrorInfo_toString
"specialised toString function for PaHostErrorInfo*"
(lambda (errinfo:PaHostErrorInfo*)
(let ((str:i8* (salloc 256)))
(if (null? errinfo)
(sprintf str "<PaHostErrorInfo 0x0>")
(sprintf str "<PaHostErrorInfo %p
type: %d
error code: %ld
message: %s>"
errinfo
(tref errinfo 0)
(tref errinfo 1)
(tref errinfo 2)))
(Str str))))