(bind-func PaStreamInfo_print
  "specialised print function for PaStreamInfo*"
  (lambda (info:PaStreamInfo*)
    (if (null? info)
        (printf "<PaStreamInfo 0x0>")
        (printf "<PaStreamInfo %p
   structVersion: %d
    inputLatency: %f
   outputLatency: %f
      sampleRate: %f>"
                info
                (tref info 0)
                (convert (tref info 1) double)
                (convert (tref info 2) double)
                (convert (tref info 3) double)))
    void))