diff --git a/extra/game/loop/loop-docs.factor b/extra/game/loop/loop-docs.factor index 6dbef30442..c42e39e17b 100644 --- a/extra/game/loop/loop-docs.factor +++ b/extra/game/loop/loop-docs.factor @@ -26,22 +26,6 @@ $nl { } related-words -HELP: benchmark-frames-per-second -{ $values - { "loop" game-loop } - { "n" float } -} -{ $description "Returns the average number of times per second the game loop has called " { $link draw* } " on its delegate since the game loop was started with " { $link start-loop } "." } ; - -HELP: benchmark-ticks-per-second -{ $values - { "loop" game-loop } - { "n" float } -} -{ $description "Returns the average number of times per second the game loop has called " { $link tick* } " on its tick delegate since the game loop was started." } ; - -{ benchmark-frames-per-second benchmark-ticks-per-second } related-words - HELP: draw* { $values { "tick-slice" float } { "delegate" "a " { $link "game.loop-delegates" } } @@ -103,11 +87,6 @@ ARTICLE: "game.loop" "Game loops" start-loop stop-loop } -"The game loop maintains performance counters:" -{ $subsections - benchmark-frames-per-second - benchmark-ticks-per-second -} "The game loop catches errors that occur in the delegate's methods during the course of the game loop:" { $subsections game-loop-error diff --git a/extra/game/loop/loop.factor b/extra/game/loop/loop.factor index 48f9ca83ea..8fc3fc232e 100644 --- a/extra/game/loop/loop.factor +++ b/extra/game/loop/loop.factor @@ -88,12 +88,6 @@ TUPLE: game-loop-error game-loop error ; PRIVATE> -! : benchmark-ticks-per-second ( loop -- n ) - ! [ tick#>> ] [ benchmark-tick#>> - ] [ benchmark-nanos ] tri /f ; - -! : benchmark-frames-per-second ( loop -- n ) - ! [ frame#>> ] [ benchmark-frame#>> - ] [ benchmark-nanos ] tri /f ; - : (game-tick) ( loop -- ) dup running?>> [ [ MAX-FRAMES-TO-SKIP ?tick ] [ redraw ] bi ]