more verbose messages from engine on startup

This commit is contained in:
nek0 2020-12-05 14:28:57 +01:00
parent a9165b852a
commit 5aaa2dd41b

View file

@ -99,9 +99,10 @@ withAffection AffectionConfig{..} = do
(_, _) <- runStateT
(A.runState
(do
liftIO $ logIO Debug "Starting Loop"
liftIO $ logIO Debug "Running Pre-Loop stage"
-- run preLoop function from Affectionate
preLoop gameData
liftIO $ logIO Debug "Starting Loop"
whileM_ (hasNextStep gameData)
(do
-- get state