 ;	float - peak percent CPU usage for signal processing
 ;	double - nominal sample rate
 ;	double - actual sample rate
-(defn status 
+(defn status
   "Check the status of the audio server."
   []
   (if (= @status* :booted)
-    (do 
+    (do
       (snd "/status")
       (let [sts (recv "status.reply" REPLY-TIMEOUT)]
         (log/debug "got status: " (:args sts))

      (Thread/sleep 250))
    (.destroy proc)))

(defn boot-external 
  "Boot the audio server in an external process and tell it to listen on a 
  specific port."
  ([host port]
   (if (not @running?*)

       (connect :internal)
       :booting))))

(defn- sc-log
  "Pull audio server log data from a pipe and store for later printing."
  [stream read-buf]
  (while (pos? (.available stream))
