summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--sly/game.scm2
1 files changed, 1 insertions, 1 deletions
diff --git a/sly/game.scm b/sly/game.scm
index 722bfc0..6e82b78 100644
--- a/sly/game.scm
+++ b/sly/game.scm
@@ -97,6 +97,7 @@ unused accumulator time."
(cond ((>= ticks max-ticks-per-frame)
lag)
((>= lag tick-interval)
+ (process-events)
(agenda-tick!)
(iter (- lag tick-interval) (1+ ticks)))
(else
@@ -124,7 +125,6 @@ time in the game tick accumulator."
(dt (- current-time previous-time)))
(catch #t
(lambda ()
- (process-events)
(let ((lag (update (+ lag dt))))
(draw dt (alpha lag))
(frame-sleep current-time)