diff options
| -rw-r--r-- | src/Haddock/GhcUtils.hs | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/src/Haddock/GhcUtils.hs b/src/Haddock/GhcUtils.hs index 8c290f80..d8525532 100644 --- a/src/Haddock/GhcUtils.hs +++ b/src/Haddock/GhcUtils.hs @@ -147,7 +147,7 @@ trace_ppr x y = trace (pretty x) y ------------------------------------------------------------------------------- --- Located +-- * Located ------------------------------------------------------------------------------- @@ -164,11 +164,11 @@ instance Foldable Located where instance Traversable Located where - mapM f (L l x) = (return . L l) =<< f x + mapM f (L l x) = (return . L l) =<< f x ------------------------------------------------------------------------------- --- NamedThing instances +-- * NamedThing instances ------------------------------------------------------------------------------- @@ -181,7 +181,7 @@ instance NamedThing (ConDecl Name) where ------------------------------------------------------------------------------- --- Subordinates +-- * Subordinates ------------------------------------------------------------------------------- @@ -231,7 +231,7 @@ parents _ _ = [] ------------------------------------------------------------------------------- --- Utils that work in monads defined by GHC +-- * Utils that work in monads defined by GHC ------------------------------------------------------------------------------- @@ -249,7 +249,7 @@ gbracket_ before after thing = gbracket before (const after) (const thing) ------------------------------------------------------------------------------- --- DynFlags +-- * DynFlags ------------------------------------------------------------------------------- |