Cleanup, trying to diagnose space leak in crit update

This commit is contained in:
2021-12-09 22:12:44 +00:00
parent bd94044445
commit 3c35a04531
23 changed files with 203 additions and 178 deletions
+2 -5
View File
@@ -3,6 +3,7 @@
-}
module Dodge.Creature.Action
( performActionsR
, performActions
, stripNoItems
, setMinInvSize
, dropUnselected
@@ -91,11 +92,7 @@ performTurnToA cr p
{- | Performing an action means that a creature has some impulses for a frame, and
updates or deletes the action itself.
-- doAction -}
performAction
:: Creature
-> World
-> Action
-> OutAction
performAction :: Creature -> World -> Action -> OutAction
performAction cr w ac = case ac of
AimAt tcid p -> performAimAt cr w tcid p
WaitThen 0 newAc -> ([] , Just newAc)