more verbose messages from engine on startup

This commit is contained in:
nek0 2020-12-05 14:28:57 +01:00
parent cd662da0b7
commit ccd8b7eeaf

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