diff options
author | David Thompson <dthompson2@worcester.edu> | 2013-11-03 20:10:45 -0500 |
---|---|---|
committer | David Thompson <dthompson2@worcester.edu> | 2013-11-03 20:10:45 -0500 |
commit | e72cbea929a975ef64f1b043ed7913cf3daa6c20 (patch) | |
tree | 53b991adc23b534f3023e9be3ccd23534ab2ad0a | |
parent | 777e31518c8ae52e9e15867fb60c958fa7a15610 (diff) |
Add set-stage-scene!
-rw-r--r-- | 2d/stage.scm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/2d/stage.scm b/2d/stage.scm index bf966ab..29a9445 100644 --- a/2d/stage.scm +++ b/2d/stage.scm @@ -31,6 +31,7 @@ stage-observer stage-env stage-scene + set-stage-scene! enter-stage exit-stage draw-stage @@ -49,7 +50,7 @@ (%make-stage agenda scene state) stage? (agenda stage-agenda) - (scene stage-scene) + (scene stage-scene set-stage-scene!) (state stage-state)) (define (make-stage scene) |