Error message wibbles

9 files changed, 2 insertions, 13 deletions

diff --git a/testsuite/tests/annotations/should_fail/annfail03.stderr b/testsuite/tests/annotations/should_fail/annfail03.stderr
index 9c15855076..3993fe852e 100644
--- a/testsuite/tests/annotations/should_fail/annfail03.stderr
+++ b/testsuite/tests/annotations/should_fail/annfail03.stderr
@@ -4,5 +4,4 @@ annfail03.hs:17:1:
       instance for ‛Data
                       InModule’ is used in a top-level splice or annotation,
       and must be imported, not defined locally
-    In the expression: InModule
     In the annotation: {-# ANN f InModule #-}
diff --git a/testsuite/tests/annotations/should_fail/annfail04.stderr b/testsuite/tests/annotations/should_fail/annfail04.stderr
index 9d7bf39778..70ff2e685b 100644
--- a/testsuite/tests/annotations/should_fail/annfail04.stderr
+++ b/testsuite/tests/annotations/should_fail/annfail04.stderr
@@ -4,5 +4,4 @@ annfail04.hs:14:12:
       instance for ‛Thing
                       Int’ is used in a top-level splice or annotation,
       and must be imported, not defined locally
-    In the expression: (thing :: Int)
     In the annotation: {-# ANN f (thing :: Int) #-}
diff --git a/testsuite/tests/annotations/should_fail/annfail05.stderr b/testsuite/tests/annotations/should_fail/annfail05.stderr
index 04329eec1e..712cff2f2a 100644
--- a/testsuite/tests/annotations/should_fail/annfail05.stderr
+++ b/testsuite/tests/annotations/should_fail/annfail05.stderr
@@ -2,5 +2,4 @@
 annfail05.hs:11:1:
     No instance for (Data.Data.Data NoInstances)
       arising from an annotation
-    In the expression: NoInstances
     In the annotation: {-# ANN f NoInstances #-}
diff --git a/testsuite/tests/annotations/should_fail/annfail06.stderr b/testsuite/tests/annotations/should_fail/annfail06.stderr
index 332f35da35..a807aafd9b 100644
--- a/testsuite/tests/annotations/should_fail/annfail06.stderr
+++ b/testsuite/tests/annotations/should_fail/annfail06.stderr
@@ -4,5 +4,4 @@ annfail06.hs:22:1:
       instance for ‛Data
                       InstancesInWrongModule’ is used in a top-level splice or annotation,
       and must be imported, not defined locally
-    In the expression: InstancesInWrongModule
     In the annotation: {-# ANN f InstancesInWrongModule #-}
diff --git a/testsuite/tests/annotations/should_fail/annfail07.stderr b/testsuite/tests/annotations/should_fail/annfail07.stderr
index 86a579919a..5f966a7bde 100644
--- a/testsuite/tests/annotations/should_fail/annfail07.stderr
+++ b/testsuite/tests/annotations/should_fail/annfail07.stderr
@@ -2,4 +2,4 @@
 annfail07.hs:9:17:
     Couldn't match expected type ‛[a0]’ with actual type ‛Bool’
     In the first argument of ‛head’, namely ‛True’
-    In the expression: (head True)
+    In the annotation: {-# ANN f (head True) #-}
diff --git a/testsuite/tests/annotations/should_fail/annfail08.stderr b/testsuite/tests/annotations/should_fail/annfail08.stderr
index b9023476f0..8a64c82e1e 100644
--- a/testsuite/tests/annotations/should_fail/annfail08.stderr
+++ b/testsuite/tests/annotations/should_fail/annfail08.stderr
@@ -2,10 +2,8 @@
 annfail08.hs:9:1:
     No instance for (Data.Data.Data (a0 -> a0))
       arising from an annotation
-    In the expression: (id + 1)
     In the annotation: {-# ANN f (id + 1) #-}
 
 annfail08.hs:9:15:
     No instance for (Num (a0 -> a0)) arising from a use of ‛+’
-    In the expression: (id + 1)
     In the annotation: {-# ANN f (id + 1) #-}
diff --git a/testsuite/tests/annotations/should_fail/annfail09.stderr b/testsuite/tests/annotations/should_fail/annfail09.stderr
index 4bddab8dd0..f1bd77cb7c 100644
--- a/testsuite/tests/annotations/should_fail/annfail09.stderr
+++ b/testsuite/tests/annotations/should_fail/annfail09.stderr
@@ -3,5 +3,4 @@ annfail09.hs:11:11:
     GHC stage restriction:
       ‛g’ is used in a top-level splice or annotation,
       and must be imported, not defined locally
-    In the expression: g
     In the annotation: {-# ANN f g #-}
diff --git a/testsuite/tests/annotations/should_fail/annfail10.stderr b/testsuite/tests/annotations/should_fail/annfail10.stderr
index 2d32ac177a..f9bfe2697e 100644
--- a/testsuite/tests/annotations/should_fail/annfail10.stderr
+++ b/testsuite/tests/annotations/should_fail/annfail10.stderr
@@ -11,7 +11,6 @@ annfail10.hs:9:1:
                Data.Data.Data (a, b, c)
         -- Defined in ‛Data.Data’
       ...plus 31 others
-    In the expression: 1
     In the annotation: {-# ANN f 1 #-}
 
 annfail10.hs:9:11:
@@ -23,5 +22,4 @@ annfail10.hs:9:11:
       instance Integral a => Num (GHC.Real.Ratio a)
         -- Defined in ‛GHC.Real’
       ...plus 11 others
-    In the expression: 1
     In the annotation: {-# ANN f 1 #-}
diff --git a/testsuite/tests/annotations/should_fail/annfail12.stderr b/testsuite/tests/annotations/should_fail/annfail12.stderr
index 6b08c0a814..b3cbb4eb14 100644
--- a/testsuite/tests/annotations/should_fail/annfail12.stderr
+++ b/testsuite/tests/annotations/should_fail/annfail12.stderr
@@ -2,7 +2,5 @@
 annfail12.hs:5:1:
     Exception when trying to run compile-time code:
       You were meant to see this error!
-    In the expression:
-        (error "You were meant to see this error!" :: Int)
     In the annotation:
-        {-# ANN f (error "You were meant to see this error!" :: Int) #-}
+      {-# ANN f (error "You were meant to see this error!" :: Int) #-}