diff options
| author | David Thompson <dthompson2@worcester.edu> | 2014-01-07 20:55:57 -0500 |
|---|---|---|
| committer | David Thompson <dthompson2@worcester.edu> | 2014-01-07 20:55:57 -0500 |
| commit | 97a454af3b3f9a713e14b6e1463bf300999bdcea (patch) | |
| tree | 582f1f555d919f08a2568b79500a8fc7df1dcb06 /2d | |
| parent | 993f01e6a0ee47c08dfcfd1426527b2d699b8893 (diff) | |
Update docstrings.
* 2d/agenda.scm (make-time-segment, wait): Change docstrings.
Diffstat (limited to '2d')
| -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))) |