aboutsummaryrefslogtreecommitdiff
path: root/src/HSVIS/Diagnostic.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/HSVIS/Diagnostic.hs')
-rw-r--r--src/HSVIS/Diagnostic.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/HSVIS/Diagnostic.hs b/src/HSVIS/Diagnostic.hs
index 116e4cd..2794461 100644
--- a/src/HSVIS/Diagnostic.hs
+++ b/src/HSVIS/Diagnostic.hs
@@ -16,7 +16,7 @@ instance Pretty Pos where
-- | Inclusive-exclusive range of positions in a file.
data Range = Range Pos Pos
- deriving (Show)
+ deriving (Show, Eq, Ord)
instance Semigroup Range where
Range a b <> Range c d = Range (min a c) (max b d)