diff options
Diffstat (limited to '2d/game-loop.scm')
| -rw-r--r-- | 2d/game-loop.scm | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/2d/game-loop.scm b/2d/game-loop.scm index af4966f..ab81b5a 100644 --- a/2d/game-loop.scm +++ b/2d/game-loop.scm @@ -170,9 +170,13 @@ is the unused accumulator time." accumulator)) (define (time-left current-time next-time) + "Calculate the delta between NEXT-TIME and CURRENT-TIME. If +NEXT-TIME is less than CURRENT-TIME, 0 is returned." (max (floor (- next-time current-time)) 0)) (define (run-repl-thunk thunk input output error stack) + "Run THUNK with the given REPL STACK. I/O is redirected to the given +INPUT, OUTPUT, and ERROR ports." (put-mvar repl-output-mvar (with-input-from-port input |