diff --git a/src/Data/Syntax/Comment.hs b/src/Data/Syntax/Comment.hs index 5e4e4f9a9..3dd32adb9 100644 --- a/src/Data/Syntax/Comment.hs +++ b/src/Data/Syntax/Comment.hs @@ -1,10 +1,14 @@ module Data.Syntax.Comment where +import Data.Functor.Classes.Eq.Generic +import GHC.Generics import Prologue -- | An unnested comment (line or block). newtype Comment a = Comment { commentContent :: ByteString } - deriving (Eq, Show) + deriving (Eq, Generic1, Show) + +instance Eq1 Comment where liftEq = genericLiftEq -- TODO: nested comment types -- TODO: documentation comment types