summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorDavid Thompson <dthompson@vistahigherlearning.com>2020-12-15 20:02:42 -0500
committerDavid Thompson <dthompson@vistahigherlearning.com>2020-12-15 20:02:42 -0500
commit8ffb4e17e9912f25b9b79c497fb1f64a1faa205c (patch)
treee46679edd84458431a6902da131040c831ba0fa6
parentc70443c83a5a337d082fc58e0067a5f14cfae805 (diff)
Add convenient current-scene method.
-rw-r--r--starling/kernel.scm3
1 files changed, 3 insertions, 0 deletions
diff --git a/starling/kernel.scm b/starling/kernel.scm
index 52d7adb..742a183 100644
--- a/starling/kernel.scm
+++ b/starling/kernel.scm
@@ -380,6 +380,9 @@
(sdl2:delete-gl-context! (gl-context kernel))
(sdl2:close-window! (window kernel))))))
+(define-method (current-scene)
+ (current-scene (current-kernel)))
+
(define (reboot-current-scene)
"Reboot the currently active scene being managed by the game engine
kernel. A convenient procedure for developers."