diff --git a/src/Classes/Physics/Collectable.hs b/src/Classes/Physics/Collectable.hs index b12585d..bae864f 100644 --- a/src/Classes/Physics/Collectable.hs +++ b/src/Classes/Physics/Collectable.hs @@ -1,5 +1,7 @@ module Classes.Physics.Collectable where +import Classes.Physics.Collidible (Collidible) + -- | All kinds of Effects present in the game data Effect = HealthUp diff --git a/src/Types/Tangible.hs b/src/Types/Tangible.hs index 76db1af..add6bbe 100644 --- a/src/Types/Tangible.hs +++ b/src/Types/Tangible.hs @@ -1,4 +1,6 @@ {-# LANGUAGE ExistentialQuantification #-} module Types.Tangible where +import Classes.Physics.Collectable (Collectable) + data Tangible = forall a . Collectable a => Tangible a