diff options
Diffstat (limited to 'compiler/GHC')
-rw-r--r-- | compiler/GHC/Builtin/Names/TH.hs | 3 | ||||
-rw-r--r-- | compiler/GHC/Builtin/PrimOps.hs | 2 | ||||
-rw-r--r-- | compiler/GHC/ByteCode/Linker.hs | 3 | ||||
-rw-r--r-- | compiler/GHC/Cmm/CLabel.hs | 2 | ||||
-rw-r--r-- | compiler/GHC/CmmToAsm/X86/CodeGen.hs | 2 | ||||
-rw-r--r-- | compiler/GHC/Core/DataCon.hs | 3 | ||||
-rw-r--r-- | compiler/GHC/Core/InstEnv.hs | 3 | ||||
-rw-r--r-- | compiler/GHC/Driver/Backpack/Syntax.hs | 4 | ||||
-rw-r--r-- | compiler/GHC/Driver/Finder.hs | 5 | ||||
-rw-r--r-- | compiler/GHC/Parser/Lexer.x | 2 |
10 files changed, 19 insertions, 10 deletions
diff --git a/compiler/GHC/Builtin/Names/TH.hs b/compiler/GHC/Builtin/Names/TH.hs index dc237b6963..1580151028 100644 --- a/compiler/GHC/Builtin/Names/TH.hs +++ b/compiler/GHC/Builtin/Names/TH.hs @@ -9,7 +9,8 @@ module GHC.Builtin.Names.TH where import GHC.Prelude () import GHC.Builtin.Names( mk_known_key_name ) -import GHC.Unit +import GHC.Unit.Types +import GHC.Unit.Module.Name import GHC.Types.Name( Name ) import GHC.Types.Name.Occurrence( tcName, clsName, dataName, varName ) import GHC.Types.Name.Reader( RdrName, nameRdrName ) diff --git a/compiler/GHC/Builtin/PrimOps.hs b/compiler/GHC/Builtin/PrimOps.hs index 8f6af1d052..8ed04097f7 100644 --- a/compiler/GHC/Builtin/PrimOps.hs +++ b/compiler/GHC/Builtin/PrimOps.hs @@ -45,7 +45,7 @@ import GHC.Types.SrcLoc ( wiredInSrcSpan ) import GHC.Types.ForeignCall ( CLabelString ) import GHC.Types.Unique ( Unique) import GHC.Builtin.Uniques (mkPrimOpIdUnique, mkPrimOpWrapperUnique ) -import GHC.Unit ( Unit ) +import GHC.Unit.Types ( Unit ) import GHC.Utils.Outputable import GHC.Data.FastString diff --git a/compiler/GHC/ByteCode/Linker.hs b/compiler/GHC/ByteCode/Linker.hs index 03c03fbf2b..bf7ef712fc 100644 --- a/compiler/GHC/ByteCode/Linker.hs +++ b/compiler/GHC/ByteCode/Linker.hs @@ -31,7 +31,8 @@ import GHC.Driver.Types import GHC.Types.Name import GHC.Types.Name.Env import GHC.Builtin.PrimOps -import GHC.Unit +import GHC.Unit.Types +import GHC.Unit.Module.Name import GHC.Data.FastString import GHC.Utils.Panic import GHC.Utils.Outputable diff --git a/compiler/GHC/Cmm/CLabel.hs b/compiler/GHC/Cmm/CLabel.hs index 9b5fc82c5e..fe133316d9 100644 --- a/compiler/GHC/Cmm/CLabel.hs +++ b/compiler/GHC/Cmm/CLabel.hs @@ -132,7 +132,7 @@ import GHC.Prelude import GHC.Types.Id.Info import GHC.Types.Basic import {-# SOURCE #-} GHC.Cmm.BlockId (BlockId, mkBlockId) -import GHC.Unit +import GHC.Unit.Types import GHC.Types.Name import GHC.Types.Unique import GHC.Builtin.PrimOps diff --git a/compiler/GHC/CmmToAsm/X86/CodeGen.hs b/compiler/GHC/CmmToAsm/X86/CodeGen.hs index 6a64a88651..e9b54c6b45 100644 --- a/compiler/GHC/CmmToAsm/X86/CodeGen.hs +++ b/compiler/GHC/CmmToAsm/X86/CodeGen.hs @@ -68,7 +68,7 @@ import GHC.Platform -- Our intermediate code: import GHC.Types.Basic import GHC.Cmm.BlockId -import GHC.Unit ( primUnitId ) +import GHC.Unit.Types ( primUnitId ) import GHC.Cmm.Utils import GHC.Cmm.Switch import GHC.Cmm diff --git a/compiler/GHC/Core/DataCon.hs b/compiler/GHC/Core/DataCon.hs index 87e6bf10c9..1e3969953f 100644 --- a/compiler/GHC/Core/DataCon.hs +++ b/compiler/GHC/Core/DataCon.hs @@ -81,7 +81,8 @@ import GHC.Core.Predicate import GHC.Types.Var import GHC.Types.Basic import GHC.Data.FastString -import GHC.Unit +import GHC.Unit.Types +import GHC.Unit.Module.Name import GHC.Utils.Binary import GHC.Types.Unique.Set import GHC.Builtin.Uniques( mkAlphaTyVarUnique ) diff --git a/compiler/GHC/Core/InstEnv.hs b/compiler/GHC/Core/InstEnv.hs index 16c40cc73d..60f16075cc 100644 --- a/compiler/GHC/Core/InstEnv.hs +++ b/compiler/GHC/Core/InstEnv.hs @@ -36,7 +36,8 @@ import GHC.Prelude import GHC.Tc.Utils.TcType -- InstEnv is really part of the type checker, -- and depends on TcType in many ways import GHC.Core ( IsOrphan(..), isOrphan, chooseOrphanAnchor ) -import GHC.Unit +import GHC.Unit.Module.Env +import GHC.Unit.Types import GHC.Core.Class import GHC.Types.Var import GHC.Types.Var.Set diff --git a/compiler/GHC/Driver/Backpack/Syntax.hs b/compiler/GHC/Driver/Backpack/Syntax.hs index d4d36b59b2..e7e73b6cae 100644 --- a/compiler/GHC/Driver/Backpack/Syntax.hs +++ b/compiler/GHC/Driver/Backpack/Syntax.hs @@ -22,7 +22,9 @@ import GHC.Driver.Phases import GHC.Hs import GHC.Types.SrcLoc import GHC.Utils.Outputable -import GHC.Unit +import GHC.Unit.Module.Name +import GHC.Unit.Types +import GHC.Unit.Info {- ************************************************************************ diff --git a/compiler/GHC/Driver/Finder.hs b/compiler/GHC/Driver/Finder.hs index 771d153952..b6cdcdfa76 100644 --- a/compiler/GHC/Driver/Finder.hs +++ b/compiler/GHC/Driver/Finder.hs @@ -36,8 +36,11 @@ module GHC.Driver.Finder ( import GHC.Prelude -import GHC.Unit +import GHC.Unit.Types +import GHC.Unit.Module +import GHC.Unit.Home import GHC.Unit.State + import GHC.Driver.Types import GHC.Data.FastString import GHC.Utils.Misc diff --git a/compiler/GHC/Parser/Lexer.x b/compiler/GHC/Parser/Lexer.x index 90ee473c5d..b31e445740 100644 --- a/compiler/GHC/Parser/Lexer.x +++ b/compiler/GHC/Parser/Lexer.x @@ -105,7 +105,7 @@ import GHC.Data.OrdList import GHC.Utils.Misc ( readRational, readHexRational ) import GHC.Types.SrcLoc -import GHC.Unit +import GHC.Unit.Types import GHC.Types.Basic ( InlineSpec(..), RuleMatchInfo(..), IntegralLit(..), FractionalLit(..), SourceText(..) ) |