commit bc8cbc6ed5e7396cc99741937269204d0aff7c27
parent a86505a64b31abe05d57c295fb6de2cb9ffa9eeb
Author: Francesco Ariis <fa-ml@ariis.it>
Date: Thu, 22 Dec 2022 13:58:56 +0100
Remove unuseful Ord instance
Diffstat:
1 file changed, 2 insertions(+), 5 deletions(-)
diff --git a/src/Terminal/Game/Plane.hs b/src/Terminal/Game/Plane.hs
@@ -44,15 +44,12 @@ type Reversed = Bool
data ColorInfo = ANSIColorInfo (CA.Color, CA.ColorIntensity)
| RGBColorInfo (Colour Float)
| PaletteColorInfo Word8
- deriving (Show, Eq, Ord)
-
-instance Eq a => Ord (Colour a) where
- compare _ _ = EQ
+ deriving (Show, Eq)
-- can be an ASCIIChar or a special, transparent character
data Cell = CellChar Char Bold Reversed (Maybe ColorInfo)
| Transparent
- deriving (Show, Eq, Ord, G.Generic)
+ deriving (Show, Eq, G.Generic)
-- I found no meaningful speed improvements by making this
-- only w/ 1 constructor.