Remove unused instance Ord Replacement (fixes #1829)

This commit is contained in:
Vidar Holen 2020-02-17 12:44:38 -08:00
parent 99d6df8a08
commit a75219e525
1 changed files with 0 additions and 3 deletions

View File

@ -256,9 +256,6 @@ data Replacement = Replacement {
data InsertionPoint = InsertBefore | InsertAfter
deriving (Show, Eq, Generic, NFData)
instance Ord Replacement where
compare r1 r2 = (repStartPos r1) `compare` (repStartPos r2)
newReplacement = Replacement {
repStartPos = newPosition,
repEndPos = newPosition,