summaryrefslogtreecommitdiff
path: root/examples
diff options
context:
space:
mode:
Diffstat (limited to 'examples')
-rw-r--r--examples/common.scm8
1 files changed, 4 insertions, 4 deletions
diff --git a/examples/common.scm b/examples/common.scm
index 0c54447..44dbd07 100644
--- a/examples/common.scm
+++ b/examples/common.scm
@@ -24,9 +24,9 @@
(add-hook! window-close-hook stop-game-loop)
-(schedule-interval
- (lambda ()
- (format #t "FPS: ~d\n" (signal-ref fps)))
- 60)
+(define (display-fps fps)
+ (format #t "FPS: ~d\n" fps))
+
+(add-signal-hook! fps display-fps)
;; (start-sly-repl)