Remove unused datatype

This commit is contained in:
2026-04-01 19:06:56 +01:00
parent a7ff096d30
commit cf912279d6
6 changed files with 9 additions and 25 deletions
+1 -21
View File
@@ -35,21 +35,6 @@ data CrMvType
}
deriving (Eq, Ord, Show, Read) --Generic, Flat)
data HumanoidAI
= ChaseAI
| InanimateAI
| SpreadGunAI
| PistolAI
| LtAutoAI
| LauncherAI
| SwarmAI
| AutoAI
| FlockArmourChaseAI
| MiniGunAI
| LongAI
| MultGunAI
deriving (Eq, Ord, Show, Read) --Generic, Flat)
data Pulse = PulseStatus
{ _pulseRate :: Int
, _pulseProgress :: Int
@@ -67,6 +52,7 @@ data CreatureType
, _avPosture :: AvatarPosture
}
| ChaseCrit {_meleeCooldown :: Int}
| HoverCrit
| SwarmCrit
| AutoCrit
| BarrelCrit {_barrelType :: BarrelType}
@@ -79,7 +65,6 @@ data CreatureShape
{ _skinHead :: Color
, _skinUpper :: Color
, _skinLower :: Color
, _humanoidAI :: HumanoidAI
}
| Barreloid
| NonDrawnCreature
@@ -99,12 +84,7 @@ makeLenses ''CrMvType
makeLenses ''CreatureType
makeLenses ''CreatureShape
deriveJSON defaultOptions ''Pulse
--deriveJSON defaultOptions ''CreatureStatistics
deriveJSON defaultOptions ''Vocalization
--deriveJSON defaultOptions ''CrMvType
deriveJSON defaultOptions ''HumanoidAI
deriveJSON defaultOptions ''BarrelType
deriveJSON defaultOptions ''AvatarPosture
deriveJSON defaultOptions ''CreatureType