diff options
author | Sylvain Henry <sylvain@haskus.fr> | 2020-03-02 12:32:43 +0100 |
---|---|---|
committer | Sylvain Henry <sylvain@haskus.fr> | 2020-03-02 12:32:43 +0100 |
commit | de9560edfcd13269dd835792ad4088f1b975a910 (patch) | |
tree | 790448808af48aaf221216f0459fef3ff3d1420d | |
parent | b104c573fdc6efcecc3bfaa2fb6084b7679f32da (diff) |
Modules: Core (#13009)
-rw-r--r-- | haddock-api/src/Haddock/Backends/Hoogle.hs | 2 | ||||
-rw-r--r-- | haddock-api/src/Haddock/Convert.hs | 18 | ||||
-rw-r--r-- | haddock-api/src/Haddock/GhcUtils.hs | 6 | ||||
-rw-r--r-- | haddock-api/src/Haddock/Interface/AttachInstances.hs | 10 | ||||
-rw-r--r-- | haddock-api/src/Haddock/Interface/Create.hs | 2 |
5 files changed, 19 insertions, 19 deletions
diff --git a/haddock-api/src/Haddock/Backends/Hoogle.hs b/haddock-api/src/Haddock/Backends/Hoogle.hs index b76d14b5..c127235c 100644 --- a/haddock-api/src/Haddock/Backends/Hoogle.hs +++ b/haddock-api/src/Haddock/Backends/Hoogle.hs @@ -19,7 +19,7 @@ module Haddock.Backends.Hoogle ( import BasicTypes ( OverlapFlag(..), OverlapMode(..), SourceText(..) , PromotionFlag(..), TopLevelFlag(..) ) -import InstEnv (ClsInst(..)) +import GHC.Core.InstEnv (ClsInst(..)) import Documentation.Haddock.Markup import Haddock.GhcUtils import Haddock.Types hiding (Version) diff --git a/haddock-api/src/Haddock/Convert.hs b/haddock-api/src/Haddock/Convert.hs index 42175254..011ead00 100644 --- a/haddock-api/src/Haddock/Convert.hs +++ b/haddock-api/src/Haddock/Convert.hs @@ -22,22 +22,22 @@ module Haddock.Convert ( import Bag ( emptyBag ) import BasicTypes ( TupleSort(..), SourceText(..), LexicalFixity(..) , PromotionFlag(..), DefMethSpec(..) ) -import Class -import CoAxiom -import ConLike +import GHC.Core.Class +import GHC.Core.Coercion.Axiom +import GHC.Core.ConLike import Data.Either (lefts, rights) -import DataCon -import FamInstEnv +import GHC.Core.DataCon +import GHC.Core.FamInstEnv import GHC.Hs import Name import NameSet ( emptyNameSet ) import RdrName ( mkVarUnqual ) -import PatSyn +import GHC.Core.PatSyn import SrcLoc ( Located, noLoc, unLoc, GenLocated(..), srcLocSpan ) import TcType -import TyCon -import Type -import TyCoRep +import GHC.Core.TyCon +import GHC.Core.Type +import GHC.Core.TyCo.Rep import TysPrim ( alphaTyVars ) import TysWiredIn ( eqTyConName, listTyConName, liftedTypeKindTyConName , unitTy, promotedNilDataCon, promotedConsDataCon ) diff --git a/haddock-api/src/Haddock/GhcUtils.hs b/haddock-api/src/Haddock/GhcUtils.hs index 588f1548..75e3fa45 100644 --- a/haddock-api/src/Haddock/GhcUtils.hs +++ b/haddock-api/src/Haddock/GhcUtils.hs @@ -31,15 +31,15 @@ import NameSet import Module import GHC.Driver.Types import GHC -import Class +import GHC.Core.Class import GHC.Driver.Session import SrcLoc ( advanceSrcLoc ) import Var ( VarBndr(..), TyVarBinder, tyVarKind, updateTyVarKind, isInvisibleArgFlag ) import VarSet ( VarSet, emptyVarSet ) import VarEnv ( TyVarEnv, extendVarEnv, elemVarEnv, emptyVarEnv ) -import TyCoRep ( Type(..) ) -import Type ( isRuntimeRepVar ) +import GHC.Core.TyCo.Rep ( Type(..) ) +import GHC.Core.Type ( isRuntimeRepVar ) import TysWiredIn( liftedRepDataConTyCon ) import StringBuffer ( StringBuffer ) diff --git a/haddock-api/src/Haddock/Interface/AttachInstances.hs b/haddock-api/src/Haddock/Interface/AttachInstances.hs index c6892edd..65deffd3 100644 --- a/haddock-api/src/Haddock/Interface/AttachInstances.hs +++ b/haddock-api/src/Haddock/Interface/AttachInstances.hs @@ -27,21 +27,21 @@ import Data.Maybe ( maybeToList, mapMaybe, fromMaybe ) import qualified Data.Map as Map import qualified Data.Set as Set -import Class +import GHC.Core.Class import GHC.Driver.Session import GHC.Core (isOrphan) import ErrUtils -import FamInstEnv +import GHC.Core.FamInstEnv import GHC -import InstEnv +import GHC.Core.InstEnv import Module ( ModuleSet, moduleSetElts ) import MonadUtils (liftIO) import Name import NameEnv import Outputable (text, sep, (<+>)) import SrcLoc -import TyCon -import TyCoRep +import GHC.Core.TyCon +import GHC.Core.TyCo.Rep import TysPrim( funTyConName ) import Var hiding (varName) diff --git a/haddock-api/src/Haddock/Interface/Create.hs b/haddock-api/src/Haddock/Interface/Create.hs index 977fc9ca..ffe4393d 100644 --- a/haddock-api/src/Haddock/Interface/Create.hs +++ b/haddock-api/src/Haddock/Interface/Create.hs @@ -43,7 +43,7 @@ import Avail hiding (avail) import qualified Avail import qualified Module import qualified SrcLoc -import ConLike (ConLike(..)) +import GHC.Core.ConLike (ConLike(..)) import GHC import GHC.Driver.Types import Name |