Primitive game loop with some basic scenes

[gacela.git] / gacela / scene.scm

diff --git a/gacela/scene.scm b/gacela/scene.scm
index 0cf05e430993202a45890b8ba3427cc1de968e1a..9145907347b4e505a935fbb17d2614c5d37463fc 100644 (file)
--- a/gacela/scene.scm
+++ b/gacela/scene.scm
@@ -16,6 +16,7 @@
 
 
 (define-module (gacela scene)
+  #:use-module (gacela game)
   #:use-module (srfi srfi-9)
   #:use-module (srfi srfi-9 gnu)
   #:export (make-scene
@@ -42,4 +43,5 @@
   ((scene-procedure scene)))
 
 (define (run-scene scene)
-  ((scene-procedure scene)))
+  (run-game-loop
+   (scene-procedure scene)))