aboutsummaryrefslogtreecommitdiff
path: root/src/Chelleport.hs
diff options
context:
space:
mode:
authorAkshay Nair <phenax5@gmail.com>2024-12-31 11:43:49 +0530
committerAkshay Nair <phenax5@gmail.com>2025-01-01 11:51:46 +0530
commit5262d942c4c2c36529fbe704e7de165044e6dc99 (patch)
tree9fb782f19e564bdc9c7ab6852238e12a6b6f85f3 /src/Chelleport.hs
parent2f35bbd272d7b1414003bf437cc6ad675fe81400 (diff)
downloadchelleport-5262d942c4c2c36529fbe704e7de165044e6dc99.tar.gz
chelleport-5262d942c4c2c36529fbe704e7de165044e6dc99.zip
Add timing measurement for each section of screen
Diffstat (limited to '')
-rw-r--r--src/Chelleport.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Chelleport.hs b/src/Chelleport.hs
index 8cc02c7..6486b4a 100644
--- a/src/Chelleport.hs
+++ b/src/Chelleport.hs
@@ -24,7 +24,7 @@ run config = do
runAppWithCtx :: (MonadIO m) => DrawContext -> AppM m x -> m x
runAppWithCtx ctx = (`runReaderT` ctx) . runAppM
--- TODO: Make event handling independent of state
+-- TODO: Make event handling independent of state?
eventHandler :: State -> SDL.Event -> Maybe AppAction
eventHandler state event =
case SDL.eventPayload event of