Functor, Foldable, Traversable instances for Report, Marker and Note

This commit is contained in:
Ellie Hermaszewska 2023-05-16 11:03:23 +08:00
parent e4bc1849e5
commit 451d9838cf
No known key found for this signature in database

View File

@ -124,7 +124,7 @@ data Marker msg
Maybe msg
| -- | An empty marker, whose sole purpose is to include a line of code in the report without markers under.
Blank
deriving (Functor, Eq, Ord)
deriving (Eq, Ord, Functor, Foldable, Traversable)
isBlank :: Marker msg -> Bool
isBlank = \case