1
1
mirror of https://github.com/github/semantic.git synced 2024-11-28 10:15:55 +03:00

Rename the fields.

This commit is contained in:
Rob Rix 2018-05-11 11:03:21 -04:00
parent 2a67cae8ed
commit c53c545622

View File

@ -65,7 +65,7 @@ deriving instance Eq (TypeError resume)
deriving instance Ord (TypeError resume)
deriving instance Show (TypeError resume)
instance Eq1 TypeError where liftEq _ (UnificationError a b) (UnificationError c d) = a == c && b == d
instance Eq1 TypeError where liftEq _ (UnificationError a1 b1) (UnificationError a2 b2) = a1 == a2 && b1 == b2
instance Show1 TypeError where liftShowsPrec _ _ = showsPrec