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

Derive Eq & Ord instances for TypeError.

This commit is contained in:
Rob Rix 2018-05-11 11:01:20 -04:00
parent ae6bff8f8d
commit 41579c243a

View File

@ -61,6 +61,8 @@ zeroOrMoreProduct = maybe Unit oneOrMoreProduct . nonEmpty
data TypeError resume where
UnificationError :: Type -> Type -> TypeError Type
deriving instance Eq (TypeError resume)
deriving instance Ord (TypeError resume)
deriving instance Show (TypeError resume)
instance Show1 TypeError where