diff options
author | David Thompson <dthompson2@worcester.edu> | 2014-02-06 20:49:28 -0500 |
---|---|---|
committer | David Thompson <dthompson2@worcester.edu> | 2014-02-06 20:49:28 -0500 |
commit | 21ff408c45685afacd3c0fffb3f81c46e9b00874 (patch) | |
tree | 11d3575ae00255a1319273ece6d94040d31795dc /2d/sprite.scm | |
parent | c83760250f25373cd5f66ca096b5a762da82d072 (diff) |
Remove dynamic scoping of agendas.
* 2d/agenda.scm: (*global-agenda*, current-agenda, with-agenda): Delete.
(agenda?, agenda-time): Export.
(schedule-every, schedule-each): Rename schedule-every to
schedule-each.
(schedule-next): Delete.
* 2d/game.scm: (game-agenda): New variable.
(update): Tick game-agenda.
* 2d/repl.scm: Use new agenda API.
* 2d/sprite.scm: Use new agenda API.
* 2d/time.scm: (time-every, time-each, time-delay): Change signature and
use new agenda API.
* examples/coroutine.scm: Use new agenda API.
* examples/particles.scm: Use new agenda API.
Diffstat (limited to '2d/sprite.scm')
-rw-r--r-- | 2d/sprite.scm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/2d/sprite.scm b/2d/sprite.scm index a0f13bf..2d6cca0 100644 --- a/2d/sprite.scm +++ b/2d/sprite.scm @@ -31,6 +31,7 @@ #:use-module (2d agenda) #:use-module (2d animation) #:use-module (2d color) + #:use-module (2d game) #:use-module (2d helpers) #:use-module (2d math) #:use-module (2d signals) @@ -302,7 +303,7 @@ currently bound." (hash-clear! animated-sprites)) ;; Update animated sprites upon every update. -(schedule-every update-animated-sprites!) +(schedule-each game-agenda update-animated-sprites!) (export make-sprite sprite? |