diff options
author | Ben Gamari <ben@smart-cactus.org> | 2020-04-07 11:19:58 -0400 |
---|---|---|
committer | GitHub <noreply@github.com> | 2020-04-07 11:19:58 -0400 |
commit | cb65d6f3d452f46dcdd87347f50ce1548aa3fbbb (patch) | |
tree | 46d459989eb9bc28f4d035b5639d96bf88912ccf /haddock-api/src | |
parent | c8a9f89a49a1a4aada87c8f6df8432e659dbcdcc (diff) | |
parent | 38036137bce2587c6d50756f6fab8cfafeb5a63b (diff) |
Merge pull request #1154 from hsyl20/wip/hsyl20/modules/tc
Module renaming: amend previous patch
Diffstat (limited to 'haddock-api/src')
-rw-r--r-- | haddock-api/src/Haddock/Convert.hs | 2 | ||||
-rw-r--r-- | haddock-api/src/Haddock/Interface.hs | 2 | ||||
-rw-r--r-- | haddock-api/src/Haddock/Interface/Create.hs | 2 |
3 files changed, 3 insertions, 3 deletions
diff --git a/haddock-api/src/Haddock/Convert.hs b/haddock-api/src/Haddock/Convert.hs index a130a6be..6a0bba61 100644 --- a/haddock-api/src/Haddock/Convert.hs +++ b/haddock-api/src/Haddock/Convert.hs @@ -34,7 +34,7 @@ import GHC.Types.Name.Set ( emptyNameSet ) import GHC.Types.Name.Reader ( mkVarUnqual ) import GHC.Core.PatSyn import GHC.Types.SrcLoc ( Located, noLoc, unLoc, GenLocated(..), srcLocSpan ) -import GHC.Tc.Utils.Type +import GHC.Tc.Utils.TcType import GHC.Core.TyCon import GHC.Core.Type import GHC.Core.TyCo.Rep diff --git a/haddock-api/src/Haddock/Interface.hs b/haddock-api/src/Haddock/Interface.hs index 7d20638d..52bf6f7b 100644 --- a/haddock-api/src/Haddock/Interface.hs +++ b/haddock-api/src/Haddock/Interface.hs @@ -56,7 +56,7 @@ import GHC.Driver.Session hiding (verbosity) import GHC hiding (verbosity) import GHC.Driver.Types import FastString (unpackFS) -import GHC.Tc.Utils (tcg_rdr_env) +import GHC.Tc.Types (tcg_rdr_env) import GHC.Types.Name (nameIsFromExternalPackage, nameOccName) import GHC.Types.Name.Occurrence (isTcOcc) import GHC.Types.Name.Reader (unQualOK, gre_name, globalRdrEnvElts) diff --git a/haddock-api/src/Haddock/Interface/Create.hs b/haddock-api/src/Haddock/Interface/Create.hs index 43f12d3d..de4febf8 100644 --- a/haddock-api/src/Haddock/Interface/Create.hs +++ b/haddock-api/src/Haddock/Interface/Create.hs @@ -52,7 +52,7 @@ import GHC.Types.Name.Env import GHC.Driver.Packages ( lookupModuleInAllPackages, PackageName(..) ) import Bag import GHC.Types.Name.Reader -import GHC.Tc.Utils +import GHC.Tc.Types import FastString ( unpackFS, bytesFS ) import GHC.Types.Basic ( StringLiteral(..), SourceText(..), PromotionFlag(..) ) import qualified Outputable as O |