justin/loop
1
0
Fork 0
Code Issues Pull Requests 1 Packages Projects Releases Wiki Activity

Cleanup

Browse Source
This commit is contained in:
justin
2026-06-04 09:58:21 +01:00
parent 03f83fc924
commit b979d92db6
1 changed files with 3 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/Loop.hs
+3 -3
View File
@@ -28,7 +28,7 @@ import Data.Foldable
-- | Create a game loop with an SDL window. -- | Create a game loop with an SDL window.
setupLoop :: setupLoop ::
-- | Target seconds per frame -- | Target mseconds per frame
Int -> Int ->
-- | Window title -- | Window title
T.Text -> T.Text ->
@@ -101,7 +101,7 @@ applyEventIO fn mw e = case eventPayload e of
-- | Create a game loop with an SDL window. -- | Create a game loop with an SDL window.
setupConLoop :: setupConLoop ::
-- | Target seconds per frame -- | Target mseconds per frame
Int -> Int ->
-- | Window title -- | Window title
T.Text -> T.Text ->
@@ -191,7 +191,7 @@ doConLoop themvar spf window coneffs worldSideEffects eventFn !startWorld = go s
-- | Create a game loop with an SDL window. -- | Create a game loop with an SDL window.
setupConLoop' :: setupConLoop' ::
-- | Target seconds per frame -- | Target mseconds per frame
Int -> Int ->
-- | Window title -- | Window title
T.Text -> T.Text ->