diff options
Diffstat (limited to 'examples/particles.scm')
| -rw-r--r-- | examples/particles.scm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/examples/particles.scm b/examples/particles.scm index 53f9d54..a71bc13 100644 --- a/examples/particles.scm +++ b/examples/particles.scm @@ -60,9 +60,9 @@ (draw-sprite sprite))) particles))) -(set-render-callback (lambda () (render))) -(set-update-callback (lambda () (update))) -(set-key-down-callback (lambda (key mod unicode) (key-down key mod unicode))) +(add-hook! on-render-hook (lambda () (render))) +(add-hook! on-update-hook (lambda () (update))) +(add-hook! on-key-down-hook (lambda (key mod unicode) (key-down key mod unicode))) (define (key-down key mod unicode) (cond ((any-equal? key 'escape 'q) |