Start moving creature properties out of records

2025-06-06 08:46:27 +01:00
parent bae75a1e60
commit 4ae7c6ebd6
32 changed files with 609 additions and 672 deletions
@@ -18,7 +18,7 @@ barrel :: Creature
 barrel =
    defaultInanimate
        { _crHP = 500
-        , _crType = Barreloid PlainBarrel
+        , _crType = BarrelCrit PlainBarrel
        , _crState =
            defaultState
                { _csSpState = Barrel []
@@ -30,7 +30,7 @@ explosiveBarrel :: Creature
 explosiveBarrel =
    defaultInanimate
        { _crHP = 400
-        , _crType = Barreloid ExplosiveBarrel
+        , _crType = BarrelCrit ExplosiveBarrel
        , _crState =
            defaultState
                { _csSpState = Barrel []