From d0ff41fb7a33c096a792ab57f5bbf7992b1cc399 Mon Sep 17 00:00:00 2001
From: David Thompson <dthompson2@worcester.edu>
Date: Sun, 4 May 2014 14:03:00 -0400
Subject: Add current-agenda parameter.

* 2d/agenda.scm (current-agenda): New variable.
  (with-agenda): New macro.
  (agenda-time, tick-agenda!, clear-agenda!, schedule)
  (schedule-interval, schedule-each, wait): Remove agenda parameter.

* 2d/game.scm (game-agenda): Delete it.
  (update): Tick current agenda.

* 2d/helpers.scm (define-guardian): Remove agenda argument.

* 2d/repl.scm (start-2d-repl): Remove agenda argument to schedule-each.

* 2d/signal.scm (signal-sample, signal-delay, signal-throttle): Remove
  agenda parameter.

* 2d/sprite.scm:
* examples/common.scm:
* examples/coroutine.scm:
* examples/font.scm:
* examples/particles.scm: Remove mention of game-agenda.

* README.org: Update example snippets.
---
 examples/common.scm | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

(limited to 'examples/common.scm')

diff --git a/examples/common.scm b/examples/common.scm
index 0acb6c2..62ddd14 100644
--- a/examples/common.scm
+++ b/examples/common.scm
@@ -33,9 +33,9 @@
 
 (add-hook! window-close-hook stop-game-loop)
 
-(schedule-interval game-agenda
-                   (lambda ()
-                     (format #t "FPS: ~d\n" (signal-ref fps)))
-                   60)
+(schedule-interval
+ (lambda ()
+   (format #t "FPS: ~d\n" (signal-ref fps)))
+ 60)
 
 (start-2d-repl)
-- 
cgit v1.2.3