diff options
author | Ben Gamari <ben@smart-cactus.org> | 2020-04-17 09:27:35 -0400 |
---|---|---|
committer | GitHub <noreply@github.com> | 2020-04-17 09:27:35 -0400 |
commit | 75ea1b31fce54bf2b0c1bf8edad4419f48e6036c (patch) | |
tree | e50d068d85b4e1bce8a55965a5423bb4866c6ab2 /haddock-api/src/Haddock/Backends | |
parent | 5ec817a3e41b7eaa50c74701ab2d7642df86464c (diff) | |
parent | 20bf93490b37c0410d85a0ad4d38f9ddc2253589 (diff) |
Merge pull request #1160 from hsyl20/wip/hsyl20/modules/systools
Module renaming
Diffstat (limited to 'haddock-api/src/Haddock/Backends')
-rw-r--r-- | haddock-api/src/Haddock/Backends/Hyperlinker/Parser.hs | 7 | ||||
-rw-r--r-- | haddock-api/src/Haddock/Backends/Xhtml/Decl.hs | 1 |
2 files changed, 4 insertions, 4 deletions
diff --git a/haddock-api/src/Haddock/Backends/Hyperlinker/Parser.hs b/haddock-api/src/Haddock/Backends/Hyperlinker/Parser.hs index 82d15d62..ddf70b5f 100644 --- a/haddock-api/src/Haddock/Backends/Hyperlinker/Parser.hs +++ b/haddock-api/src/Haddock/Backends/Hyperlinker/Parser.hs @@ -11,10 +11,11 @@ import qualified Data.ByteString as BS import GHC.Types.Basic ( IntegralLit(..) ) import GHC.Driver.Session -import ErrUtils ( emptyMessages, pprLocErrMsg ) +import ErrUtils ( pprLocErrMsg ) import FastString ( mkFastString ) -import Lexer ( P(..), ParseResult(..), PState(..), Token(..) - , mkPStatePure, lexer, mkParserFlags', getErrorMessages, addFatalError ) +import GHC.Parser.Lexer as Lexer + ( P(..), ParseResult(..), PState(..), Token(..) + , mkPStatePure, lexer, mkParserFlags', getErrorMessages) import Bag ( bagToList ) import Outputable ( showSDoc, panic, text, ($$) ) import GHC.Types.SrcLoc diff --git a/haddock-api/src/Haddock/Backends/Xhtml/Decl.hs b/haddock-api/src/Haddock/Backends/Xhtml/Decl.hs index c22afeed..153caf86 100644 --- a/haddock-api/src/Haddock/Backends/Xhtml/Decl.hs +++ b/haddock-api/src/Haddock/Backends/Xhtml/Decl.hs @@ -40,7 +40,6 @@ import GHC.Exts import GHC.Types.Name import BooleanFormula import GHC.Types.Name.Reader ( rdrNameOcc ) -import Outputable ( panic ) -- | Pretty print a declaration ppDecl :: Bool -- ^ print summary info only |