diff options
Diffstat (limited to 'compiler/GHC/Builtin')
-rw-r--r-- | compiler/GHC/Builtin/Names.hs | 6 | ||||
-rw-r--r-- | compiler/GHC/Builtin/Names.hs-boot | 2 | ||||
-rw-r--r-- | compiler/GHC/Builtin/Names/TH.hs | 2 | ||||
-rw-r--r-- | compiler/GHC/Builtin/PrimOps.hs | 2 | ||||
-rw-r--r-- | compiler/GHC/Builtin/Types.hs | 2 |
5 files changed, 8 insertions, 6 deletions
diff --git a/compiler/GHC/Builtin/Names.hs b/compiler/GHC/Builtin/Names.hs index d6eacd9562..52d5bf0fa2 100644 --- a/compiler/GHC/Builtin/Names.hs +++ b/compiler/GHC/Builtin/Names.hs @@ -143,7 +143,8 @@ this constructor directly (see CorePrep.lookupIntegerSDataConName) When GHC reads the package data base, it (internally only) pretends it has UnitId `integer-wired-in` instead of the actual UnitId (which includes the version number); just like for `base` and other packages, as described in -Note [Wired-in packages] in GHC.Types.Module. This is done in Packages.findWiredInPackages. +Note [Wired-in units] in GHC.Unit.Module. This is done in +GHC.Unit.State.findWiredInPackages. -} {-# LANGUAGE CPP #-} @@ -165,7 +166,8 @@ where import GHC.Prelude -import GHC.Types.Module +import GHC.Unit.Types +import GHC.Unit.Module.Name import GHC.Types.Name.Occurrence import GHC.Types.Name.Reader import GHC.Types.Unique diff --git a/compiler/GHC/Builtin/Names.hs-boot b/compiler/GHC/Builtin/Names.hs-boot index 8dcd62e716..da448e09e4 100644 --- a/compiler/GHC/Builtin/Names.hs-boot +++ b/compiler/GHC/Builtin/Names.hs-boot @@ -1,6 +1,6 @@ module GHC.Builtin.Names where -import GHC.Types.Module +import GHC.Unit.Module import GHC.Types.Unique mAIN :: Module diff --git a/compiler/GHC/Builtin/Names/TH.hs b/compiler/GHC/Builtin/Names/TH.hs index 5123754c55..94407b51fb 100644 --- a/compiler/GHC/Builtin/Names/TH.hs +++ b/compiler/GHC/Builtin/Names/TH.hs @@ -9,7 +9,7 @@ module GHC.Builtin.Names.TH where import GHC.Prelude () import GHC.Builtin.Names( mk_known_key_name ) -import GHC.Types.Module( Module, mkModuleNameFS, mkModule, thUnitId ) +import GHC.Unit 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 1a7a03fe8a..8ad0b731f8 100644 --- a/compiler/GHC/Builtin/PrimOps.hs +++ b/compiler/GHC/Builtin/PrimOps.hs @@ -44,7 +44,7 @@ import GHC.Types.Basic ( Arity, Fixity(..), FixityDirection(..), Boxity(..), import GHC.Types.SrcLoc ( wiredInSrcSpan ) import GHC.Types.ForeignCall ( CLabelString ) import GHC.Types.Unique ( Unique, mkPrimOpIdUnique, mkPrimOpWrapperUnique ) -import GHC.Types.Module ( Unit ) +import GHC.Unit ( Unit ) import GHC.Utils.Outputable import GHC.Data.FastString diff --git a/compiler/GHC/Builtin/Types.hs b/compiler/GHC/Builtin/Types.hs index 51d3ff608b..0c0bab60ea 100644 --- a/compiler/GHC/Builtin/Types.hs +++ b/compiler/GHC/Builtin/Types.hs @@ -143,7 +143,7 @@ import {-# SOURCE #-} GHC.Builtin.Uniques import GHC.Core.Coercion.Axiom import GHC.Types.Id import GHC.Settings.Constants ( mAX_TUPLE_SIZE, mAX_CTUPLE_SIZE, mAX_SUM_SIZE ) -import GHC.Types.Module ( Module ) +import GHC.Unit.Module ( Module ) import GHC.Core.Type import GHC.Types.RepType import GHC.Core.DataCon |