Removed unnecessary typeclasses.
authorsabadev <saba@sabadev.xyz>
Mon, 1 Feb 2021 02:54:04 +0000 (21:54 -0500)
committersabadev <saba@sabadev.xyz>
Mon, 1 Feb 2021 02:54:04 +0000 (21:54 -0500)
src/Game.hs

index c9640fb..a0726c7 100644 (file)
@@ -9,9 +9,9 @@ import qualified Terminal.Game as G
 
 type RandomState = S.State G.StdGen
 
-data Screen = TitleScreen | HelpScreen | GameScreen deriving (Eq)
+data Screen = TitleScreen | HelpScreen | GameScreen
 
-data Direction = U | D | L | R deriving (Eq, Bounded, Enum)
+data Direction = U | D | L | R deriving (Bounded, Enum)
 
 instance Random Direction where
   random g = randomR (minBound, maxBound) g