Add squash when receiving blunt damage

2021-05-03 16:33:06 +02:00
parent 6e6757499c
commit b826299cbd
5 changed files with 32 additions and 36 deletions
@@ -12,7 +12,7 @@ data CreatureState = CrSt
    , _stance  :: Stance
    , _faction :: Faction
    , _crDamage  :: [DamageType]
-    , _crPastDamage :: Int
+    , _crPastDamage :: [[DamageType]]
    , _crSpState :: CrSpState
    , _crDropsOnDeath :: CreatureDropType
    , _crIsAnimate  :: Bool