Explicitly add 'mappend' for old GHC versions
This commit is contained in:
parent
2c026f1ec7
commit
9f578f41a1
|
@ -1824,6 +1824,7 @@ instance Semigroup SpaceStatus where
|
|||
(x, SpaceEmpty) -> x
|
||||
instance Monoid SpaceStatus where
|
||||
mempty = SpaceEmpty
|
||||
mappend = (<>)
|
||||
|
||||
-- This is slightly awkward because we want to support structured
|
||||
-- optional checks based on nearly the same logic
|
||||
|
|
Loading…
Reference in New Issue