diff options
| -rw-r--r-- | doc/api/init.texi | 2 | ||||
| -rwxr-xr-x | examples/2048/2048.scm | 2 | ||||
| -rw-r--r-- | examples/animation.scm | 2 | ||||
| -rw-r--r-- | examples/font.scm | 2 | ||||
| -rw-r--r-- | examples/joystick.scm | 2 | ||||
| -rw-r--r-- | examples/mines/mines.scm | 2 | ||||
| -rw-r--r-- | examples/simple.scm | 2 | ||||
| -rw-r--r-- | examples/tilemap.scm | 2 | ||||
| -rw-r--r-- | sandbox.in | 2 | ||||
| -rw-r--r-- | sly/game.scm | 4 |
10 files changed, 11 insertions, 11 deletions
diff --git a/doc/api/init.texi b/doc/api/init.texi index 8312c5e..14eff4b 100644 --- a/doc/api/init.texi +++ b/doc/api/init.texi @@ -104,7 +104,7 @@ This hook is run every time the game loop catches an error. Procedures added to this hook should accept no arguments. @end defvr -@deffn {Scheme Procedure} start-game-loop [@var{#:frame-rate}] [@var{#:tick-rate}] [@var{#:max-ticks-per-frame}] +@deffn {Scheme Procedure} run-game-loop [@var{#:frame-rate}] [@var{#:tick-rate}] [@var{#:max-ticks-per-frame}] Start the game loop. @code{frame-rate} specifies the optimal number of frames to draw per second. @code{tick-rate} specifies the optimal game logic updates per second. Both @code{frame-rate} and diff --git a/examples/2048/2048.scm b/examples/2048/2048.scm index 6027866..043835b 100755 --- a/examples/2048/2048.scm +++ b/examples/2048/2048.scm @@ -446,7 +446,7 @@ (add-hook! window-close-hook stop-game-loop) (with-window (make-window #:title "2048") - (start-game-loop 2048-scene)) + (run-game-loop 2048-scene)) ;;; Local Variables: ;;; compile-command: "../../pre-inst-env guile 2048.scm" diff --git a/examples/animation.scm b/examples/animation.scm index 0a72068..5dc9166 100644 --- a/examples/animation.scm +++ b/examples/animation.scm @@ -55,7 +55,7 @@ (make-scene camera model)))) (with-window (make-window #:title "Animation") - (start-game-loop scene)) + (run-game-loop scene)) ;;; Local Variables: ;;; compile-command: "../pre-inst-env guile animation.scm" diff --git a/examples/font.scm b/examples/font.scm index 47e4153..4ce76e3 100644 --- a/examples/font.scm +++ b/examples/font.scm @@ -57,7 +57,7 @@ (signal-map (lambda (model) (make-scene camera model)) model)) (with-window (make-window #:title "Fonts") - (start-game-loop scene)) + (run-game-loop scene)) ;;; Local Variables: ;;; compile-command: "../pre-inst-env guile font.scm" diff --git a/examples/joystick.scm b/examples/joystick.scm index 43484e3..a191de5 100644 --- a/examples/joystick.scm +++ b/examples/joystick.scm @@ -91,7 +91,7 @@ (with-window (make-window #:title "Joystick test" #:resolution resolution) - (start-game-loop scene)) + (run-game-loop scene)) ;;; Local Variables: ;;; compile-command: "../pre-inst-env guile joystick.scm" diff --git a/examples/mines/mines.scm b/examples/mines/mines.scm index f030e51..3a9ee7d 100644 --- a/examples/mines/mines.scm +++ b/examples/mines/mines.scm @@ -409,7 +409,7 @@ (add-hook! window-close-hook stop-game-loop) (with-window (make-window #:title "Mines" #:resolution resolution) - (start-game-loop scene)) + (run-game-loop scene)) ;;; Local Variables: ;;; compile-command: "../../pre-inst-env guile mines.scm" diff --git a/examples/simple.scm b/examples/simple.scm index f9b0082..e4de293 100644 --- a/examples/simple.scm +++ b/examples/simple.scm @@ -37,7 +37,7 @@ (define-signal scene (make-scene camera model)) (with-window (make-window #:title "Simple Sprite Demo") - (start-game-loop scene)) + (run-game-loop scene)) ;;; Local Variables: ;;; compile-command: "../pre-inst-env guile simple.scm" diff --git a/examples/tilemap.scm b/examples/tilemap.scm index 089946e..7c32b11 100644 --- a/examples/tilemap.scm +++ b/examples/tilemap.scm @@ -102,7 +102,7 @@ (define-signal scene (make-scene camera model)) (with-window (make-window #:title "Tilemap") - (start-game-loop scene)) + (run-game-loop scene)) ;;; Local Variables: ;;; compile-command: "../pre-inst-env guile tilemap.scm" @@ -59,7 +59,7 @@ (add-hook! draw-hook (trampoline draw-scene)) (with-window (make-window #:title "Sly Sandbox") - (start-game-loop)) + (run-game-loop)) (display "Bye!\n") diff --git a/sly/game.scm b/sly/game.scm index 5d3f708..b836c22 100644 --- a/sly/game.scm +++ b/sly/game.scm @@ -38,7 +38,7 @@ #:use-module (sly render scene) #:export (draw-hook after-game-loop-error-hook - start-game-loop + run-game-loop stop-game-loop)) ;;; @@ -62,7 +62,7 @@ for the given STACK and error KEY with additional arguments ARGS." (apply display-error (stack-ref stack 0) cep args) (newline cep))) -(define* (start-game-loop scene #:key +(define* (run-game-loop scene #:key (frame-rate 60) (tick-rate 60) (max-ticks-per-frame 4)) |