summaryrefslogtreecommitdiff
path: root/compiler/GHC/Rename/Module.hs
diff options
context:
space:
mode:
Diffstat (limited to 'compiler/GHC/Rename/Module.hs')
-rw-r--r--compiler/GHC/Rename/Module.hs6
1 files changed, 3 insertions, 3 deletions
diff --git a/compiler/GHC/Rename/Module.hs b/compiler/GHC/Rename/Module.hs
index 9fbbcacdab..29937ea5f0 100644
--- a/compiler/GHC/Rename/Module.hs
+++ b/compiler/GHC/Rename/Module.hs
@@ -455,7 +455,7 @@ checkCanonicalInstances cls poly_ty mbinds = do
"https://gitlab.haskell.org/ghc/ghc/-/wikis/proposal/semigroup-monoid"
where
- -- | Warn about unsound/non-canonical 'Applicative'/'Monad' instance
+ -- Warn about unsound/non-canonical 'Applicative'/'Monad' instance
-- declarations. Specifically, the following conditions are verified:
--
-- In 'Monad' instances declarations:
@@ -501,7 +501,7 @@ checkCanonicalInstances cls poly_ty mbinds = do
| otherwise = return ()
- -- | Check whether Monoid(mappend) is defined in terms of
+ -- Check whether Monoid(mappend) is defined in terms of
-- Semigroup((<>)) (and not the other way round). Specifically,
-- the following conditions are verified:
--
@@ -540,7 +540,7 @@ checkCanonicalInstances cls poly_ty mbinds = do
| otherwise = return ()
- -- | test whether MatchGroup represents a trivial \"lhsName = rhsName\"
+ -- test whether MatchGroup represents a trivial \"lhsName = rhsName\"
-- binding, and return @Just rhsName@ if this is the case
isAliasMG :: MatchGroup GhcRn (LHsExpr GhcRn) -> Maybe Name
isAliasMG MG {mg_alts = (L _ [L _ (Match { m_pats = []