 
 (defn- server-clock-reset-tick-b
   []
-  (control-bus-set-range! server-clock-tick-b [0 0]))
+  (control-bus-set-range! server-clock-b [0 0]))
 
 (defn- server-clock-start
   []


;; should only be modified by a 'singleton' wall-clock synth
;; global shared state FTW!
(defonce server-clock-tick-b (control-bus 2 "Server Clock Buses"))

;; Only one of these should ever be created...
(defonce __SERVER-CLOCK-SYNTH__

   See server-clock-uptime and server-clock-time for functions that
   return time in milliseconds."
  []
  (let [[b-t s-t] (control-bus-get-range server-clock-b 2)]
    (+ (* b-t defaults/SC-MAX-FLOAT-VAL)
       s-t)))

