From b979d92db63a05478a5f44442baac8c6c8acf322 Mon Sep 17 00:00:00 2001
From: justin <justin.g.kruger@gmail.com>
Date: Thu, 4 Jun 2026 09:58:21 +0100
Subject: [PATCH] Cleanup

---
 src/Loop.hs | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/src/Loop.hs b/src/Loop.hs
index a3713ec52..43d7cdcd4 100644
--- a/src/Loop.hs
+++ b/src/Loop.hs
@@ -28,7 +28,7 @@ import Data.Foldable
  
 -- | Create a game loop with an SDL window.
 setupLoop ::
-    -- | Target seconds per frame
+    -- | Target mseconds per frame
     Int ->
     -- | Window title
     T.Text ->
@@ -101,7 +101,7 @@ applyEventIO fn mw e = case eventPayload e of
 
 -- | Create a game loop with an SDL window.
 setupConLoop ::
-    -- | Target seconds per frame
+    -- | Target mseconds per frame
     Int ->
     -- | Window title
     T.Text ->
@@ -191,7 +191,7 @@ doConLoop themvar spf window coneffs worldSideEffects eventFn !startWorld = go s
 
 -- | Create a game loop with an SDL window.
 setupConLoop' ::
-    -- | Target seconds per frame
+    -- | Target mseconds per frame
     Int ->
     -- | Window title
     T.Text ->