diff options
| -rw-r--r-- | 2d/agenda.scm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/2d/agenda.scm b/2d/agenda.scm index bf86f22..4b28c16 100644 --- a/2d/agenda.scm +++ b/2d/agenda.scm @@ -53,7 +53,7 @@ (queue segment-queue)) (define (make-time-segment time . callbacks) - "Create a new time segment at TIME and enqueus everything in the + "Create a new time segment at TIME and enqueues everything in the list CALLBACKS." (let ((segment (%make-time-segment time (make-q)))) ;; Enqueue all callbacks @@ -207,6 +207,6 @@ tick." (%clear-agenda (current-agenda))) (define* (wait #:optional (delay 1)) - "Yield coroutine and schdule the continuation to be run after DELAY -ticks." + "Yield coroutine and schedule the continuation to be run after DELAY +ticks. DELAY is 1 by default." (yield (cut schedule <> delay))) |