From 8ffb4e17e9912f25b9b79c497fb1f64a1faa205c Mon Sep 17 00:00:00 2001 From: David Thompson Date: Tue, 15 Dec 2020 20:02:42 -0500 Subject: Add convenient current-scene method. --- starling/kernel.scm | 3 +++ 1 file changed, 3 insertions(+) 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." -- cgit v1.2.3