gl-loop   scheme


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

Implementation

(define gl-loop
  (lambda (time delta-t)
    (gl_render)
    (gl:swap-buffers *gl-ctx*)
    (callback (+ time (* *second* delta-t) 0.5)
        'gl-loop
        (+ time (* *second* delta-t))
        delta-t)))


Back to Index

Similar Entries