Start simplifying projectile update
This commit is contained in:
@@ -4,14 +4,12 @@ import Control.Lens
|
||||
import Data.Foldable
|
||||
import Dodge.Data.World
|
||||
import Dodge.PrWdLsLs
|
||||
import Dodge.Prop.Moving
|
||||
--import Dodge.Prop.Moving
|
||||
import Dodge.WdP2f
|
||||
import Dodge.WorldBool
|
||||
|
||||
updateProp :: Prop -> World -> World
|
||||
updateProp pr = case _prUpdate pr of
|
||||
PropFallSmallBounceDamage -> fallSmallBounceDamage pr
|
||||
PropFallSmallBounce -> fallSmallBounce pr
|
||||
PropUpdateId -> id
|
||||
PropRotate x -> rotateProp x pr
|
||||
PropSetToggleAnd wb pu -> propSetToggleAnd wb pu pr
|
||||
|
||||
Reference in New Issue
Block a user