From 168b20824536cb447f4c45f31657a5601b6d9832 Mon Sep 17 00:00:00 2001 From: David Thompson Date: Wed, 26 Jun 2013 07:56:02 -0400 Subject: Clean up run-game-loop procedure. --- 2d/game-loop.scm | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/2d/game-loop.scm b/2d/game-loop.scm index 7b36e57..d508d26 100644 --- a/2d/game-loop.scm +++ b/2d/game-loop.scm @@ -176,6 +176,6 @@ since the last tick." (define (run-game-loop) "Runs event handling, update, and render loop." - (while #t - (handle-events) - (update-and-render))) + (handle-events) + (update-and-render) + (run-game-loop)) -- cgit v1.2.3