Rethink damage data type, work on damage sensors

2022-03-13 09:27:35 +00:00
parent d340fd73c3
commit 06a501ff88
30 changed files with 356 additions and 240 deletions
@@ -11,8 +11,8 @@ import Control.Lens
 import qualified Data.IntSet as IS
 import qualified Data.Vector as V
 data CreatureState = CrSt 
-    { _crDamage  :: [DamageType]
-    , _crPastDamage :: V.Vector [DamageType]
+    { _crDamage  :: [Damage]
+    , _crPastDamage :: V.Vector [Damage]
    , _crSpState :: CrSpState
    , _crDropsOnDeath :: CreatureDropType
    }