(bind-func pa_initialize (lambda () (if (<> (Pa_Initialize) paNoError) (println "Error initialising Portaudio") (println "Portaudio successfully initialised."))))