diff options
author | Sylvain Henry <sylvain@haskus.fr> | 2020-04-21 13:00:42 +0200 |
---|---|---|
committer | Sylvain Henry <sylvain@haskus.fr> | 2020-04-24 15:46:05 +0200 |
commit | 2d2587182568cc5aa4b29d401517337c32459c66 (patch) | |
tree | 1cc57abaaa39c4523822f95ffb9c61156f1f28e4 /haddock-api/src/Haddock/Interface/Create.hs | |
parent | da4e2bd788b6231494d6ac56a8e88bcfa4be51f6 (diff) |
Module structure
Diffstat (limited to 'haddock-api/src/Haddock/Interface/Create.hs')
-rw-r--r-- | haddock-api/src/Haddock/Interface/Create.hs | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/haddock-api/src/Haddock/Interface/Create.hs b/haddock-api/src/Haddock/Interface/Create.hs index de4febf8..7e05e669 100644 --- a/haddock-api/src/Haddock/Interface/Create.hs +++ b/haddock-api/src/Haddock/Interface/Create.hs @@ -34,7 +34,6 @@ import qualified Data.Map as M import Data.Map (Map) import Data.List import Data.Maybe -import Data.Ord import Control.Applicative import Control.Monad import Data.Traversable @@ -50,12 +49,12 @@ import GHC.Types.Name import GHC.Types.Name.Set import GHC.Types.Name.Env import GHC.Driver.Packages ( lookupModuleInAllPackages, PackageName(..) ) -import Bag +import GHC.Data.Bag import GHC.Types.Name.Reader import GHC.Tc.Types -import FastString ( unpackFS, bytesFS ) +import GHC.Data.FastString ( unpackFS, bytesFS ) import GHC.Types.Basic ( StringLiteral(..), SourceText(..), PromotionFlag(..) ) -import qualified Outputable as O +import qualified GHC.Utils.Outputable as O -- | Use a 'TypecheckedModule' to produce an 'Interface'. |