clock:update-metro   scheme


Defined in:  https://github.com/digego/extempore/tree/v0.8.9/runtime/scheme.xtm

Implementation

(define clock:update-metro
   (lambda (server-process local-process)
      (clock:sync-adjust server-process local-process 5 500 .005)
      (let ((res (ipc:call server-process local-process '-clock:metro-from-host-)))
   (set! *metro* (make-metro (car res)
           (cons (clock->samples (cadr res))
           (caddr res)))))))


Back to Index

Similar Entries