Module hierarchy: HsToCore (cf #13009)

3 files changed, 5 insertions, 5 deletions

diff --git a/compiler/main/DriverPipeline.hs b/compiler/main/DriverPipeline.hs
index 5db264254c..6fbf019456 100644
--- a/compiler/main/DriverPipeline.hs
+++ b/compiler/main/DriverPipeline.hs
@@ -965,7 +965,7 @@ runPhase (RealPhase (Unlit sf)) input_fn dflags
        -- escape the characters \, ", and ', but don't try to escape
        -- Unicode or anything else (so we don't use Util.charToC
        -- here).  If we get this wrong, then in
-       -- Coverage.isGoodTickSrcSpan where we check that the filename in
+       -- GHC.HsToCore.Coverage.isGoodTickSrcSpan where we check that the filename in
        -- a SrcLoc is the same as the source filenaame, the two will
        -- look bogusly different. See test:
        -- libraries/hpc/tests/function/subdir/tough2.hs
@@ -2308,7 +2308,7 @@ Introduction
 
   4) -fhpc
   At some point during compilation with -fhpc, in the function
-  `deSugar.Coverage.isGoodTickSrcSpan`, we compare the filename that a
+  `GHC.HsToCore.Coverage.isGoodTickSrcSpan`, we compare the filename that a
   `SrcSpan` refers to with the name of the file we are currently compiling.
   For some reason I don't yet understand, they can sometimes legitimally be
   different, and then hpc ignores that SrcSpan.
diff --git a/compiler/main/HscMain.hs b/compiler/main/HscMain.hs
index 8e7a9db87a..aa4a6a4875 100644
--- a/compiler/main/HscMain.hs
+++ b/compiler/main/HscMain.hs
@@ -120,7 +120,7 @@ import NameCache        ( initNameCache )
 import GHC.Iface.Load   ( ifaceStats, initExternalPackageState )
 import PrelInfo
 import GHC.Iface.Utils
-import Desugar
+import GHC.HsToCore
 import SimplCore
 import GHC.Iface.Tidy
 import GHC.CoreToStg.Prep
diff --git a/compiler/main/HscTypes.hs b/compiler/main/HscTypes.hs
index 33f827e2c6..223b566031 100644
--- a/compiler/main/HscTypes.hs
+++ b/compiler/main/HscTypes.hs
@@ -2326,7 +2326,7 @@ class Monad m => MonadThings m where
         lookupTyCon :: Name -> m TyCon
         lookupTyCon = liftM tyThingTyCon . lookupThing
 
--- Instance used in DsMeta
+-- Instance used in GHC.HsToCore.Quote
 instance MonadThings m => MonadThings (ReaderT s m) where
   lookupThing = lift . lookupThing
 
@@ -3237,7 +3237,7 @@ for the same TyCon:
 
 And looking up the values in the CompleteMatchMap associated with Boolean
 would give you [CompleteMatch [F, T1] Boolean, CompleteMatch [F, T2] Boolean].
-dsGetCompleteMatches in DsMeta accomplishes this lookup.
+dsGetCompleteMatches in GHC.HsToCore.Quote accomplishes this lookup.
 
 Also see Note [Typechecking Complete Matches] in TcBinds for a more detailed
 explanation for how GHC ensures that all the conlikes in a COMPLETE set are