Modules: Core operations (#13009)

6 files changed, 7 insertions, 7 deletions

diff --git a/testsuite/tests/simplCore/should_compile/T14270a.hs b/testsuite/tests/simplCore/should_compile/T14270a.hs
index d8cc497f62..1f90993d5d 100644
--- a/testsuite/tests/simplCore/should_compile/T14270a.hs
+++ b/testsuite/tests/simplCore/should_compile/T14270a.hs
@@ -1,6 +1,6 @@
 {-# LANGUAGE TypeApplications, ScopedTypeVariables, GADTs, RankNTypes,
              PolyKinds, KindSignatures #-}
-{-# OPTIONS_GHC -O2 #-} -- We are provoking a bug in SpecConstr
+{-# OPTIONS_GHC -O2 #-} -- We are provoking a bug in GHC.Core.Op.SpecConstr
 
 module T14270a where
 
@@ -25,4 +25,4 @@ g kv x = case kv of
 -- The point here is that the call to f looks like
 --    f @(a |> co) (T2 @(a |> co))
 -- where 'co' is bound by the pattern match on K1
--- See Note [SpecConstr and casts] in SpecConstr
+-- See Note [SpecConstr and casts] in GHC.Core.Op.SpecConstr
diff --git a/testsuite/tests/simplCore/should_compile/T3831.hs b/testsuite/tests/simplCore/should_compile/T3831.hs
index 9eeb0a20c4..163f610a2e 100644
--- a/testsuite/tests/simplCore/should_compile/T3831.hs
+++ b/testsuite/tests/simplCore/should_compile/T3831.hs
@@ -2,7 +2,7 @@
 {-# LANGUAGE ScopedTypeVariables, FlexibleInstances  #-}
 
 -- This test has a deep nest of join points, which led to 
--- an exponential blow-up in SpecConstr
+-- an exponential blow-up in GHC.Core.Op.SpecConstr
 
 module T3831(setAttributes)  where
 
diff --git a/testsuite/tests/simplCore/should_compile/simpl018.hs b/testsuite/tests/simplCore/should_compile/simpl018.hs
index 613c612c25..75d19b9d8c 100644
--- a/testsuite/tests/simplCore/should_compile/simpl018.hs
+++ b/testsuite/tests/simplCore/should_compile/simpl018.hs
@@ -1,6 +1,6 @@
 {-# LANGUAGE UnboxedTuples #-}
 
--- See Note [Float coercions (unlifted)] in Simplify
+-- See Note [Float coercions (unlifted)] in GHC.Core.Op.Simplify
 -- This one gave a CoreLint error when compiled optimised
 --
 -- See also #1718, of which this is a simplified version
diff --git a/testsuite/tests/simplCore/should_compile/spec002.hs b/testsuite/tests/simplCore/should_compile/spec002.hs
index 106debc0c1..619bf274c7 100644
--- a/testsuite/tests/simplCore/should_compile/spec002.hs
+++ b/testsuite/tests/simplCore/should_compile/spec002.hs
@@ -1,6 +1,6 @@
 {-# OPTIONS_GHC -O2 #-}
 
--- Ths one fooled the rule-matching in SpecConstr, and gave a CoreLint error
+-- Ths one fooled the rule-matching in GHC.Core.Op.SpecConstr, and gave a CoreLint error
 
 module Foo where
 
diff --git a/testsuite/tests/simplCore/should_run/simplrun007.hs b/testsuite/tests/simplCore/should_run/simplrun007.hs
index 9cf3760adf..6940e8d546 100644
--- a/testsuite/tests/simplCore/should_run/simplrun007.hs
+++ b/testsuite/tests/simplCore/should_run/simplrun007.hs
@@ -1,6 +1,6 @@
 {-# LANGUAGE MagicHash #-}
 
--- Actually, this exercises prelude/PrelRules, but this is the closest
+-- Actually, this exercises GHC.Core.Op.ConstantFold, but this is the closest
 -- place I could find to put it...
 
 import GHC.Exts
diff --git a/testsuite/tests/simplCore/should_run/simplrun009.hs b/testsuite/tests/simplCore/should_run/simplrun009.hs
index 0e94012b2b..4ae0d2f255 100644
--- a/testsuite/tests/simplCore/should_run/simplrun009.hs
+++ b/testsuite/tests/simplCore/should_run/simplrun009.hs
@@ -6,7 +6,7 @@
 -- It produces a nested unfold that should look something
 -- like the code below.  Note the 'lvl1_shW'.  It is BAD
 -- if this is a lambda instead; you get a lot more allocation
--- See Note [Escaping a value lambda] in SetLevels
+-- See Note [Escaping a value lambda] in GHC.Core.Op.SetLevels
 
 
 {-