Cleanup

2022-07-19 14:26:10 +01:00
parent 0a7922ec5e
commit 8ee4d2e0f2
6 changed files with 68 additions and 78 deletions
@@ -562,16 +562,6 @@ data Particle
        , _ptPoints :: [Point2]
        , _ptColor  :: Color
        }
-    | PtStaticBall  
-        { _ptUpdate :: World -> Particle -> (World, Maybe Particle)
-        , _ptVel    :: Point2
-        , _ptColor  :: Color
-        , _ptPos :: Point2
-        , _ptWidth :: Float 
-        , _ptTimer :: Int
-        , _ptHitEff :: HitEffect
-        , _ptZ :: Float
-        }
    | Shockwave
        { _ptUpdate     :: World -> Particle -> (World, Maybe Particle)
        , _ptColor      :: Color