cairo-animation   scheme


Defined in:  https://github.com/digego/extempore/tree/v0.8.9/examples/contrib/drawing.xtm

Implementation

;; standard callback
(define cairo-animation
  (lambda (beat dur)
    (gl_draw)
    (gl:swap-buffers ctx)
    (callback (*metro* (+ beat (* .5 dur))) 'cairo-animation (+ beat dur) dur)))


Back to Index