Cleanup code, speed up radar sweeps

2024-12-18 15:57:37 +00:00
parent 86d884ba01
commit 9bc9dd2a08
5 changed files with 10 additions and 21 deletions
@@ -1,12 +0,0 @@
-module Dodge.Item.Weapon.Radar (
-    detectorEffect,
-) where
-
-import Dodge.Data.World
-import Dodge.RadarSweep
-
-detectorEffect :: Detector -> Item -> Creature -> World -> World
-detectorEffect dt = case dt of
-    ITEMDETECTOR -> const (aRadarPulse ObItem)
-    CREATUREDETECTOR -> const (aRadarPulse ObCreature)
-    WALLDETECTOR -> const (aRadarPulse ObWall)