summaryrefslogtreecommitdiff
path: root/testsuite/tests/parser/should_fail
diff options
context:
space:
mode:
Diffstat (limited to 'testsuite/tests/parser/should_fail')
-rw-r--r--testsuite/tests/parser/should_fail/ExportCommaComma.stderr3
-rw-r--r--testsuite/tests/parser/should_fail/InfixAppPatErr.stderr3
-rw-r--r--testsuite/tests/parser/should_fail/NoBlockArgumentsFail.stderr6
-rw-r--r--testsuite/tests/parser/should_fail/NoBlockArgumentsFail2.stderr6
-rw-r--r--testsuite/tests/parser/should_fail/NoBlockArgumentsFail3.stderr6
-rw-r--r--testsuite/tests/parser/should_fail/NoBlockArgumentsFailArrowCmds.stderr6
-rw-r--r--testsuite/tests/parser/should_fail/NoDoAndIfThenElse.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/NoNumericUnderscores0.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/NoNumericUnderscores1.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/NoPatternSynonyms.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/NumericUnderscoresFail0.stderr46
-rw-r--r--testsuite/tests/parser/should_fail/NumericUnderscoresFail1.stderr66
-rw-r--r--testsuite/tests/parser/should_fail/OpaqueParseFail1.stderr3
-rw-r--r--testsuite/tests/parser/should_fail/OpaqueParseFail2.stderr3
-rw-r--r--testsuite/tests/parser/should_fail/OpaqueParseFail3.stderr3
-rw-r--r--testsuite/tests/parser/should_fail/ParserNoBinaryLiterals1.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/ParserNoForallUnicode.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/ParserNoLambdaCase.stderr3
-rw-r--r--testsuite/tests/parser/should_fail/ParserNoMultiWayIf.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/ParserNoTH1.stderr4
-rw-r--r--testsuite/tests/parser/should_fail/ParserNoTH2.stderr4
-rw-r--r--testsuite/tests/parser/should_fail/RecordDotSyntaxFail0.stderr3
-rw-r--r--testsuite/tests/parser/should_fail/RecordDotSyntaxFail1.stderr3
-rw-r--r--testsuite/tests/parser/should_fail/RecordDotSyntaxFail10.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/RecordDotSyntaxFail11.stderr4
-rw-r--r--testsuite/tests/parser/should_fail/RecordDotSyntaxFail12.stderr6
-rw-r--r--testsuite/tests/parser/should_fail/RecordDotSyntaxFail13.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/RecordDotSyntaxFail2.stderr3
-rw-r--r--testsuite/tests/parser/should_fail/RecordDotSyntaxFail3.stderr4
-rw-r--r--testsuite/tests/parser/should_fail/RecordDotSyntaxFail4.stderr3
-rw-r--r--testsuite/tests/parser/should_fail/RecordDotSyntaxFail6.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/RecordDotSyntaxFail7.stderr3
-rw-r--r--testsuite/tests/parser/should_fail/RecordDotSyntaxFail8.stderr4
-rw-r--r--testsuite/tests/parser/should_fail/RecordDotSyntaxFail9.stderr7
-rw-r--r--testsuite/tests/parser/should_fail/RecordWildCardsFail.stderr3
-rw-r--r--testsuite/tests/parser/should_fail/T10196Fail1.stderr3
-rw-r--r--testsuite/tests/parser/should_fail/T10196Fail2.stderr3
-rw-r--r--testsuite/tests/parser/should_fail/T10498a.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/T10498b.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/T12045d.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/T12051.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/T12429.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/T12610.stderr4
-rw-r--r--testsuite/tests/parser/should_fail/T12811.stderr5
-rw-r--r--testsuite/tests/parser/should_fail/T13260.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/T13414.stderr3
-rw-r--r--testsuite/tests/parser/should_fail/T1344a.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/T1344b.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/T1344c.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/T13450.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/T13450TH.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/T14588.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/T14740.stderr6
-rw-r--r--testsuite/tests/parser/should_fail/T15053.stderr5
-rw-r--r--testsuite/tests/parser/should_fail/T15209.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/T15233.stderr7
-rw-r--r--testsuite/tests/parser/should_fail/T15730.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/T15730b.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/T15849.stderr3
-rw-r--r--testsuite/tests/parser/should_fail/T16270.stderr47
-rw-r--r--testsuite/tests/parser/should_fail/T16270h.stderr6
-rw-r--r--testsuite/tests/parser/should_fail/T16999.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/T17045.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/T17162.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/T17865.stderr8
-rw-r--r--testsuite/tests/parser/should_fail/T18130Fail.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/T18251a.stderr7
-rw-r--r--testsuite/tests/parser/should_fail/T18251b.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/T18251d.stderr4
-rw-r--r--testsuite/tests/parser/should_fail/T18251f.stderr5
-rw-r--r--testsuite/tests/parser/should_fail/T19504.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/T19923a.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/T19923b.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/T19923c.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/T19928.stderr6
-rw-r--r--testsuite/tests/parser/should_fail/T20385A.stderr4
-rw-r--r--testsuite/tests/parser/should_fail/T20385B.stderr4
-rw-r--r--testsuite/tests/parser/should_fail/T20654a.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/T20654b.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/T3095.stderr4
-rw-r--r--testsuite/tests/parser/should_fail/T3153.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/T3751.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/T3811.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/T3811b.stderr5
-rw-r--r--testsuite/tests/parser/should_fail/T3811d.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/T3811e.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/T3811f.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/T5425.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/T7848.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/T8258NoGADTs.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/T8431.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/T8501a.stderr6
-rw-r--r--testsuite/tests/parser/should_fail/T8501b.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/T8501c.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/T8506.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/T9225.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/T984.stderr3
-rw-r--r--testsuite/tests/parser/should_fail/ViewPatternsFail.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/cmdFail001.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/cmdFail002.stderr3
-rw-r--r--testsuite/tests/parser/should_fail/cmdFail003.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/cmdFail004.stderr3
-rw-r--r--testsuite/tests/parser/should_fail/cmdFail005.stderr3
-rw-r--r--testsuite/tests/parser/should_fail/cmdFail006.stderr3
-rw-r--r--testsuite/tests/parser/should_fail/cmdFail007.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/cmdFail008.stderr3
-rw-r--r--testsuite/tests/parser/should_fail/cmdFail009.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/patFail001.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/patFail002.stderr3
-rw-r--r--testsuite/tests/parser/should_fail/patFail003.stderr3
-rw-r--r--testsuite/tests/parser/should_fail/patFail004.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/patFail005.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/patFail006.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/patFail007.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/patFail008.stderr3
-rw-r--r--testsuite/tests/parser/should_fail/patFail009.stderr3
-rw-r--r--testsuite/tests/parser/should_fail/position001.stderr3
-rw-r--r--testsuite/tests/parser/should_fail/position002.stderr3
-rw-r--r--testsuite/tests/parser/should_fail/proposal-229c.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/readFail001.stderr14
-rw-r--r--testsuite/tests/parser/should_fail/readFail002.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/readFail003.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/readFail004.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/readFail005.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/readFail006.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/readFail007.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/readFail009.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/readFail011.stderr3
-rw-r--r--testsuite/tests/parser/should_fail/readFail012.stderr3
-rw-r--r--testsuite/tests/parser/should_fail/readFail013.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/readFail014.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/readFail015.stderr3
-rw-r--r--testsuite/tests/parser/should_fail/readFail017.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/readFail018.stderr3
-rw-r--r--testsuite/tests/parser/should_fail/readFail019.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/readFail020.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/readFail022.stderr3
-rw-r--r--testsuite/tests/parser/should_fail/readFail024.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/readFail025.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/readFail026.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/readFail027.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/readFail029.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/readFail030.stderr3
-rw-r--r--testsuite/tests/parser/should_fail/readFail031.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/readFail032.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/readFail033.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/readFail034.stderr3
-rw-r--r--testsuite/tests/parser/should_fail/readFail039.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/readFail040.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/readFail044.stderr4
-rw-r--r--testsuite/tests/parser/should_fail/readFail046.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/readFail047.stderr3
-rw-r--r--testsuite/tests/parser/should_fail/readFail048.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/readFailTraditionalRecords1.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/readFailTraditionalRecords2.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/readFailTraditionalRecords3.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/strictnessDataCon_A.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/strictnessDataCon_B.stderr3
-rw-r--r--testsuite/tests/parser/should_fail/typeopsDataCon_A.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/typeopsDataCon_B.stderr3
-rw-r--r--testsuite/tests/parser/should_fail/typeops_A.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/typeops_B.stderr3
-rw-r--r--testsuite/tests/parser/should_fail/typeops_C.stderr3
-rw-r--r--testsuite/tests/parser/should_fail/typeops_D.stderr3
-rw-r--r--testsuite/tests/parser/should_fail/unpack_before_opr.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/unpack_empty_type.stderr3
-rw-r--r--testsuite/tests/parser/should_fail/unpack_inside_type.stderr2
167 files changed, 380 insertions, 252 deletions
diff --git a/testsuite/tests/parser/should_fail/ExportCommaComma.stderr b/testsuite/tests/parser/should_fail/ExportCommaComma.stderr
index e5cf1b5a5f..290d705077 100644
--- a/testsuite/tests/parser/should_fail/ExportCommaComma.stderr
+++ b/testsuite/tests/parser/should_fail/ExportCommaComma.stderr
@@ -1,2 +1,3 @@
-ExportCommaComma.hs:2:38: parse error on input ‘,’
+ExportCommaComma.hs:2:38: error: [GHC-58481]
+ parse error on input ‘,’
diff --git a/testsuite/tests/parser/should_fail/InfixAppPatErr.stderr b/testsuite/tests/parser/should_fail/InfixAppPatErr.stderr
index 4651dae571..ee84bdfdcc 100644
--- a/testsuite/tests/parser/should_fail/InfixAppPatErr.stderr
+++ b/testsuite/tests/parser/should_fail/InfixAppPatErr.stderr
@@ -1,3 +1,2 @@
-InfixAppPatErr.hs:2:7: error:
- do-notation in pattern
+InfixAppPatErr.hs:2:7: error: [GHC-06446] do-notation in pattern
diff --git a/testsuite/tests/parser/should_fail/NoBlockArgumentsFail.stderr b/testsuite/tests/parser/should_fail/NoBlockArgumentsFail.stderr
index bdb3301dea..4fa84606ac 100644
--- a/testsuite/tests/parser/should_fail/NoBlockArgumentsFail.stderr
+++ b/testsuite/tests/parser/should_fail/NoBlockArgumentsFail.stderr
@@ -1,7 +1,7 @@
-NoBlockArgumentsFail.hs:6:17: error:
+NoBlockArgumentsFail.hs:6:17: error: [GHC-52095]
Unexpected do block in function application:
do return ()
Suggested fixes:
- Use parentheses.
- Perhaps you intended to use BlockArguments
+ • Use parentheses.
+ • Perhaps you intended to use BlockArguments
diff --git a/testsuite/tests/parser/should_fail/NoBlockArgumentsFail2.stderr b/testsuite/tests/parser/should_fail/NoBlockArgumentsFail2.stderr
index 5b3a697f2e..f26f73713e 100644
--- a/testsuite/tests/parser/should_fail/NoBlockArgumentsFail2.stderr
+++ b/testsuite/tests/parser/should_fail/NoBlockArgumentsFail2.stderr
@@ -1,7 +1,7 @@
-NoBlockArgumentsFail2.hs:6:22: error:
+NoBlockArgumentsFail2.hs:6:22: error: [GHC-06074]
Unexpected lambda expression in function application:
\ x -> print x
Suggested fixes:
- Use parentheses.
- Perhaps you intended to use BlockArguments
+ • Use parentheses.
+ • Perhaps you intended to use BlockArguments
diff --git a/testsuite/tests/parser/should_fail/NoBlockArgumentsFail3.stderr b/testsuite/tests/parser/should_fail/NoBlockArgumentsFail3.stderr
index f6d7dca47a..5d1ccec759 100644
--- a/testsuite/tests/parser/should_fail/NoBlockArgumentsFail3.stderr
+++ b/testsuite/tests/parser/should_fail/NoBlockArgumentsFail3.stderr
@@ -1,7 +1,7 @@
-NoBlockArgumentsFail3.hs:7:22: error:
+NoBlockArgumentsFail3.hs:7:22: error: [GHC-77182]
Unexpected \case expression in function application:
\case Just 3 -> print x
Suggested fixes:
- Use parentheses.
- Perhaps you intended to use BlockArguments
+ • Use parentheses.
+ • Perhaps you intended to use BlockArguments
diff --git a/testsuite/tests/parser/should_fail/NoBlockArgumentsFailArrowCmds.stderr b/testsuite/tests/parser/should_fail/NoBlockArgumentsFailArrowCmds.stderr
index 504f4c738f..fbc86a8edc 100644
--- a/testsuite/tests/parser/should_fail/NoBlockArgumentsFailArrowCmds.stderr
+++ b/testsuite/tests/parser/should_fail/NoBlockArgumentsFailArrowCmds.stderr
@@ -1,7 +1,7 @@
-NoBlockArgumentsFailArrowCmds.hs:7:27: error:
+NoBlockArgumentsFailArrowCmds.hs:7:27: error: [GHC-12178]
Unexpected lambda command in function application:
\ () -> () >- returnA
Suggested fixes:
- Use parentheses.
- Perhaps you intended to use BlockArguments
+ • Use parentheses.
+ • Perhaps you intended to use BlockArguments
diff --git a/testsuite/tests/parser/should_fail/NoDoAndIfThenElse.stderr b/testsuite/tests/parser/should_fail/NoDoAndIfThenElse.stderr
index 26b8d8c617..d21b250482 100644
--- a/testsuite/tests/parser/should_fail/NoDoAndIfThenElse.stderr
+++ b/testsuite/tests/parser/should_fail/NoDoAndIfThenElse.stderr
@@ -1,5 +1,5 @@
-NoDoAndIfThenElse.hs:7:13:
+NoDoAndIfThenElse.hs:7:13: error: [GHC-75254]
Unexpected semi-colons in conditional:
if True; then return (); else return ()
Suggested fix: Perhaps you intended to use DoAndIfThenElse
diff --git a/testsuite/tests/parser/should_fail/NoNumericUnderscores0.stderr b/testsuite/tests/parser/should_fail/NoNumericUnderscores0.stderr
index ffe4a3f1dc..837688a9ba 100644
--- a/testsuite/tests/parser/should_fail/NoNumericUnderscores0.stderr
+++ b/testsuite/tests/parser/should_fail/NoNumericUnderscores0.stderr
@@ -1,4 +1,4 @@
-NoNumericUnderscores0.hs:11:3: error:
+NoNumericUnderscores0.hs:11:3: error: [GHC-62330]
Illegal underscores in integer literals
Suggested fix: Perhaps you intended to use NumericUnderscores
diff --git a/testsuite/tests/parser/should_fail/NoNumericUnderscores1.stderr b/testsuite/tests/parser/should_fail/NoNumericUnderscores1.stderr
index 242d10f22b..03a0da4c94 100644
--- a/testsuite/tests/parser/should_fail/NoNumericUnderscores1.stderr
+++ b/testsuite/tests/parser/should_fail/NoNumericUnderscores1.stderr
@@ -1,4 +1,4 @@
-NoNumericUnderscores1.hs:11:3: error:
+NoNumericUnderscores1.hs:11:3: error: [GHC-62330]
Illegal underscores in floating literals
Suggested fix: Perhaps you intended to use NumericUnderscores
diff --git a/testsuite/tests/parser/should_fail/NoPatternSynonyms.stderr b/testsuite/tests/parser/should_fail/NoPatternSynonyms.stderr
index 1785a14fc2..f4cd44c04a 100644
--- a/testsuite/tests/parser/should_fail/NoPatternSynonyms.stderr
+++ b/testsuite/tests/parser/should_fail/NoPatternSynonyms.stderr
@@ -1,4 +1,4 @@
-NoPatternSynonyms.hs:3:1: error:
+NoPatternSynonyms.hs:3:1: error: [GHC-94426]
Invalid type signature: pattern P :: ...
Suggested fix: Perhaps you intended to use PatternSynonyms
diff --git a/testsuite/tests/parser/should_fail/NumericUnderscoresFail0.stderr b/testsuite/tests/parser/should_fail/NumericUnderscoresFail0.stderr
index 8c872575a5..643346ad98 100644
--- a/testsuite/tests/parser/should_fail/NumericUnderscoresFail0.stderr
+++ b/testsuite/tests/parser/should_fail/NumericUnderscoresFail0.stderr
@@ -1,4 +1,42 @@
-NumericUnderscoresFail0.hs:9:5: error:
-NumericUnderscoresFail0.hs:11:13: error:
-NumericUnderscoresFail0.hs:11:20: error:
-NumericUnderscoresFail0.hs:12:13: error:
+
+NumericUnderscoresFail0.hs:9:5: error: [GHC-39999]
+ • Ambiguous type variable ‘a0’ arising from a use of ‘print’
+ prevents the constraint ‘(Show a0)’ from being solved.
+ Probable fix: use a type annotation to specify what ‘a0’ should be.
+ Potentially matching instances:
+ instance (Show a, Show b) => Show (Either a b)
+ -- Defined in ‘Data.Either’
+ instance Show Ordering -- Defined in ‘GHC.Show’
+ ...plus 26 others
+ ...plus 28 instances involving out-of-scope types
+ (use -fprint-potential-instances to see them all)
+ • In a stmt of a 'do' block: print [1000000 _, _1000000]
+ In the expression: do print [1000000 _, _1000000]
+ In an equation for ‘main’: main = do print [1000000 _, ....]
+
+NumericUnderscoresFail0.hs:11:13: error: [GHC-39999]
+ • No instance for ‘Num (t0 -> a0)’
+ arising from the literal ‘1000000’
+ (maybe you haven't applied a function to enough arguments?)
+ • In the expression: 1000000 _
+ In the first argument of ‘print’, namely ‘[1000000 _, _1000000]’
+ In a stmt of a 'do' block: print [1000000 _, _1000000]
+
+NumericUnderscoresFail0.hs:11:20: error: [GHC-88464]
+ • Found hole: _ :: t0
+ Where: ‘t0’ is an ambiguous type variable
+ • In the first argument of ‘1000000’, namely ‘_’
+ In the expression: 1000000 _
+ In the first argument of ‘print’, namely ‘[1000000 _, _1000000]’
+ • Relevant bindings include
+ main :: IO () (bound at NumericUnderscoresFail0.hs:8:1)
+
+NumericUnderscoresFail0.hs:12:13: error: [GHC-88464]
+ • Found hole: _1000000 :: a0
+ Where: ‘a0’ is an ambiguous type variable
+ Or perhaps ‘_1000000’ is mis-spelled, or not in scope
+ • In the first argument of ‘print’, namely ‘[1000000 _, _1000000]’
+ In a stmt of a 'do' block: print [1000000 _, _1000000]
+ In the expression: do print [1000000 _, _1000000]
+ • Relevant bindings include
+ main :: IO () (bound at NumericUnderscoresFail0.hs:8:1)
diff --git a/testsuite/tests/parser/should_fail/NumericUnderscoresFail1.stderr b/testsuite/tests/parser/should_fail/NumericUnderscoresFail1.stderr
index e1c91de091..12320087e1 100644
--- a/testsuite/tests/parser/should_fail/NumericUnderscoresFail1.stderr
+++ b/testsuite/tests/parser/should_fail/NumericUnderscoresFail1.stderr
@@ -1,7 +1,59 @@
-NumericUnderscoresFail1.hs:11:14: error:
-NumericUnderscoresFail1.hs:13:19: error:
-NumericUnderscoresFail1.hs:14:15: error:
-NumericUnderscoresFail1.hs:17:14: error: Variable not in scope: e_
-NumericUnderscoresFail1.hs:18:18: error:
-NumericUnderscoresFail1.hs:19:14: error: Variable not in scope: e
-NumericUnderscoresFail1.hs:19:16: error:
+
+NumericUnderscoresFail1.hs:11:14: error: [GHC-88464]
+ • Found hole: _ :: t4
+ Where: ‘t4’ is an ambiguous type variable
+ • In the first argument of ‘0’, namely ‘_’
+ In the first argument of ‘(.)’, namely ‘0 _’
+ In the expression: 0 _ . 0001
+ • Relevant bindings include
+ main :: IO () (bound at NumericUnderscoresFail1.hs:8:1)
+
+NumericUnderscoresFail1.hs:13:19: error: [GHC-88464]
+ • Found hole: _ :: t3
+ Where: ‘t3’ is an ambiguous type variable
+ • In the first argument of ‘0.0001’, namely ‘_’
+ In the expression: 0.0001 _
+ In the first argument of ‘print’, namely
+ ‘[0 _ . 0001, _0.0001, 0.0001 _, 0 . _0001, ....]’
+ • Relevant bindings include
+ main :: IO () (bound at NumericUnderscoresFail1.hs:8:1)
+
+NumericUnderscoresFail1.hs:14:15: error: [GHC-88464]
+ • Found hole: _0001 :: a0 -> b1
+ Where: ‘a0’ is an ambiguous type variable
+ ‘b1’ is an ambiguous type variable
+ Or perhaps ‘_0001’ is mis-spelled, or not in scope
+ • In the second argument of ‘(.)’, namely ‘_0001’
+ In the expression: 0 . _0001
+ In the first argument of ‘print’, namely
+ ‘[0 _ . 0001, _0.0001, 0.0001 _, 0 . _0001, ....]’
+ • Relevant bindings include
+ main :: IO () (bound at NumericUnderscoresFail1.hs:8:1)
+
+NumericUnderscoresFail1.hs:17:14: error: [GHC-88464]
+ Variable not in scope: e_
+
+NumericUnderscoresFail1.hs:18:18: error: [GHC-88464]
+ • Found hole: _ :: t1
+ Where: ‘t1’ is an ambiguous type variable
+ • In the first argument of ‘1e+23’, namely ‘_’
+ In the expression: 1e+23 _
+ In the first argument of ‘print’, namely
+ ‘[0 _ . 0001, _0.0001, 0.0001 _, 0 . _0001, ....]’
+ • Relevant bindings include
+ main :: IO () (bound at NumericUnderscoresFail1.hs:8:1)
+
+NumericUnderscoresFail1.hs:19:14: error: [GHC-88464]
+ Variable not in scope: e
+
+NumericUnderscoresFail1.hs:19:16: error: [GHC-88464]
+ • Found hole: _23 :: a0 -> c0
+ Where: ‘a0’ is an ambiguous type variable
+ ‘c0’ is an ambiguous type variable
+ Or perhaps ‘_23’ is mis-spelled, or not in scope
+ • In the second argument of ‘(+)’, namely ‘_23’
+ In the expression: 1 e + _23
+ In the first argument of ‘print’, namely
+ ‘[0 _ . 0001, _0.0001, 0.0001 _, 0 . _0001, ....]’
+ • Relevant bindings include
+ main :: IO () (bound at NumericUnderscoresFail1.hs:8:1)
diff --git a/testsuite/tests/parser/should_fail/OpaqueParseFail1.stderr b/testsuite/tests/parser/should_fail/OpaqueParseFail1.stderr
index 057b3a8f92..db44ac6b31 100644
--- a/testsuite/tests/parser/should_fail/OpaqueParseFail1.stderr
+++ b/testsuite/tests/parser/should_fail/OpaqueParseFail1.stderr
@@ -1,2 +1,3 @@
-OpaqueParseFail1.hs:4:11: error:
+
+OpaqueParseFail1.hs:4:11: error: [GHC-58481]
parse error on input ‘[’
diff --git a/testsuite/tests/parser/should_fail/OpaqueParseFail2.stderr b/testsuite/tests/parser/should_fail/OpaqueParseFail2.stderr
index 5c4063bd23..6d1fd99d3c 100644
--- a/testsuite/tests/parser/should_fail/OpaqueParseFail2.stderr
+++ b/testsuite/tests/parser/should_fail/OpaqueParseFail2.stderr
@@ -1,2 +1,3 @@
-OpaqueParseFail2.hs:4:12: error:
+
+OpaqueParseFail2.hs:4:12: error: [GHC-58481]
parse error on input ‘SPECIALISE’
diff --git a/testsuite/tests/parser/should_fail/OpaqueParseFail3.stderr b/testsuite/tests/parser/should_fail/OpaqueParseFail3.stderr
index 7680f18ead..618b859d80 100644
--- a/testsuite/tests/parser/should_fail/OpaqueParseFail3.stderr
+++ b/testsuite/tests/parser/should_fail/OpaqueParseFail3.stderr
@@ -1,2 +1,3 @@
-OpaqueParseFail3.hs:4:12: error:
+
+OpaqueParseFail3.hs:4:12: error: [GHC-58481]
parse error on input ‘CONLIKE’
diff --git a/testsuite/tests/parser/should_fail/ParserNoBinaryLiterals1.stderr b/testsuite/tests/parser/should_fail/ParserNoBinaryLiterals1.stderr
index d222e5d11c..4ddbbb01f5 100644
--- a/testsuite/tests/parser/should_fail/ParserNoBinaryLiterals1.stderr
+++ b/testsuite/tests/parser/should_fail/ParserNoBinaryLiterals1.stderr
@@ -1,5 +1,5 @@
-ParserNoBinaryLiterals1.hs:5:1: error:
+ParserNoBinaryLiterals1.hs:5:1: error: [GHC-91938]
Equations for ‘f’ have different numbers of arguments
ParserNoBinaryLiterals1.hs:5:1-10
ParserNoBinaryLiterals1.hs:6:1-10
diff --git a/testsuite/tests/parser/should_fail/ParserNoForallUnicode.stderr b/testsuite/tests/parser/should_fail/ParserNoForallUnicode.stderr
index 0d8841c676..a47b03b133 100644
--- a/testsuite/tests/parser/should_fail/ParserNoForallUnicode.stderr
+++ b/testsuite/tests/parser/should_fail/ParserNoForallUnicode.stderr
@@ -1,5 +1,5 @@
-ParserNoForallUnicode.hs:6:8: error:
+ParserNoForallUnicode.hs:6:8: error: [GHC-25955]
Illegal symbol ‘∀’ in type
Suggested fix:
Perhaps you intended to use RankNTypes
diff --git a/testsuite/tests/parser/should_fail/ParserNoLambdaCase.stderr b/testsuite/tests/parser/should_fail/ParserNoLambdaCase.stderr
index ef1d3d6b83..35ea9ecd47 100644
--- a/testsuite/tests/parser/should_fail/ParserNoLambdaCase.stderr
+++ b/testsuite/tests/parser/should_fail/ParserNoLambdaCase.stderr
@@ -1,3 +1,4 @@
-ParserNoLambdaCase.hs:3:6:
+
+ParserNoLambdaCase.hs:3:6: error: [GHC-51179]
Illegal \case
Suggested fix: Perhaps you intended to use LambdaCase
diff --git a/testsuite/tests/parser/should_fail/ParserNoMultiWayIf.stderr b/testsuite/tests/parser/should_fail/ParserNoMultiWayIf.stderr
index 22258fa51c..24f39642bd 100644
--- a/testsuite/tests/parser/should_fail/ParserNoMultiWayIf.stderr
+++ b/testsuite/tests/parser/should_fail/ParserNoMultiWayIf.stderr
@@ -1,4 +1,4 @@
-ParserNoMultiWayIf.hs:4:5:
+ParserNoMultiWayIf.hs:4:5: error: [GHC-28985]
Illegal multi-way if-expression
Suggested fix: Perhaps you intended to use MultiWayIf
diff --git a/testsuite/tests/parser/should_fail/ParserNoTH1.stderr b/testsuite/tests/parser/should_fail/ParserNoTH1.stderr
index 56fffbd525..eeb32bffca 100644
--- a/testsuite/tests/parser/should_fail/ParserNoTH1.stderr
+++ b/testsuite/tests/parser/should_fail/ParserNoTH1.stderr
@@ -1,9 +1,9 @@
-ParserNoTH1.hs:1:5: warning: [-Woperator-whitespace-ext-conflict (in -Wdefault)]
+ParserNoTH1.hs:1:5: warning: [GHC-47082] [-Woperator-whitespace-ext-conflict (in -Wdefault)]
The prefix use of a ‘$’ would denote an untyped splice
were the TemplateHaskell extension enabled.
Suggested fix: Add whitespace after the ‘$’.
-ParserNoTH1.hs:1:5: error:
+ParserNoTH1.hs:1:5: error: [GHC-58481]
parse error on input ‘$’
Suggested fix: Perhaps you intended to use TemplateHaskell
diff --git a/testsuite/tests/parser/should_fail/ParserNoTH2.stderr b/testsuite/tests/parser/should_fail/ParserNoTH2.stderr
index 4f3bba9085..4873078fa8 100644
--- a/testsuite/tests/parser/should_fail/ParserNoTH2.stderr
+++ b/testsuite/tests/parser/should_fail/ParserNoTH2.stderr
@@ -1,9 +1,9 @@
-ParserNoTH2.hs:1:5: warning: [-Woperator-whitespace-ext-conflict (in -Wdefault)]
+ParserNoTH2.hs:1:5: warning: [GHC-47082] [-Woperator-whitespace-ext-conflict (in -Wdefault)]
The prefix use of a ‘$$’ would denote a typed splice
were the TemplateHaskell extension enabled.
Suggested fix: Add whitespace after the ‘$$’.
-ParserNoTH2.hs:1:5: error:
+ParserNoTH2.hs:1:5: error: [GHC-58481]
parse error on input ‘$$’
Suggested fix: Perhaps you intended to use TemplateHaskell
diff --git a/testsuite/tests/parser/should_fail/RecordDotSyntaxFail0.stderr b/testsuite/tests/parser/should_fail/RecordDotSyntaxFail0.stderr
index 6e4a3fbae6..c7b9ec4171 100644
--- a/testsuite/tests/parser/should_fail/RecordDotSyntaxFail0.stderr
+++ b/testsuite/tests/parser/should_fail/RecordDotSyntaxFail0.stderr
@@ -1,2 +1,3 @@
- RecordDotSyntaxFail0.hs:3:12:
+
+RecordDotSyntaxFail0.hs:3:12: error: [GHC-26832]
Use of OverloadedRecordDot '.' not valid ('.' isn't allowed when constructing records or in record patterns)
diff --git a/testsuite/tests/parser/should_fail/RecordDotSyntaxFail1.stderr b/testsuite/tests/parser/should_fail/RecordDotSyntaxFail1.stderr
index f1ab2b9f95..c52aee6f5a 100644
--- a/testsuite/tests/parser/should_fail/RecordDotSyntaxFail1.stderr
+++ b/testsuite/tests/parser/should_fail/RecordDotSyntaxFail1.stderr
@@ -1,2 +1,3 @@
-RecordDotSyntaxFail1.hs:3:10:
+
+RecordDotSyntaxFail1.hs:3:10: error: [GHC-26832]
Use of OverloadedRecordDot '.' not valid ('.' isn't allowed when constructing records or in record patterns)
diff --git a/testsuite/tests/parser/should_fail/RecordDotSyntaxFail10.stderr b/testsuite/tests/parser/should_fail/RecordDotSyntaxFail10.stderr
index f36e3d9385..0051ba2c35 100644
--- a/testsuite/tests/parser/should_fail/RecordDotSyntaxFail10.stderr
+++ b/testsuite/tests/parser/should_fail/RecordDotSyntaxFail10.stderr
@@ -1,5 +1,5 @@
-RecordDotSyntaxFail10.hs:40:11: error:
+RecordDotSyntaxFail10.hs:40:11: error: [GHC-18872]
• Couldn't match type ‘Int’ with ‘[Char]’
• In the second argument of ‘($)’, namely ‘a {foo.bar.baz.quux}’
In a stmt of a 'do' block: print $ a {foo.bar.baz.quux}
diff --git a/testsuite/tests/parser/should_fail/RecordDotSyntaxFail11.stderr b/testsuite/tests/parser/should_fail/RecordDotSyntaxFail11.stderr
index 173a24d7c1..d7b422da8d 100644
--- a/testsuite/tests/parser/should_fail/RecordDotSyntaxFail11.stderr
+++ b/testsuite/tests/parser/should_fail/RecordDotSyntaxFail11.stderr
@@ -1,5 +1,5 @@
-RecordDotSyntaxFail11.hs:8:3: error:
+RecordDotSyntaxFail11.hs:8:3: error: [GHC-39999]
• Ambiguous type variable ‘a0’ arising from a use of ‘print’
prevents the constraint ‘(Show a0)’ from being solved.
Probable fix: use a type annotation to specify what ‘a0’ should be.
@@ -15,7 +15,7 @@ RecordDotSyntaxFail11.hs:8:3: error:
do let a = ...
print $ (.foo.bar.baz) a
-RecordDotSyntaxFail11.hs:8:11: error:
+RecordDotSyntaxFail11.hs:8:11: error: [GHC-39999]
• No instance for ‘GHC.Records.HasField "baz" Int a0’
• In the second argument of ‘($)’, namely ‘(.foo.bar.baz) a’
In a stmt of a 'do' block: print $ (.foo.bar.baz) a
diff --git a/testsuite/tests/parser/should_fail/RecordDotSyntaxFail12.stderr b/testsuite/tests/parser/should_fail/RecordDotSyntaxFail12.stderr
index 63cdbea4b4..edbfbb9432 100644
--- a/testsuite/tests/parser/should_fail/RecordDotSyntaxFail12.stderr
+++ b/testsuite/tests/parser/should_fail/RecordDotSyntaxFail12.stderr
@@ -1,13 +1,13 @@
-RecordDotSyntaxFail12.hs:124:25: error:
+RecordDotSyntaxFail12.hs:124:25: error: [GHC-44287]
Illegal use of punning for field ‘quux’
Suggested fix: Perhaps you intended to use NamedFieldPuns
-RecordDotSyntaxFail12.hs:124:46: error:
+RecordDotSyntaxFail12.hs:124:46: error: [GHC-44287]
Illegal use of punning for field ‘baz’
Suggested fix: Perhaps you intended to use NamedFieldPuns
-RecordDotSyntaxFail12.hs:124:65: error:
+RecordDotSyntaxFail12.hs:124:65: error: [GHC-44287]
Illegal use of punning for field ‘bar’
Suggested fix: Perhaps you intended to use NamedFieldPuns
diff --git a/testsuite/tests/parser/should_fail/RecordDotSyntaxFail13.stderr b/testsuite/tests/parser/should_fail/RecordDotSyntaxFail13.stderr
index 24c3f2a59b..06ed8037bd 100644
--- a/testsuite/tests/parser/should_fail/RecordDotSyntaxFail13.stderr
+++ b/testsuite/tests/parser/should_fail/RecordDotSyntaxFail13.stderr
@@ -1,5 +1,5 @@
-RecordDotSyntaxFail13.hs:26:11: error:
+RecordDotSyntaxFail13.hs:26:11: error: [GHC-18872]
• Couldn't match type ‘Int’ with ‘Foo -> Int’
arising from a functional dependency between:
constraint ‘HasField "foo" Foo (Foo -> Int)’
diff --git a/testsuite/tests/parser/should_fail/RecordDotSyntaxFail2.stderr b/testsuite/tests/parser/should_fail/RecordDotSyntaxFail2.stderr
index 430bb53a5e..353ae4bc90 100644
--- a/testsuite/tests/parser/should_fail/RecordDotSyntaxFail2.stderr
+++ b/testsuite/tests/parser/should_fail/RecordDotSyntaxFail2.stderr
@@ -1,3 +1,4 @@
-RecordDotSyntaxFail2.hs:10:10:
+
+RecordDotSyntaxFail2.hs:10:10: error: [GHC-82135]
Illegal overloaded record update
Suggested fix: Perhaps you intended to use OverloadedRecordUpdate
diff --git a/testsuite/tests/parser/should_fail/RecordDotSyntaxFail3.stderr b/testsuite/tests/parser/should_fail/RecordDotSyntaxFail3.stderr
index 674b0c1e50..ecdc64fe6f 100644
--- a/testsuite/tests/parser/should_fail/RecordDotSyntaxFail3.stderr
+++ b/testsuite/tests/parser/should_fail/RecordDotSyntaxFail3.stderr
@@ -1 +1,3 @@
-RecordDotSyntaxFail3.hs:22:14: parse error on input ‘(’
+
+RecordDotSyntaxFail3.hs:22:14: error: [GHC-58481]
+ parse error on input ‘(’
diff --git a/testsuite/tests/parser/should_fail/RecordDotSyntaxFail4.stderr b/testsuite/tests/parser/should_fail/RecordDotSyntaxFail4.stderr
index 4ffc9df51e..68f861c2ca 100644
--- a/testsuite/tests/parser/should_fail/RecordDotSyntaxFail4.stderr
+++ b/testsuite/tests/parser/should_fail/RecordDotSyntaxFail4.stderr
@@ -1,2 +1,3 @@
-RecordDotSyntaxFail4.hs:7:29: error:
+
+RecordDotSyntaxFail4.hs:7:29: error: [GHC-58481]
parse error on input ‘.’
diff --git a/testsuite/tests/parser/should_fail/RecordDotSyntaxFail6.stderr b/testsuite/tests/parser/should_fail/RecordDotSyntaxFail6.stderr
index c9bb7f6647..ff121e238e 100644
--- a/testsuite/tests/parser/should_fail/RecordDotSyntaxFail6.stderr
+++ b/testsuite/tests/parser/should_fail/RecordDotSyntaxFail6.stderr
@@ -1,5 +1,5 @@
[1 of 3] Compiling RecordDotSyntaxA ( RecordDotSyntaxA.hs, RecordDotSyntaxA.o )
[2 of 3] Compiling Main ( RecordDotSyntaxFail6.hs, RecordDotSyntaxFail6.o )
-RecordDotSyntaxFail6.hs:10:17: error:
+RecordDotSyntaxFail6.hs:10:17: error: [GHC-94863]
Fields cannot be qualified when OverloadedRecordUpdate is enabled
diff --git a/testsuite/tests/parser/should_fail/RecordDotSyntaxFail7.stderr b/testsuite/tests/parser/should_fail/RecordDotSyntaxFail7.stderr
index 0b0cfcc03a..b1db7bb533 100644
--- a/testsuite/tests/parser/should_fail/RecordDotSyntaxFail7.stderr
+++ b/testsuite/tests/parser/should_fail/RecordDotSyntaxFail7.stderr
@@ -1,4 +1,5 @@
[1 of 3] Compiling RecordDotSyntaxA ( RecordDotSyntaxA.hs, RecordDotSyntaxA.o )
[2 of 3] Compiling Main ( RecordDotSyntaxFail7.hs, RecordDotSyntaxFail7.o )
-RecordDotSyntaxFail7.hs:9:16: error: parse error on input ‘A.foo’
+RecordDotSyntaxFail7.hs:9:16: error: [GHC-58481]
+ parse error on input ‘A.foo’
diff --git a/testsuite/tests/parser/should_fail/RecordDotSyntaxFail8.stderr b/testsuite/tests/parser/should_fail/RecordDotSyntaxFail8.stderr
index 195379434c..15d3d96e86 100644
--- a/testsuite/tests/parser/should_fail/RecordDotSyntaxFail8.stderr
+++ b/testsuite/tests/parser/should_fail/RecordDotSyntaxFail8.stderr
@@ -1,5 +1,5 @@
-RecordDotSyntaxFail8.hs:37:3: error:
+RecordDotSyntaxFail8.hs:37:3: error: [GHC-39999]
• Ambiguous type variable ‘a0’ arising from a use of ‘print’
prevents the constraint ‘(Show a0)’ from being solved.
Probable fix: use a type annotation to specify what ‘a0’ should be.
@@ -15,7 +15,7 @@ RecordDotSyntaxFail8.hs:37:3: error:
do let a = ...
print $ ....quux
-RecordDotSyntaxFail8.hs:37:11: error:
+RecordDotSyntaxFail8.hs:37:11: error: [GHC-39999]
• No instance for ‘HasField "quux" Quux a0’
arising from selecting the field ‘quux’
• In the second argument of ‘($)’, namely ‘....baz.quux’
diff --git a/testsuite/tests/parser/should_fail/RecordDotSyntaxFail9.stderr b/testsuite/tests/parser/should_fail/RecordDotSyntaxFail9.stderr
index ee15f9fc6b..49fc6560d3 100644
--- a/testsuite/tests/parser/should_fail/RecordDotSyntaxFail9.stderr
+++ b/testsuite/tests/parser/should_fail/RecordDotSyntaxFail9.stderr
@@ -1,7 +1,8 @@
-RecordDotSyntaxFail9.hs:7:11:
- Couldn't match type ‘Int’ with ‘[Char]’
+
+RecordDotSyntaxFail9.hs:7:11: error: [GHC-18872]
+ • Couldn't match type ‘Int’ with ‘[Char]’
arising from selecting the field ‘foo’
- In the expression: a.foo :: String
+ • In the expression: a.foo :: String
In a pattern binding: _ = a.foo :: String
In the expression:
do let a = ...
diff --git a/testsuite/tests/parser/should_fail/RecordWildCardsFail.stderr b/testsuite/tests/parser/should_fail/RecordWildCardsFail.stderr
index 2f7958b45c..5422e429e2 100644
--- a/testsuite/tests/parser/should_fail/RecordWildCardsFail.stderr
+++ b/testsuite/tests/parser/should_fail/RecordWildCardsFail.stderr
@@ -1,3 +1,4 @@
-RecordWildCardsFail.hs:7:5:
+
+RecordWildCardsFail.hs:7:5: error: [GHC-37132]
Illegal `..' in record pattern
Suggested fix: Perhaps you intended to use RecordWildCards
diff --git a/testsuite/tests/parser/should_fail/T10196Fail1.stderr b/testsuite/tests/parser/should_fail/T10196Fail1.stderr
index 3c4a173eef..1520c4d921 100644
--- a/testsuite/tests/parser/should_fail/T10196Fail1.stderr
+++ b/testsuite/tests/parser/should_fail/T10196Fail1.stderr
@@ -1,2 +1,3 @@
-T10196Fail1.hs:4:12: error: lexical error at character '\7526'
+T10196Fail1.hs:4:12: error: [GHC-21231]
+ lexical error at character '\7526'
diff --git a/testsuite/tests/parser/should_fail/T10196Fail2.stderr b/testsuite/tests/parser/should_fail/T10196Fail2.stderr
index abba8aa04c..43f1ab1e6a 100644
--- a/testsuite/tests/parser/should_fail/T10196Fail2.stderr
+++ b/testsuite/tests/parser/should_fail/T10196Fail2.stderr
@@ -1,2 +1,3 @@
-T10196Fail2.hs:4:1: error: lexical error at character '\7526'
+T10196Fail2.hs:4:1: error: [GHC-21231]
+ lexical error at character '\7526'
diff --git a/testsuite/tests/parser/should_fail/T10498a.stderr b/testsuite/tests/parser/should_fail/T10498a.stderr
index 8b866f35f2..519b9e5018 100644
--- a/testsuite/tests/parser/should_fail/T10498a.stderr
+++ b/testsuite/tests/parser/should_fail/T10498a.stderr
@@ -1,2 +1,2 @@
-T10498a.hs:12:15: error: parse error on input ‘->’
+T10498a.hs:12:15: error: [GHC-58481] parse error on input ‘->’
diff --git a/testsuite/tests/parser/should_fail/T10498b.stderr b/testsuite/tests/parser/should_fail/T10498b.stderr
index e15343b891..2c6ee1d635 100644
--- a/testsuite/tests/parser/should_fail/T10498b.stderr
+++ b/testsuite/tests/parser/should_fail/T10498b.stderr
@@ -1,2 +1,2 @@
-T10498b.hs:7:8: error: parse error on input ‘module’
+T10498b.hs:7:8: error: [GHC-58481] parse error on input ‘module’
diff --git a/testsuite/tests/parser/should_fail/T12045d.stderr b/testsuite/tests/parser/should_fail/T12045d.stderr
index a731352f10..dbbd71322c 100644
--- a/testsuite/tests/parser/should_fail/T12045d.stderr
+++ b/testsuite/tests/parser/should_fail/T12045d.stderr
@@ -1,3 +1,3 @@
-T12045d.hs:11:16: error:
+T12045d.hs:11:16: error: [GHC-83653]
Unexpected kind application in a data/newtype declaration: MkD @Nat
diff --git a/testsuite/tests/parser/should_fail/T12051.stderr b/testsuite/tests/parser/should_fail/T12051.stderr
index ae65eaea6e..0f1624b6d8 100644
--- a/testsuite/tests/parser/should_fail/T12051.stderr
+++ b/testsuite/tests/parser/should_fail/T12051.stderr
@@ -1,2 +1,2 @@
-T12051.hs:3:10: error: Not a data constructor: ‘+++’
+T12051.hs:3:10: error: [GHC-25742] Not a data constructor: ‘+++’
diff --git a/testsuite/tests/parser/should_fail/T12429.stderr b/testsuite/tests/parser/should_fail/T12429.stderr
index eab51a5646..d6f9ee0088 100644
--- a/testsuite/tests/parser/should_fail/T12429.stderr
+++ b/testsuite/tests/parser/should_fail/T12429.stderr
@@ -1,4 +1,4 @@
-T12429.hs:2:29: error:
+T12429.hs:2:29: error: [GHC-58481]
parse error on input ‘Y’
Suggested fix: Perhaps you intended to use PatternSynonyms
diff --git a/testsuite/tests/parser/should_fail/T12610.stderr b/testsuite/tests/parser/should_fail/T12610.stderr
index 2eb924bfb0..63c171dbc9 100644
--- a/testsuite/tests/parser/should_fail/T12610.stderr
+++ b/testsuite/tests/parser/should_fail/T12610.stderr
@@ -1,6 +1,6 @@
-T12610.hs:5:1: warning: [-Wtabs (in -Wdefault)]
+T12610.hs:5:1: warning: [GHC-94817] [-Wtabs (in -Wdefault)]
Tab character found here.
Suggested fix: Please use spaces instead.
-T12610.hs:5:9: parse error on input ‘y’
+T12610.hs:5:9: error: [GHC-58481] parse error on input ‘y’
diff --git a/testsuite/tests/parser/should_fail/T12811.stderr b/testsuite/tests/parser/should_fail/T12811.stderr
index ec4c79bef9..9f3937d498 100644
--- a/testsuite/tests/parser/should_fail/T12811.stderr
+++ b/testsuite/tests/parser/should_fail/T12811.stderr
@@ -1,6 +1,7 @@
-T12811.hs:5:15: error:
+T12811.hs:5:15: error: [GHC-62547]
Illegal operator ‘.’ in type ‘foral a . a’
Suggested fix: Perhaps you intended to use TypeOperators
-T12811.hs:5:15: error: Not in scope: type constructor or class ‘.’
+T12811.hs:5:15: error: [GHC-76037]
+ Not in scope: type constructor or class ‘.’
diff --git a/testsuite/tests/parser/should_fail/T13260.stderr b/testsuite/tests/parser/should_fail/T13260.stderr
index 05e99d60ee..88ddc42caa 100644
--- a/testsuite/tests/parser/should_fail/T13260.stderr
+++ b/testsuite/tests/parser/should_fail/T13260.stderr
@@ -1,4 +1,4 @@
-T13260.hs:6:5: error:
+T13260.hs:6:5: error: [GHC-69925]
Illegal unboxed string literal in pattern:
"a"#
diff --git a/testsuite/tests/parser/should_fail/T13414.stderr b/testsuite/tests/parser/should_fail/T13414.stderr
index f5b0001ef1..19e3aefd49 100644
--- a/testsuite/tests/parser/should_fail/T13414.stderr
+++ b/testsuite/tests/parser/should_fail/T13414.stderr
@@ -1,2 +1,3 @@
-T13414.lhs:3:10: error: Variable not in scope: invalid_ident_
+T13414.lhs:3:10: error: [GHC-88464]
+ Variable not in scope: invalid_ident_
diff --git a/testsuite/tests/parser/should_fail/T1344a.stderr b/testsuite/tests/parser/should_fail/T1344a.stderr
index a7c203c1c5..1c11ec917d 100644
--- a/testsuite/tests/parser/should_fail/T1344a.stderr
+++ b/testsuite/tests/parser/should_fail/T1344a.stderr
@@ -1,3 +1,3 @@
-T1344a.hs:3:16:
+T1344a.hs:3:16: error: [GHC-21231]
numeric escape sequence out of range at character '0'
diff --git a/testsuite/tests/parser/should_fail/T1344b.stderr b/testsuite/tests/parser/should_fail/T1344b.stderr
index 7b05c0fb2b..842f1b3d85 100644
--- a/testsuite/tests/parser/should_fail/T1344b.stderr
+++ b/testsuite/tests/parser/should_fail/T1344b.stderr
@@ -1,3 +1,3 @@
-T1344b.hs:3:16:
+T1344b.hs:3:16: error: [GHC-21231]
numeric escape sequence out of range at character '0'
diff --git a/testsuite/tests/parser/should_fail/T1344c.stderr b/testsuite/tests/parser/should_fail/T1344c.stderr
index 57ad0592bd..d0ee7b34dc 100644
--- a/testsuite/tests/parser/should_fail/T1344c.stderr
+++ b/testsuite/tests/parser/should_fail/T1344c.stderr
@@ -1,3 +1,3 @@
-T1344c.hs:3:13:
+T1344c.hs:3:13: error: [GHC-21231]
numeric escape sequence out of range at character '2'
diff --git a/testsuite/tests/parser/should_fail/T13450.stderr b/testsuite/tests/parser/should_fail/T13450.stderr
index 6e0beb32cc..41e16f138c 100644
--- a/testsuite/tests/parser/should_fail/T13450.stderr
+++ b/testsuite/tests/parser/should_fail/T13450.stderr
@@ -1,4 +1,4 @@
-T13450.hs:4:15: error:
+T13450.hs:4:15: error: [GHC-11861]
Parser error on `''`
Character literals may not be empty
diff --git a/testsuite/tests/parser/should_fail/T13450TH.stderr b/testsuite/tests/parser/should_fail/T13450TH.stderr
index 1d6fdfbb1a..b15f3ec2f0 100644
--- a/testsuite/tests/parser/should_fail/T13450TH.stderr
+++ b/testsuite/tests/parser/should_fail/T13450TH.stderr
@@ -1,5 +1,5 @@
-T13450TH.hs:6:15: error:
+T13450TH.hs:6:15: error: [GHC-11861]
Parser error on `''`
Character literals may not be empty
Suggested fix:
diff --git a/testsuite/tests/parser/should_fail/T14588.stderr b/testsuite/tests/parser/should_fail/T14588.stderr
index 04e4478198..dd947efa54 100644
--- a/testsuite/tests/parser/should_fail/T14588.stderr
+++ b/testsuite/tests/parser/should_fail/T14588.stderr
@@ -1,5 +1,5 @@
-T14588.hs:4:19: error:
+T14588.hs:4:19: error: [GHC-79767]
Illegal bang-pattern
!x
Suggested fix: Perhaps you intended to use BangPatterns
diff --git a/testsuite/tests/parser/should_fail/T14740.stderr b/testsuite/tests/parser/should_fail/T14740.stderr
index 8827873e25..5a047c03ba 100644
--- a/testsuite/tests/parser/should_fail/T14740.stderr
+++ b/testsuite/tests/parser/should_fail/T14740.stderr
@@ -1,4 +1,4 @@
-T14740.hs:5:7:
- Expecting a lifted type, but ‘(# #)’ is unlifted
- In the type signature: x :: ((# #)) => ()
+T14740.hs:5:7: error: [GHC-83865]
+ • Expecting a lifted type, but ‘(# #)’ is unlifted
+ • In the type signature: x :: ((# #)) => ()
diff --git a/testsuite/tests/parser/should_fail/T15053.stderr b/testsuite/tests/parser/should_fail/T15053.stderr
index 0544327c5e..25d71d056f 100644
--- a/testsuite/tests/parser/should_fail/T15053.stderr
+++ b/testsuite/tests/parser/should_fail/T15053.stderr
@@ -1,5 +1,6 @@
-T15053.hs:1:16:
+
+T15053.hs:1:16: error: [GHC-24342]
Error while parsing OPTIONS_GHC pragma.
Expecting whitespace-separated list of GHC options.
E.g. {-# OPTIONS_GHC -Wall -O2 #-}
- Input was: " -O1 }/n/"/n "
+ Input was: " -O1 }\n\"\n "
diff --git a/testsuite/tests/parser/should_fail/T15209.stderr b/testsuite/tests/parser/should_fail/T15209.stderr
index 23f8876d67..0b2414fd0b 100644
--- a/testsuite/tests/parser/should_fail/T15209.stderr
+++ b/testsuite/tests/parser/should_fail/T15209.stderr
@@ -1,5 +1,5 @@
-T15209.hs:6:10: error:
+T15209.hs:6:10: error: [GHC-76037]
Not in scope: type constructor or class ‘~#’
Suggested fix:
Perhaps use one of these:
diff --git a/testsuite/tests/parser/should_fail/T15233.stderr b/testsuite/tests/parser/should_fail/T15233.stderr
index 3371bef758..b1741a189c 100644
--- a/testsuite/tests/parser/should_fail/T15233.stderr
+++ b/testsuite/tests/parser/should_fail/T15233.stderr
@@ -1,8 +1,9 @@
-T15233.hs:4:10: error:
+T15233.hs:4:10: error: [GHC-39716]
Illegal fixity signature of built-in syntax: :
-T15233.hs:5:16: error: Illegal deprecation of built-in syntax: :
+T15233.hs:5:16: error: [GHC-39716]
+ Illegal deprecation of built-in syntax: :
-T15233.hs:9:10: error:
+T15233.hs:9:10: error: [GHC-39716]
Illegal fixity signature of built-in syntax: ->
diff --git a/testsuite/tests/parser/should_fail/T15730.stderr b/testsuite/tests/parser/should_fail/T15730.stderr
index 7eb649e1b6..433ca1a933 100644
--- a/testsuite/tests/parser/should_fail/T15730.stderr
+++ b/testsuite/tests/parser/should_fail/T15730.stderr
@@ -1,3 +1,3 @@
-T15730.hs:3:9: error:
+T15730.hs:3:9: error: [GHC-85314]
A pragma is not allowed in this position: {-# SCC ann #-}
diff --git a/testsuite/tests/parser/should_fail/T15730b.stderr b/testsuite/tests/parser/should_fail/T15730b.stderr
index 032c5a49f4..129c2b8702 100644
--- a/testsuite/tests/parser/should_fail/T15730b.stderr
+++ b/testsuite/tests/parser/should_fail/T15730b.stderr
@@ -1,3 +1,3 @@
-T15730b.hs:8:16: error:
+T15730b.hs:8:16: error: [GHC-85314]
A pragma is not allowed in this position: {-# SCC a1 #-}
diff --git a/testsuite/tests/parser/should_fail/T15849.stderr b/testsuite/tests/parser/should_fail/T15849.stderr
index e974dbde02..eb191d28bd 100644
--- a/testsuite/tests/parser/should_fail/T15849.stderr
+++ b/testsuite/tests/parser/should_fail/T15849.stderr
@@ -1,3 +1,2 @@
-T15849.hs:4:6: error:
- parse error on input ‘=’
+T15849.hs:4:6: error: [GHC-58481] parse error on input ‘=’
diff --git a/testsuite/tests/parser/should_fail/T16270.stderr b/testsuite/tests/parser/should_fail/T16270.stderr
index b4460b9cce..8ecb9a3e84 100644
--- a/testsuite/tests/parser/should_fail/T16270.stderr
+++ b/testsuite/tests/parser/should_fail/T16270.stderr
@@ -2,79 +2,80 @@
T16270.hs:3:13: warning: [-Wdeprecated-flags (in -Wdefault)]
-Werror=missing-space-after-bang is deprecated: bang patterns can no longer be written with a space
-T16270.hs:8:1: warning: [-Wtabs (in -Wdefault)]
+T16270.hs:8:1: warning: [GHC-94817] [-Wtabs (in -Wdefault)]
Tab character found here, and in five further locations.
Suggested fix: Please use spaces instead.
-T16270.hs:8:12: error:
+T16270.hs:8:12: error: [GHC-75254]
Unexpected semi-colons in conditional:
if c then False; else True
Suggested fix: Perhaps you intended to use DoAndIfThenElse
-T16270.hs:13:8: error:
+T16270.hs:13:8: error: [GHC-52095]
Unexpected do block in function application:
do 1
Suggested fixes:
- Use parentheses.
- Perhaps you intended to use BlockArguments
+ • Use parentheses.
+ • Perhaps you intended to use BlockArguments
-T16270.hs:14:8: error:
+T16270.hs:14:8: error: [GHC-06074]
Unexpected lambda expression in function application:
\ x -> x
Suggested fixes:
- Use parentheses.
- Perhaps you intended to use BlockArguments
+ • Use parentheses.
+ • Perhaps you intended to use BlockArguments
-T16270.hs:18:22: error:
+T16270.hs:18:22: error: [GHC-65719]
Illegal record syntax: {fst :: a, snd :: b}
Suggested fix: Perhaps you intended to use TraditionalRecordSyntax
-T16270.hs:19:5: error:
+T16270.hs:19:5: error: [GHC-65719]
Illegal record syntax: p {fst = 1, snd = True}
Suggested fix: Perhaps you intended to use TraditionalRecordSyntax
-T16270.hs:21:6: error:
+T16270.hs:21:6: error: [GHC-25955]
Illegal symbol ‘forall’ in type
Suggested fix:
Perhaps you intended to use RankNTypes
- or a similar language extension to enable explicit-forall syntax: forall <tvs>. <type>
+ or a similar language extension to enable explicit-forall syntax: forall <tvs>. <type>
-T16270.hs:22:8: error:
+T16270.hs:22:8: error: [GHC-75254]
Unexpected semi-colons in conditional:
if True; then (); else ()
Suggested fix: Perhaps you intended to use DoAndIfThenElse
-T16270.hs:24:10: error:
+T16270.hs:24:10: error: [GHC-36952]
Illegal keyword 'where' in data declaration
Suggested fix:
Perhaps you intended to use GADTs
- or a similar language extension to enable syntax: data T where
+ or a similar language extension to enable syntax: data T where
-T16270.hs:26:12: error:
+T16270.hs:26:12: error: [GHC-79767]
Illegal bang-pattern
!i
Suggested fix: Perhaps you intended to use BangPatterns
-T16270.hs:28:9: error:
+T16270.hs:28:9: error: [GHC-28985]
Illegal multi-way if-expression
Suggested fix: Perhaps you intended to use MultiWayIf
-T16270.hs:30:9: error:
+T16270.hs:30:9: error: [GHC-28985]
Illegal multi-way if-expression
Suggested fix: Perhaps you intended to use MultiWayIf
-T16270.hs:33:6:
+T16270.hs:33:6: error: [GHC-51179]
Illegal \case
Suggested fix: Perhaps you intended to use LambdaCase
-T16270.hs:36:5: error:
+T16270.hs:36:5: error: [GHC-62330]
Illegal underscores in integer literals
Suggested fix: Perhaps you intended to use NumericUnderscores
-T16270.hs:38:5: error:
+T16270.hs:38:5: error: [GHC-43080]
primitive string literal must contain only characters <= '\xFF'
-T16270.hs:40:7: error: A lambda requires at least one parameter
+T16270.hs:40:7: error: [GHC-71614]
+ A lambda requires at least one parameter
-T16270.hs:46:1: error:
+T16270.hs:46:1: error: [GHC-58481]
parse error (possibly incorrect indentation or mismatched brackets)
diff --git a/testsuite/tests/parser/should_fail/T16270h.stderr b/testsuite/tests/parser/should_fail/T16270h.stderr
index f723d594da..ad24b9bb19 100644
--- a/testsuite/tests/parser/should_fail/T16270h.stderr
+++ b/testsuite/tests/parser/should_fail/T16270h.stderr
@@ -1,12 +1,12 @@
-T16270h.hs:8:22: error:
+T16270h.hs:8:22: error: [GHC-47007]
Illegal keyword 'type'
Suggested fix: Perhaps you intended to use ExplicitNamespaces
-T16270h.hs:10:8: error:
+T16270h.hs:10:8: error: [GHC-21926]
Parse error: ‘pkg?’
Version number or non-alphanumeric character in package name
-T16270h.hs:11:8: error:
+T16270h.hs:11:8: error: [GHC-21926]
Parse error: ‘pkg!’
Version number or non-alphanumeric character in package name
diff --git a/testsuite/tests/parser/should_fail/T16999.stderr b/testsuite/tests/parser/should_fail/T16999.stderr
index 16b3235dd1..187329aff5 100644
--- a/testsuite/tests/parser/should_fail/T16999.stderr
+++ b/testsuite/tests/parser/should_fail/T16999.stderr
@@ -1,2 +1,2 @@
-T16999.hs:6:5: error: Not a data constructor: ‘->’
+T16999.hs:6:5: error: [GHC-25742] Not a data constructor: ‘->’
diff --git a/testsuite/tests/parser/should_fail/T17045.stderr b/testsuite/tests/parser/should_fail/T17045.stderr
index e67ac82f5e..f4bf96c8be 100644
--- a/testsuite/tests/parser/should_fail/T17045.stderr
+++ b/testsuite/tests/parser/should_fail/T17045.stderr
@@ -1,5 +1,5 @@
-T17045.hs:7:11: error:
+T17045.hs:7:11: error: [GHC-76037]
Not in scope: type constructor or class ‘String’
Suggested fix:
Perhaps you want to add ‘String’ to the import list
diff --git a/testsuite/tests/parser/should_fail/T17162.stderr b/testsuite/tests/parser/should_fail/T17162.stderr
index 1eef0ea346..84c985fa55 100644
--- a/testsuite/tests/parser/should_fail/T17162.stderr
+++ b/testsuite/tests/parser/should_fail/T17162.stderr
@@ -1,5 +1,5 @@
-T17162.hs:7:21: error:
+T17162.hs:7:21: error: [GHC-79767]
Illegal bang-pattern
!enc
Suggested fix: Perhaps you intended to use BangPatterns
diff --git a/testsuite/tests/parser/should_fail/T17865.stderr b/testsuite/tests/parser/should_fail/T17865.stderr
index 560144fbe5..ccd2786f26 100644
--- a/testsuite/tests/parser/should_fail/T17865.stderr
+++ b/testsuite/tests/parser/should_fail/T17865.stderr
@@ -1,16 +1,16 @@
-T17865.hs:3:11: error:
+T17865.hs:3:11: error: [GHC-80236]
Illegal promotion quote mark in the declaration of
data/newtype constructor MkT
-T17865.hs:5:13: error:
+T17865.hs:5:13: error: [GHC-80236]
Illegal promotion quote mark in the declaration of
data/newtype constructor MkT'
-T17865.hs:7:16: error:
+T17865.hs:7:16: error: [GHC-80236]
Illegal promotion quote mark in the declaration of
data/newtype constructor (:>)
-T17865.hs:9:17: error:
+T17865.hs:9:17: error: [GHC-80236]
Illegal promotion quote mark in the declaration of
data/newtype constructor (:>$)
diff --git a/testsuite/tests/parser/should_fail/T18130Fail.stderr b/testsuite/tests/parser/should_fail/T18130Fail.stderr
index 60887b0799..4d77cae8da 100644
--- a/testsuite/tests/parser/should_fail/T18130Fail.stderr
+++ b/testsuite/tests/parser/should_fail/T18130Fail.stderr
@@ -1,4 +1,4 @@
-T18130Fail.hs:11:7: error:
+T18130Fail.hs:11:7: error: [GHC-83865]
• Expected kind ‘* -> *’, but ‘(a, b)’ has kind ‘*’
• In the newtype declaration for ‘Par’
diff --git a/testsuite/tests/parser/should_fail/T18251a.stderr b/testsuite/tests/parser/should_fail/T18251a.stderr
index abdfd68e64..8e74248a08 100644
--- a/testsuite/tests/parser/should_fail/T18251a.stderr
+++ b/testsuite/tests/parser/should_fail/T18251a.stderr
@@ -1,5 +1,4 @@
-T18251a.hs:3:1: error:
- Parse error in pattern: pairs
- In a function binding for the ‘@’ operator.
- Perhaps you meant an as-pattern, which must not be surrounded by whitespace
+T18251a.hs:3:1: error: [GHC-07626]
+ Parse error in pattern: pairs In a function binding for the ‘@’ operator.
+ Perhaps you meant an as-pattern, which must not be surrounded by whitespace
diff --git a/testsuite/tests/parser/should_fail/T18251b.stderr b/testsuite/tests/parser/should_fail/T18251b.stderr
index 0dab383d52..ef67efad23 100644
--- a/testsuite/tests/parser/should_fail/T18251b.stderr
+++ b/testsuite/tests/parser/should_fail/T18251b.stderr
@@ -1,4 +1,4 @@
-T18251b.hs:3:11: error:
+T18251b.hs:3:11: error: [GHC-08382]
Found a binding for the ‘@’ operator in a pattern position.
Perhaps you meant an as-pattern, which must not be surrounded by whitespace
diff --git a/testsuite/tests/parser/should_fail/T18251d.stderr b/testsuite/tests/parser/should_fail/T18251d.stderr
index 15825502e0..61b535f973 100644
--- a/testsuite/tests/parser/should_fail/T18251d.stderr
+++ b/testsuite/tests/parser/should_fail/T18251d.stderr
@@ -1,4 +1,4 @@
-T18251d.hs:6:1: error:
+T18251d.hs:6:1: error: [GHC-07626]
Parse error in pattern: f @a
- Type applications in patterns are only allowed on data constructors.
+ Type applications in patterns are only allowed on data constructors.
diff --git a/testsuite/tests/parser/should_fail/T18251f.stderr b/testsuite/tests/parser/should_fail/T18251f.stderr
index fa859fa06a..84d589d35b 100644
--- a/testsuite/tests/parser/should_fail/T18251f.stderr
+++ b/testsuite/tests/parser/should_fail/T18251f.stderr
@@ -1,4 +1,3 @@
-T18251f.hs:3:5: error:
- Parse error in pattern: x
- In a function binding for the ‘!’ operator.
+T18251f.hs:3:5: error: [GHC-07626]
+ Parse error in pattern: x In a function binding for the ‘!’ operator.
diff --git a/testsuite/tests/parser/should_fail/T19504.stderr b/testsuite/tests/parser/should_fail/T19504.stderr
index 9d37ba22a0..f61b9db005 100644
--- a/testsuite/tests/parser/should_fail/T19504.stderr
+++ b/testsuite/tests/parser/should_fail/T19504.stderr
@@ -1,2 +1,2 @@
-T19504.hs:3:23: error: Tuple section in pattern context
+T19504.hs:3:23: error: [GHC-09646] Tuple section in pattern context
diff --git a/testsuite/tests/parser/should_fail/T19923a.stderr b/testsuite/tests/parser/should_fail/T19923a.stderr
index 223c670921..4ec9713a41 100644
--- a/testsuite/tests/parser/should_fail/T19923a.stderr
+++ b/testsuite/tests/parser/should_fail/T19923a.stderr
@@ -1,2 +1,2 @@
-T19923a.hs:1:14: error: Unsupported extension: T19923
+T19923a.hs:1:14: error: [GHC-46537] Unsupported extension: T19923
diff --git a/testsuite/tests/parser/should_fail/T19923b.stderr b/testsuite/tests/parser/should_fail/T19923b.stderr
index 414fa902e8..fec2f5f20f 100644
--- a/testsuite/tests/parser/should_fail/T19923b.stderr
+++ b/testsuite/tests/parser/should_fail/T19923b.stderr
@@ -1,3 +1,3 @@
-T19923b.hs:1:17: error:
+T19923b.hs:1:17: error: [GHC-04924]
Unknown flag in {-# OPTIONS_GHC #-} pragma: T19923
diff --git a/testsuite/tests/parser/should_fail/T19923c.stderr b/testsuite/tests/parser/should_fail/T19923c.stderr
index e366c5dcd2..f99fb54f5f 100644
--- a/testsuite/tests/parser/should_fail/T19923c.stderr
+++ b/testsuite/tests/parser/should_fail/T19923c.stderr
@@ -1,3 +1,3 @@
-T19923c.hs:1:17: error:
+T19923c.hs:1:17: error: [GHC-04924]
Unknown flag in {-# OPTIONS_GHC #-} pragma: TemplateHaskell,
diff --git a/testsuite/tests/parser/should_fail/T19928.stderr b/testsuite/tests/parser/should_fail/T19928.stderr
index 342639a100..d7cd83a836 100644
--- a/testsuite/tests/parser/should_fail/T19928.stderr
+++ b/testsuite/tests/parser/should_fail/T19928.stderr
@@ -1,12 +1,12 @@
-T19928.hs:6:9: error:
+T19928.hs:6:9: error: [GHC-37475]
Parse error: ‘(%1 ->)’
Record constructors in GADTs must use an ordinary, non-linear arrow.
-T19928.hs:7:9: error:
+T19928.hs:7:9: error: [GHC-37475]
Parse error: ‘(%p ->)’
Record constructors in GADTs must use an ordinary, non-linear arrow.
-T19928.hs:8:9: error:
+T19928.hs:8:9: error: [GHC-37475]
Parse error: ‘(%1 ->)’
Record constructors in GADTs must use an ordinary, non-linear arrow.
diff --git a/testsuite/tests/parser/should_fail/T20385A.stderr b/testsuite/tests/parser/should_fail/T20385A.stderr
index 5a0bbc14e4..3e5b6c718d 100644
--- a/testsuite/tests/parser/should_fail/T20385A.stderr
+++ b/testsuite/tests/parser/should_fail/T20385A.stderr
@@ -1,11 +1,11 @@
-T20385A.hs:5:1: warning: [-Wmisplaced-pragmas (in -Wdefault)]
+T20385A.hs:5:1: warning: [GHC-28007] [-Wmisplaced-pragmas (in -Wdefault)]
Misplaced LANGUAGE pragma
Suggested fix:
Perhaps you meant to place it in the module header?
The module header is the section at the top of the file, before the ‘module’ keyword
-T20385A.hs:10:9: error:
+T20385A.hs:10:9: error: [GHC-88464]
Variable not in scope: mdo :: a -> a
Suggested fixes:
• Perhaps use ‘mod’ (imported from Prelude)
diff --git a/testsuite/tests/parser/should_fail/T20385B.stderr b/testsuite/tests/parser/should_fail/T20385B.stderr
index f854e2be1a..0f7c9be2d6 100644
--- a/testsuite/tests/parser/should_fail/T20385B.stderr
+++ b/testsuite/tests/parser/should_fail/T20385B.stderr
@@ -1,11 +1,11 @@
-T20385B.hs:6:1: warning: [-Wmisplaced-pragmas (in -Wdefault)]
+T20385B.hs:6:1: warning: [GHC-28007] [-Wmisplaced-pragmas (in -Wdefault)]
Misplaced LANGUAGE pragma
Suggested fix:
Perhaps you meant to place it in the module header?
The module header is the section at the top of the file, before the ‘module’ keyword
-T20385B.hs:11:9: error:
+T20385B.hs:11:9: error: [GHC-88464]
Variable not in scope: mdo :: a -> a
Suggested fixes:
• Perhaps use ‘mod’ (imported from Prelude)
diff --git a/testsuite/tests/parser/should_fail/T20654a.stderr b/testsuite/tests/parser/should_fail/T20654a.stderr
index 81760a572b..beb5858afa 100644
--- a/testsuite/tests/parser/should_fail/T20654a.stderr
+++ b/testsuite/tests/parser/should_fail/T20654a.stderr
@@ -1,5 +1,5 @@
-T20654a.hs:7:9: error:
+T20654a.hs:7:9: error: [GHC-18872]
• Couldn't match type: forall a. a -> a
with: Int -> Int
arising from a functional dependency between constraints:
diff --git a/testsuite/tests/parser/should_fail/T20654b.stderr b/testsuite/tests/parser/should_fail/T20654b.stderr
index ba7f6a356a..3a913b6b77 100644
--- a/testsuite/tests/parser/should_fail/T20654b.stderr
+++ b/testsuite/tests/parser/should_fail/T20654b.stderr
@@ -1,4 +1,4 @@
-T20654b.hs:6:17: error:
+T20654b.hs:6:17: error: [GHC-83865]
• Expected a type, but ‘?ip2 :: Int’ has kind ‘Constraint’
• In the type signature: bar :: (?ip1 :: ?ip2 :: Int) => Int
diff --git a/testsuite/tests/parser/should_fail/T3095.stderr b/testsuite/tests/parser/should_fail/T3095.stderr
index ebb42b5be1..5448b97035 100644
--- a/testsuite/tests/parser/should_fail/T3095.stderr
+++ b/testsuite/tests/parser/should_fail/T3095.stderr
@@ -1,11 +1,11 @@
-T3095.hs:8:12: error:
+T3095.hs:8:12: error: [GHC-25955]
Illegal symbol ‘forall’ in type
Suggested fix:
Perhaps you intended to use RankNTypes
or a similar language extension to enable explicit-forall syntax: forall <tvs>. <type>
-T3095.hs:8:12: error:
+T3095.hs:8:12: error: [GHC-77878]
Unexpected type ‘forall x. x :: Type’
In the class declaration for ‘Bla’
A class declaration should have form
diff --git a/testsuite/tests/parser/should_fail/T3153.stderr b/testsuite/tests/parser/should_fail/T3153.stderr
index f9e9ab62ba..dd33ece17f 100644
--- a/testsuite/tests/parser/should_fail/T3153.stderr
+++ b/testsuite/tests/parser/should_fail/T3153.stderr
@@ -1,5 +1,5 @@
-T3153.hs:1:1:
+T3153.hs:1:1: error: [GHC-68686]
Cannot parse LANGUAGE pragma
Expecting comma-separated list of language options,
each starting with a capital letter
diff --git a/testsuite/tests/parser/should_fail/T3751.stderr b/testsuite/tests/parser/should_fail/T3751.stderr
index cf14e746e1..7eecf9f9ad 100644
--- a/testsuite/tests/parser/should_fail/T3751.stderr
+++ b/testsuite/tests/parser/should_fail/T3751.stderr
@@ -1,3 +1,3 @@
-T3751.hs:3:7:
+T3751.hs:3:7: error: [GHC-21231]
lexical error in string/character literal at character '\167'
diff --git a/testsuite/tests/parser/should_fail/T3811.stderr b/testsuite/tests/parser/should_fail/T3811.stderr
index f0209ba85f..4e1bf3fef1 100644
--- a/testsuite/tests/parser/should_fail/T3811.stderr
+++ b/testsuite/tests/parser/should_fail/T3811.stderr
@@ -1,5 +1,5 @@
-T3811.hs:4:1: error:
+T3811.hs:4:1: error: [GHC-94426]
Invalid type signature: f x :: ...
Suggested fix:
A type signature should be of form <variables> :: <type>
diff --git a/testsuite/tests/parser/should_fail/T3811b.stderr b/testsuite/tests/parser/should_fail/T3811b.stderr
index 65de1d5a75..8869529472 100644
--- a/testsuite/tests/parser/should_fail/T3811b.stderr
+++ b/testsuite/tests/parser/should_fail/T3811b.stderr
@@ -1,4 +1,3 @@
-T3811b.hs:4:14: error:
- Cannot parse data constructor in a data/newtype declaration:
- !B
+T3811b.hs:4:14: error: [GHC-46574]
+ Cannot parse data constructor in a data/newtype declaration: !B
diff --git a/testsuite/tests/parser/should_fail/T3811d.stderr b/testsuite/tests/parser/should_fail/T3811d.stderr
index 4ba2d16e01..456776b1fb 100644
--- a/testsuite/tests/parser/should_fail/T3811d.stderr
+++ b/testsuite/tests/parser/should_fail/T3811d.stderr
@@ -1,5 +1,5 @@
-T3811d.hs:6:12: error:
+T3811d.hs:6:12: error: [GHC-77878]
Unexpected type ‘D Char’
In the class declaration for ‘C’
A class declaration should have form
diff --git a/testsuite/tests/parser/should_fail/T3811e.stderr b/testsuite/tests/parser/should_fail/T3811e.stderr
index 10cd25f9e8..65bfd70f70 100644
--- a/testsuite/tests/parser/should_fail/T3811e.stderr
+++ b/testsuite/tests/parser/should_fail/T3811e.stderr
@@ -1,4 +1,4 @@
-T3811e.hs:6:6:
+T3811e.hs:6:6: error: [GHC-87429]
Illegal datatype context: (Show a, Read a) =>
Suggested fix: Perhaps you intended to use DatatypeContexts
diff --git a/testsuite/tests/parser/should_fail/T3811f.stderr b/testsuite/tests/parser/should_fail/T3811f.stderr
index 783a89e284..4b2155b5b5 100644
--- a/testsuite/tests/parser/should_fail/T3811f.stderr
+++ b/testsuite/tests/parser/should_fail/T3811f.stderr
@@ -1,3 +1,3 @@
-T3811f.hs:4:7: error:
+T3811f.hs:4:7: error: [GHC-47568]
Malformed head of type or class declaration: !Foo a
diff --git a/testsuite/tests/parser/should_fail/T5425.stderr b/testsuite/tests/parser/should_fail/T5425.stderr
index 52d29d9d5b..5850c85f43 100644
--- a/testsuite/tests/parser/should_fail/T5425.stderr
+++ b/testsuite/tests/parser/should_fail/T5425.stderr
@@ -1,3 +1,3 @@
-T5425.hs:5:2:
+T5425.hs:5:2: error: [GHC-21231]
lexical error in string/character literal at character '\955'
diff --git a/testsuite/tests/parser/should_fail/T7848.stderr b/testsuite/tests/parser/should_fail/T7848.stderr
index 9c80704c43..ff24ae7b37 100644
--- a/testsuite/tests/parser/should_fail/T7848.stderr
+++ b/testsuite/tests/parser/should_fail/T7848.stderr
@@ -1,5 +1,5 @@
-T7848.hs:10:9: error:
+T7848.hs:10:9: error: [GHC-25897]
• Couldn't match expected type ‘Char’ with actual type ‘a’
‘a’ is a rigid type variable bound by
the type signature for:
diff --git a/testsuite/tests/parser/should_fail/T8258NoGADTs.stderr b/testsuite/tests/parser/should_fail/T8258NoGADTs.stderr
index 8e0cce6f54..cb39161492 100644
--- a/testsuite/tests/parser/should_fail/T8258NoGADTs.stderr
+++ b/testsuite/tests/parser/should_fail/T8258NoGADTs.stderr
@@ -1,5 +1,5 @@
-T8258NoGADTs.hs:4:8: error:
+T8258NoGADTs.hs:4:8: error: [GHC-36952]
Illegal keyword 'where' in data declaration
Suggested fix:
Perhaps you intended to use GADTs
diff --git a/testsuite/tests/parser/should_fail/T8431.stderr b/testsuite/tests/parser/should_fail/T8431.stderr
index 4a4d1fe1ae..c82ec6ad34 100644
--- a/testsuite/tests/parser/should_fail/T8431.stderr
+++ b/testsuite/tests/parser/should_fail/T8431.stderr
@@ -1,2 +1,2 @@
-T8431.hs:1:1: parse error on input ‘)’
+T8431.hs:1:1: error: [GHC-58481] parse error on input ‘)’
diff --git a/testsuite/tests/parser/should_fail/T8501a.stderr b/testsuite/tests/parser/should_fail/T8501a.stderr
index 1c899e8bca..83f456bd41 100644
--- a/testsuite/tests/parser/should_fail/T8501a.stderr
+++ b/testsuite/tests/parser/should_fail/T8501a.stderr
@@ -1,6 +1,6 @@
-T8501a.hs:5:3: error:
+T8501a.hs:5:3: error: [GHC-07626]
Parse error in pattern: rec
Suggested fixes:
- Perhaps you intended to use RecursiveDo
- Possibly caused by a missing 'do'?
+ • Perhaps you intended to use RecursiveDo
+ • Possibly caused by a missing 'do'?
diff --git a/testsuite/tests/parser/should_fail/T8501b.stderr b/testsuite/tests/parser/should_fail/T8501b.stderr
index 15a631c177..1b4bd6a819 100644
--- a/testsuite/tests/parser/should_fail/T8501b.stderr
+++ b/testsuite/tests/parser/should_fail/T8501b.stderr
@@ -1,4 +1,4 @@
-T8501b.hs:5:9: error:
+T8501b.hs:5:9: error: [GHC-58481]
parse error on input ‘<-’
Suggested fix: Perhaps you intended to use RecursiveDo
diff --git a/testsuite/tests/parser/should_fail/T8501c.stderr b/testsuite/tests/parser/should_fail/T8501c.stderr
index 20975c3c19..2d8c74a399 100644
--- a/testsuite/tests/parser/should_fail/T8501c.stderr
+++ b/testsuite/tests/parser/should_fail/T8501c.stderr
@@ -1,5 +1,5 @@
-T8501c.hs:4:7: error:
+T8501c.hs:4:7: error: [GHC-88464]
Variable not in scope: mdo :: (String -> IO ()) -> String -> IO ()
Suggested fixes:
• Perhaps use ‘mod’ (imported from Prelude)
diff --git a/testsuite/tests/parser/should_fail/T8506.stderr b/testsuite/tests/parser/should_fail/T8506.stderr
index d7de4fe4e3..23e3e37a56 100644
--- a/testsuite/tests/parser/should_fail/T8506.stderr
+++ b/testsuite/tests/parser/should_fail/T8506.stderr
@@ -1,5 +1,5 @@
-T8506.hs:3:16:
+T8506.hs:3:16: error: [GHC-77878]
Unexpected type ‘Int’
In the class declaration for ‘Shapable’
A class declaration should have form
diff --git a/testsuite/tests/parser/should_fail/T9225.stderr b/testsuite/tests/parser/should_fail/T9225.stderr
index 47633025b8..f490ce5729 100644
--- a/testsuite/tests/parser/should_fail/T9225.stderr
+++ b/testsuite/tests/parser/should_fail/T9225.stderr
@@ -1,4 +1,4 @@
-T9225.hs:4:8: error:
+T9225.hs:4:8: error: [GHC-21926]
Parse error: ‘some-package-0.1.2.3’
Version number or non-alphanumeric character in package name
diff --git a/testsuite/tests/parser/should_fail/T984.stderr b/testsuite/tests/parser/should_fail/T984.stderr
index aaa4f532a9..f320aaec40 100644
--- a/testsuite/tests/parser/should_fail/T984.stderr
+++ b/testsuite/tests/parser/should_fail/T984.stderr
@@ -1,3 +1,2 @@
-T984.hs:6:9: error:
- (case ... of ...)-syntax in pattern
+T984.hs:6:9: error: [GHC-53786] (case ... of ...)-syntax in pattern
diff --git a/testsuite/tests/parser/should_fail/ViewPatternsFail.stderr b/testsuite/tests/parser/should_fail/ViewPatternsFail.stderr
index 97d82b4c16..ae1a4418a1 100644
--- a/testsuite/tests/parser/should_fail/ViewPatternsFail.stderr
+++ b/testsuite/tests/parser/should_fail/ViewPatternsFail.stderr
@@ -1,4 +1,4 @@
-ViewPatternsFail.hs:7:6: error:
+ViewPatternsFail.hs:7:6: error: [GHC-22406]
Illegal view pattern: a -> l
Suggested fix: Perhaps you intended to use ViewPatterns
diff --git a/testsuite/tests/parser/should_fail/cmdFail001.stderr b/testsuite/tests/parser/should_fail/cmdFail001.stderr
index 7f8210ab4b..a8f8e759fa 100644
--- a/testsuite/tests/parser/should_fail/cmdFail001.stderr
+++ b/testsuite/tests/parser/should_fail/cmdFail001.stderr
@@ -1,2 +1,2 @@
-cmdFail001.hs:4:15: error: Parse error in command: _
+cmdFail001.hs:4:15: error: [GHC-03790] Parse error in command: _
diff --git a/testsuite/tests/parser/should_fail/cmdFail002.stderr b/testsuite/tests/parser/should_fail/cmdFail002.stderr
index 1e0393346a..be1fdfa17a 100644
--- a/testsuite/tests/parser/should_fail/cmdFail002.stderr
+++ b/testsuite/tests/parser/should_fail/cmdFail002.stderr
@@ -1,2 +1,3 @@
-cmdFail002.hs:4:15: error: Parse error in command: (_ -< _) :: _
+cmdFail002.hs:4:15: error: [GHC-03790]
+ Parse error in command: (_ -< _) :: _
diff --git a/testsuite/tests/parser/should_fail/cmdFail003.stderr b/testsuite/tests/parser/should_fail/cmdFail003.stderr
index 21f958174d..37e202765d 100644
--- a/testsuite/tests/parser/should_fail/cmdFail003.stderr
+++ b/testsuite/tests/parser/should_fail/cmdFail003.stderr
@@ -1,3 +1,3 @@
-cmdFail003.hs:4:15: error:
+cmdFail003.hs:4:15: error: [GHC-03790]
Parse error in command: [_ -< _, _ -< _, _ -< _, _ -< _, _ -< _]
diff --git a/testsuite/tests/parser/should_fail/cmdFail004.stderr b/testsuite/tests/parser/should_fail/cmdFail004.stderr
index ed14937367..030442bae6 100644
--- a/testsuite/tests/parser/should_fail/cmdFail004.stderr
+++ b/testsuite/tests/parser/should_fail/cmdFail004.stderr
@@ -1,2 +1,3 @@
-cmdFail004.hs:4:16: error: Parse error in command: _ -> (_ -< _)
+cmdFail004.hs:4:16: error: [GHC-03790]
+ Parse error in command: _ -> (_ -< _)
diff --git a/testsuite/tests/parser/should_fail/cmdFail005.stderr b/testsuite/tests/parser/should_fail/cmdFail005.stderr
index 9944ff277c..4d2015a4f6 100644
--- a/testsuite/tests/parser/should_fail/cmdFail005.stderr
+++ b/testsuite/tests/parser/should_fail/cmdFail005.stderr
@@ -1,2 +1,3 @@
-cmdFail005.hs:4:15: error: Parse error in command: x@(_ -< _)
+cmdFail005.hs:4:15: error: [GHC-03790]
+ Parse error in command: x@(_ -< _)
diff --git a/testsuite/tests/parser/should_fail/cmdFail006.stderr b/testsuite/tests/parser/should_fail/cmdFail006.stderr
index ad64e91648..529b47168e 100644
--- a/testsuite/tests/parser/should_fail/cmdFail006.stderr
+++ b/testsuite/tests/parser/should_fail/cmdFail006.stderr
@@ -1,2 +1,3 @@
-cmdFail006.hs:4:15: error: Parse error in command: ~(_ -< _)
+cmdFail006.hs:4:15: error: [GHC-03790]
+ Parse error in command: ~(_ -< _)
diff --git a/testsuite/tests/parser/should_fail/cmdFail007.stderr b/testsuite/tests/parser/should_fail/cmdFail007.stderr
index 82dadb6b67..3dd2525d74 100644
--- a/testsuite/tests/parser/should_fail/cmdFail007.stderr
+++ b/testsuite/tests/parser/should_fail/cmdFail007.stderr
@@ -1,4 +1,4 @@
-cmdFail007.hs:5:7: error:
+cmdFail007.hs:5:7: error: [GHC-03790]
Parse error in command:
(_ -< _) {a = _ -< _, b = _ -< _, c = _ -< _}
diff --git a/testsuite/tests/parser/should_fail/cmdFail008.stderr b/testsuite/tests/parser/should_fail/cmdFail008.stderr
index 0f2f0818d7..83dc10ef3c 100644
--- a/testsuite/tests/parser/should_fail/cmdFail008.stderr
+++ b/testsuite/tests/parser/should_fail/cmdFail008.stderr
@@ -1,2 +1,3 @@
-cmdFail008.hs:4:16: error: Parse error in command: !(_ -< _)
+cmdFail008.hs:4:16: error: [GHC-03790]
+ Parse error in command: !(_ -< _)
diff --git a/testsuite/tests/parser/should_fail/cmdFail009.stderr b/testsuite/tests/parser/should_fail/cmdFail009.stderr
index a0c4af5b77..fd8bd5fbf7 100644
--- a/testsuite/tests/parser/should_fail/cmdFail009.stderr
+++ b/testsuite/tests/parser/should_fail/cmdFail009.stderr
@@ -1,3 +1,3 @@
-cmdFail009.hs:4:15: error:
+cmdFail009.hs:4:15: error: [GHC-03790]
Parse error in command: (_ -< _,_ -< _,_ -< _,_ -< _,_ -< _)
diff --git a/testsuite/tests/parser/should_fail/patFail001.stderr b/testsuite/tests/parser/should_fail/patFail001.stderr
index 6dd20d794d..e930f5014e 100644
--- a/testsuite/tests/parser/should_fail/patFail001.stderr
+++ b/testsuite/tests/parser/should_fail/patFail001.stderr
@@ -1,4 +1,4 @@
-patFail001.hs:3:4: error:
+patFail001.hs:3:4: error: [GHC-00482]
Lambda-syntax in pattern.
Pattern matching on functions is not possible.
diff --git a/testsuite/tests/parser/should_fail/patFail002.stderr b/testsuite/tests/parser/should_fail/patFail002.stderr
index 804bfe9f47..b00eb914c7 100644
--- a/testsuite/tests/parser/should_fail/patFail002.stderr
+++ b/testsuite/tests/parser/should_fail/patFail002.stderr
@@ -1,2 +1,3 @@
-patFail002.hs:3:4: error: (let ... in ...)-syntax in pattern
+patFail002.hs:3:4: error: [GHC-78892]
+ (let ... in ...)-syntax in pattern
diff --git a/testsuite/tests/parser/should_fail/patFail003.stderr b/testsuite/tests/parser/should_fail/patFail003.stderr
index dc6e7aaea0..1813f099e2 100644
--- a/testsuite/tests/parser/should_fail/patFail003.stderr
+++ b/testsuite/tests/parser/should_fail/patFail003.stderr
@@ -1,2 +1,3 @@
-patFail003.hs:3:4: error: (case ... of ...)-syntax in pattern
+patFail003.hs:3:4: error: [GHC-53786]
+ (case ... of ...)-syntax in pattern
diff --git a/testsuite/tests/parser/should_fail/patFail004.stderr b/testsuite/tests/parser/should_fail/patFail004.stderr
index 48d289c348..af6edca1a5 100644
--- a/testsuite/tests/parser/should_fail/patFail004.stderr
+++ b/testsuite/tests/parser/should_fail/patFail004.stderr
@@ -1,3 +1,3 @@
-patFail004.hs:3:4: error:
+patFail004.hs:3:4: error: [GHC-45696]
(if ... then ... else ...)-syntax in pattern
diff --git a/testsuite/tests/parser/should_fail/patFail005.stderr b/testsuite/tests/parser/should_fail/patFail005.stderr
index 1302d62e0c..e791363776 100644
--- a/testsuite/tests/parser/should_fail/patFail005.stderr
+++ b/testsuite/tests/parser/should_fail/patFail005.stderr
@@ -1,2 +1,2 @@
-patFail005.hs:3:4: error: do-notation in pattern
+patFail005.hs:3:4: error: [GHC-06446] do-notation in pattern
diff --git a/testsuite/tests/parser/should_fail/patFail006.stderr b/testsuite/tests/parser/should_fail/patFail006.stderr
index 270f738163..cc73e7531e 100644
--- a/testsuite/tests/parser/should_fail/patFail006.stderr
+++ b/testsuite/tests/parser/should_fail/patFail006.stderr
@@ -1,2 +1,2 @@
-patFail006.hs:3:4: error: Parse error in pattern: -(1)
+patFail006.hs:3:4: error: [GHC-07626] Parse error in pattern: -(1)
diff --git a/testsuite/tests/parser/should_fail/patFail007.stderr b/testsuite/tests/parser/should_fail/patFail007.stderr
index f07689ba83..02fabd0472 100644
--- a/testsuite/tests/parser/should_fail/patFail007.stderr
+++ b/testsuite/tests/parser/should_fail/patFail007.stderr
@@ -1,2 +1,2 @@
-patFail007.hs:3:4: error: Parse error in pattern: +1
+patFail007.hs:3:4: error: [GHC-72516] Parse error in pattern: +1
diff --git a/testsuite/tests/parser/should_fail/patFail008.stderr b/testsuite/tests/parser/should_fail/patFail008.stderr
index d9957d9ca5..4656ee4bbf 100644
--- a/testsuite/tests/parser/should_fail/patFail008.stderr
+++ b/testsuite/tests/parser/should_fail/patFail008.stderr
@@ -1,2 +1,3 @@
-patFail008.hs:4:4: error: Command syntax in pattern: a -< b
+patFail008.hs:4:4: error: [GHC-98980]
+ Command syntax in pattern: a -< b
diff --git a/testsuite/tests/parser/should_fail/patFail009.stderr b/testsuite/tests/parser/should_fail/patFail009.stderr
index 0c9fb5de15..54bfa45bc2 100644
--- a/testsuite/tests/parser/should_fail/patFail009.stderr
+++ b/testsuite/tests/parser/should_fail/patFail009.stderr
@@ -1,2 +1,3 @@
-patFail009.hs:4:3: error: Expression syntax in pattern: #a
+patFail009.hs:4:3: error: [GHC-04584]
+ Expression syntax in pattern: #a
diff --git a/testsuite/tests/parser/should_fail/position001.stderr b/testsuite/tests/parser/should_fail/position001.stderr
index d83041b460..39b8320f76 100644
--- a/testsuite/tests/parser/should_fail/position001.stderr
+++ b/testsuite/tests/parser/should_fail/position001.stderr
@@ -1,2 +1,3 @@
-position001.hs:6:33: parse error on input ‘module’
+position001.hs:6:33: error: [GHC-58481]
+ parse error on input ‘module’
diff --git a/testsuite/tests/parser/should_fail/position002.stderr b/testsuite/tests/parser/should_fail/position002.stderr
index a57a790323..59555a917c 100644
--- a/testsuite/tests/parser/should_fail/position002.stderr
+++ b/testsuite/tests/parser/should_fail/position002.stderr
@@ -1,2 +1,3 @@
-position002.hs:6:33: parse error on input ‘module’
+position002.hs:6:33: error: [GHC-58481]
+ parse error on input ‘module’
diff --git a/testsuite/tests/parser/should_fail/proposal-229c.stderr b/testsuite/tests/parser/should_fail/proposal-229c.stderr
index 47753c88dd..3a240e02b4 100644
--- a/testsuite/tests/parser/should_fail/proposal-229c.stderr
+++ b/testsuite/tests/parser/should_fail/proposal-229c.stderr
@@ -1,5 +1,5 @@
-proposal-229c.hs:6:3: error:
+proposal-229c.hs:6:3: error: [GHC-79767]
Illegal bang-pattern
!x
Suggested fix: Perhaps you intended to use BangPatterns
diff --git a/testsuite/tests/parser/should_fail/readFail001.stderr b/testsuite/tests/parser/should_fail/readFail001.stderr
index f8b3b7e81a..45ee2957f2 100644
--- a/testsuite/tests/parser/should_fail/readFail001.stderr
+++ b/testsuite/tests/parser/should_fail/readFail001.stderr
@@ -1,22 +1,24 @@
-readFail001.hs:25:11: error:
+readFail001.hs:25:11: error: [GHC-44432]
The fixity signature for ‘+#’ lacks an accompanying binding
-readFail001.hs:38:32: error:
+readFail001.hs:38:32: error: [GHC-76037]
Not in scope: type constructor or class ‘Leaf’
Suggested fix:
Perhaps you intended to use DataKinds
to refer to the data constructor of that name?
-readFail001.hs:38:41: error:
+readFail001.hs:38:41: error: [GHC-76037]
Not in scope: type constructor or class ‘Leaf’
Suggested fix:
Perhaps you intended to use DataKinds
to refer to the data constructor of that name?
-readFail001.hs:107:30: error: Not in scope: data constructor ‘Foo’
+readFail001.hs:107:30: error: [GHC-76037]
+ Not in scope: data constructor ‘Foo’
-readFail001.hs:107:42: error: Not in scope: data constructor ‘Bar’
+readFail001.hs:107:42: error: [GHC-76037]
+ Not in scope: data constructor ‘Bar’
-readFail001.hs:112:23: error:
+readFail001.hs:112:23: error: [GHC-76037]
Not in scope: type constructor or class ‘Foo’
diff --git a/testsuite/tests/parser/should_fail/readFail002.stderr b/testsuite/tests/parser/should_fail/readFail002.stderr
index d368fe302d..4d7d475b86 100644
--- a/testsuite/tests/parser/should_fail/readFail002.stderr
+++ b/testsuite/tests/parser/should_fail/readFail002.stderr
@@ -1,3 +1,3 @@
-readFail002.hs:5:6:
+readFail002.hs:5:6: error: [GHC-21231]
lexical error in string/character literal at character '\n'
diff --git a/testsuite/tests/parser/should_fail/readFail003.stderr b/testsuite/tests/parser/should_fail/readFail003.stderr
index d969ba7df1..c3c55f35c7 100644
--- a/testsuite/tests/parser/should_fail/readFail003.stderr
+++ b/testsuite/tests/parser/should_fail/readFail003.stderr
@@ -1,5 +1,5 @@
-readFail003.hs:4:27: error:
+readFail003.hs:4:27: error: [GHC-25897]
• Couldn't match expected type ‘(a1, [a2], [a3])’
with actual type ‘a1’
‘a1’ is a rigid type variable bound by
diff --git a/testsuite/tests/parser/should_fail/readFail004.stderr b/testsuite/tests/parser/should_fail/readFail004.stderr
index 45ad7d7215..2b6a3088e3 100644
--- a/testsuite/tests/parser/should_fail/readFail004.stderr
+++ b/testsuite/tests/parser/should_fail/readFail004.stderr
@@ -1,3 +1,3 @@
-readFail004.hs:19:1:
+readFail004.hs:19:1: error: [GHC-21231]
lexical error in string/character literal at character '.'
diff --git a/testsuite/tests/parser/should_fail/readFail005.stderr b/testsuite/tests/parser/should_fail/readFail005.stderr
index 6b5b2ce9e2..e0d8511167 100644
--- a/testsuite/tests/parser/should_fail/readFail005.stderr
+++ b/testsuite/tests/parser/should_fail/readFail005.stderr
@@ -1,3 +1,3 @@
-readFail005.hs:4:7:
+readFail005.hs:4:7: error: [GHC-21231]
lexical error in string/character literal at character '&'
diff --git a/testsuite/tests/parser/should_fail/readFail006.stderr b/testsuite/tests/parser/should_fail/readFail006.stderr
index f697584e4a..c7ce043c56 100644
--- a/testsuite/tests/parser/should_fail/readFail006.stderr
+++ b/testsuite/tests/parser/should_fail/readFail006.stderr
@@ -1,2 +1,2 @@
-readFail006.hs:8:12: parse error on input ‘@’
+readFail006.hs:8:12: error: [GHC-58481] parse error on input ‘@’
diff --git a/testsuite/tests/parser/should_fail/readFail007.stderr b/testsuite/tests/parser/should_fail/readFail007.stderr
index ab4140f52a..a3addbcee9 100644
--- a/testsuite/tests/parser/should_fail/readFail007.stderr
+++ b/testsuite/tests/parser/should_fail/readFail007.stderr
@@ -1,4 +1,4 @@
-readFail007.hs:6:4:
+readFail007.hs:6:4: error: [GHC-07626]
Parse error in pattern: 2 + 2
Suggested fix: Possibly caused by a missing 'do'?
diff --git a/testsuite/tests/parser/should_fail/readFail009.stderr b/testsuite/tests/parser/should_fail/readFail009.stderr
index d7e2252e65..1eac9e11d2 100644
--- a/testsuite/tests/parser/should_fail/readFail009.stderr
+++ b/testsuite/tests/parser/should_fail/readFail009.stderr
@@ -1,3 +1,3 @@
-readFail009.hs:12:1:
+readFail009.hs:12:1: error: [GHC-58481]
parse error (possibly incorrect indentation or mismatched brackets)
diff --git a/testsuite/tests/parser/should_fail/readFail011.stderr b/testsuite/tests/parser/should_fail/readFail011.stderr
index 08388e5d21..cfacd930fd 100644
--- a/testsuite/tests/parser/should_fail/readFail011.stderr
+++ b/testsuite/tests/parser/should_fail/readFail011.stderr
@@ -1,3 +1,2 @@
-readFail011.hs:7:10: error:
- parse error on input ‘=’
+readFail011.hs:7:10: error: [GHC-58481] parse error on input ‘=’
diff --git a/testsuite/tests/parser/should_fail/readFail012.stderr b/testsuite/tests/parser/should_fail/readFail012.stderr
index 5909aa85da..f5a520b546 100644
--- a/testsuite/tests/parser/should_fail/readFail012.stderr
+++ b/testsuite/tests/parser/should_fail/readFail012.stderr
@@ -1,2 +1,3 @@
-readFail012.hs:7:9: parse error (possibly incorrect indentation or mismatched brackets)
+readFail012.hs:7:9: error: [GHC-58481]
+ parse error (possibly incorrect indentation or mismatched brackets)
diff --git a/testsuite/tests/parser/should_fail/readFail013.stderr b/testsuite/tests/parser/should_fail/readFail013.stderr
index ee3db9bae1..7efc62aef1 100644
--- a/testsuite/tests/parser/should_fail/readFail013.stderr
+++ b/testsuite/tests/parser/should_fail/readFail013.stderr
@@ -1,2 +1,2 @@
-readFail013.hs:4:5: parse error on input ‘`’
+readFail013.hs:4:5: error: [GHC-58481] parse error on input ‘`’
diff --git a/testsuite/tests/parser/should_fail/readFail014.stderr b/testsuite/tests/parser/should_fail/readFail014.stderr
index d8012cc19c..380ea1f8d7 100644
--- a/testsuite/tests/parser/should_fail/readFail014.stderr
+++ b/testsuite/tests/parser/should_fail/readFail014.stderr
@@ -1,2 +1,2 @@
-readFail014.hs:3:12: parse error on input ‘}’
+readFail014.hs:3:12: error: [GHC-58481] parse error on input ‘}’
diff --git a/testsuite/tests/parser/should_fail/readFail015.stderr b/testsuite/tests/parser/should_fail/readFail015.stderr
index 3fed88764c..ddba303035 100644
--- a/testsuite/tests/parser/should_fail/readFail015.stderr
+++ b/testsuite/tests/parser/should_fail/readFail015.stderr
@@ -1,2 +1,3 @@
-readFail015.hs:6:1: parse error (possibly incorrect indentation or mismatched brackets)
+readFail015.hs:6:1: error: [GHC-58481]
+ parse error (possibly incorrect indentation or mismatched brackets)
diff --git a/testsuite/tests/parser/should_fail/readFail017.stderr b/testsuite/tests/parser/should_fail/readFail017.stderr
index 05f7c9931f..cef1c740c0 100644
--- a/testsuite/tests/parser/should_fail/readFail017.stderr
+++ b/testsuite/tests/parser/should_fail/readFail017.stderr
@@ -1,2 +1,2 @@
-readFail017.hs:4:4: Parse error in pattern: f
+readFail017.hs:4:4: error: [GHC-07626] Parse error in pattern: f
diff --git a/testsuite/tests/parser/should_fail/readFail018.stderr b/testsuite/tests/parser/should_fail/readFail018.stderr
index 1391d5736c..3e3fde22be 100644
--- a/testsuite/tests/parser/should_fail/readFail018.stderr
+++ b/testsuite/tests/parser/should_fail/readFail018.stderr
@@ -1,2 +1,3 @@
-readFail018.hs:3:1: error: unterminated `{-' at end of input
+readFail018.hs:3:1: error: [GHC-21231]
+ unterminated `{-' at end of input
diff --git a/testsuite/tests/parser/should_fail/readFail019.stderr b/testsuite/tests/parser/should_fail/readFail019.stderr
index 0cf26735a0..f97677630d 100644
--- a/testsuite/tests/parser/should_fail/readFail019.stderr
+++ b/testsuite/tests/parser/should_fail/readFail019.stderr
@@ -1,2 +1,2 @@
-readFail019.hs:3:18: parse error on input ‘in’
+readFail019.hs:3:18: error: [GHC-58481] parse error on input ‘in’
diff --git a/testsuite/tests/parser/should_fail/readFail020.stderr b/testsuite/tests/parser/should_fail/readFail020.stderr
index 0697604181..29639534b7 100644
--- a/testsuite/tests/parser/should_fail/readFail020.stderr
+++ b/testsuite/tests/parser/should_fail/readFail020.stderr
@@ -1,2 +1,2 @@
-readFail020.hs:3:16: error: parse error on input ‘}’
+readFail020.hs:3:16: error: [GHC-58481] parse error on input ‘}’
diff --git a/testsuite/tests/parser/should_fail/readFail022.stderr b/testsuite/tests/parser/should_fail/readFail022.stderr
index 2c1b254229..52e4fdcafa 100644
--- a/testsuite/tests/parser/should_fail/readFail022.stderr
+++ b/testsuite/tests/parser/should_fail/readFail022.stderr
@@ -1,2 +1,3 @@
-readFail022.hs:4:2: Parse error in pattern: a # b
+readFail022.hs:4:2: error: [GHC-07626]
+ Parse error in pattern: a # b
diff --git a/testsuite/tests/parser/should_fail/readFail024.stderr b/testsuite/tests/parser/should_fail/readFail024.stderr
index 45c8458d6c..1e818889c5 100644
--- a/testsuite/tests/parser/should_fail/readFail024.stderr
+++ b/testsuite/tests/parser/should_fail/readFail024.stderr
@@ -1,2 +1,2 @@
-readFail024.hs:5:2: parse error on input ‘h’
+readFail024.hs:5:2: error: [GHC-58481] parse error on input ‘h’
diff --git a/testsuite/tests/parser/should_fail/readFail025.stderr b/testsuite/tests/parser/should_fail/readFail025.stderr
index 5641642c99..fbacf22577 100644
--- a/testsuite/tests/parser/should_fail/readFail025.stderr
+++ b/testsuite/tests/parser/should_fail/readFail025.stderr
@@ -1,5 +1,5 @@
-readFail025.hs:5:8:
+readFail025.hs:5:8: error: [GHC-77878]
Unexpected type ‘String’
In the data declaration for ‘T’
A data declaration should have form
diff --git a/testsuite/tests/parser/should_fail/readFail026.stderr b/testsuite/tests/parser/should_fail/readFail026.stderr
index 0577b26d45..1bd46998a3 100644
--- a/testsuite/tests/parser/should_fail/readFail026.stderr
+++ b/testsuite/tests/parser/should_fail/readFail026.stderr
@@ -1,2 +1,2 @@
-readFail026.hs:3:7: parse error on input ‘,’
+readFail026.hs:3:7: error: [GHC-58481] parse error on input ‘,’
diff --git a/testsuite/tests/parser/should_fail/readFail027.stderr b/testsuite/tests/parser/should_fail/readFail027.stderr
index 68f3d25755..70f389de49 100644
--- a/testsuite/tests/parser/should_fail/readFail027.stderr
+++ b/testsuite/tests/parser/should_fail/readFail027.stderr
@@ -1,2 +1,2 @@
-readFail027.hs:8:5: Missing block
+readFail027.hs:8:5: error: [GHC-16849] Missing block
diff --git a/testsuite/tests/parser/should_fail/readFail029.stderr b/testsuite/tests/parser/should_fail/readFail029.stderr
index bf2afc357a..dc15ac1cdb 100644
--- a/testsuite/tests/parser/should_fail/readFail029.stderr
+++ b/testsuite/tests/parser/should_fail/readFail029.stderr
@@ -1,5 +1,5 @@
-readFail029.hs:1:14:
+readFail029.hs:1:14: error: [GHC-68686]
Cannot parse LANGUAGE pragma
Expecting comma-separated list of language options,
each starting with a capital letter
diff --git a/testsuite/tests/parser/should_fail/readFail030.stderr b/testsuite/tests/parser/should_fail/readFail030.stderr
index e557a6b055..fb1728ee62 100644
--- a/testsuite/tests/parser/should_fail/readFail030.stderr
+++ b/testsuite/tests/parser/should_fail/readFail030.stderr
@@ -1,2 +1,3 @@
-readFail030.hs:1:14: Unsupported extension: ExtensibleRecords
+readFail030.hs:1:14: error: [GHC-46537]
+ Unsupported extension: ExtensibleRecords
diff --git a/testsuite/tests/parser/should_fail/readFail031.stderr b/testsuite/tests/parser/should_fail/readFail031.stderr
index eaf9058c72..6b8937c94c 100644
--- a/testsuite/tests/parser/should_fail/readFail031.stderr
+++ b/testsuite/tests/parser/should_fail/readFail031.stderr
@@ -1,5 +1,5 @@
-readFail031.hs:4:3: error:
+readFail031.hs:4:3: error: [GHC-94426]
Invalid type signature: (:+) :: ...
Suggested fix:
A type signature should be of form <variables> :: <type>
diff --git a/testsuite/tests/parser/should_fail/readFail032.stderr b/testsuite/tests/parser/should_fail/readFail032.stderr
index c845203048..961d80de8f 100644
--- a/testsuite/tests/parser/should_fail/readFail032.stderr
+++ b/testsuite/tests/parser/should_fail/readFail032.stderr
@@ -1,5 +1,5 @@
-readFail032.hs:25:38: error:
+readFail032.hs:25:38: error: [GHC-83865]
• Couldn't match type ‘Char’ with ‘[Char]’
Expected: [String]
Actual: String
diff --git a/testsuite/tests/parser/should_fail/readFail033.stderr b/testsuite/tests/parser/should_fail/readFail033.stderr
index 595323f3fd..7e70703c4f 100644
--- a/testsuite/tests/parser/should_fail/readFail033.stderr
+++ b/testsuite/tests/parser/should_fail/readFail033.stderr
@@ -1,3 +1,3 @@
-readFail033.hs:2:6:
+readFail033.hs:2:6: error: [GHC-21231]
lexical error in string/character literal at character '\t'
diff --git a/testsuite/tests/parser/should_fail/readFail034.stderr b/testsuite/tests/parser/should_fail/readFail034.stderr
index ad2fb000af..62ba4d236e 100644
--- a/testsuite/tests/parser/should_fail/readFail034.stderr
+++ b/testsuite/tests/parser/should_fail/readFail034.stderr
@@ -1,3 +1,2 @@
-readFail034.hs:4:6: error:
- parse error on input ‘=’
+readFail034.hs:4:6: error: [GHC-58481] parse error on input ‘=’
diff --git a/testsuite/tests/parser/should_fail/readFail039.stderr b/testsuite/tests/parser/should_fail/readFail039.stderr
index 9f14dd1845..cdb692487c 100644
--- a/testsuite/tests/parser/should_fail/readFail039.stderr
+++ b/testsuite/tests/parser/should_fail/readFail039.stderr
@@ -1,5 +1,5 @@
-readFail039.hs:9:14: error:
+readFail039.hs:9:14: error: [GHC-82023]
• Can't make a derived instance of ‘C Foo’:
‘C’ is not a stock derivable class (Eq, Show, etc.)
• In the newtype declaration for ‘Foo’
diff --git a/testsuite/tests/parser/should_fail/readFail040.stderr b/testsuite/tests/parser/should_fail/readFail040.stderr
index 3ba58a4adb..14f338b6a9 100644
--- a/testsuite/tests/parser/should_fail/readFail040.stderr
+++ b/testsuite/tests/parser/should_fail/readFail040.stderr
@@ -1,4 +1,4 @@
-readFail040.hs:7:11: error:
+readFail040.hs:7:11: error: [GHC-58481]
parse error on input ‘<-’
Suggested fix: Perhaps you intended to use RecursiveDo
diff --git a/testsuite/tests/parser/should_fail/readFail044.stderr b/testsuite/tests/parser/should_fail/readFail044.stderr
index c33e25cd99..82917e91fb 100644
--- a/testsuite/tests/parser/should_fail/readFail044.stderr
+++ b/testsuite/tests/parser/should_fail/readFail044.stderr
@@ -1,6 +1,6 @@
-readFail044.hs:3:17: error:
+readFail044.hs:3:17: error: [GHC-04924]
Unknown flag in {-# OPTIONS_GHC #-} pragma: -this-flag-does-not-exist
-readFail044.hs:3:43: error:
+readFail044.hs:3:43: error: [GHC-04924]
Unknown flag in {-# OPTIONS_GHC #-} pragma: -nor-does-this-one
diff --git a/testsuite/tests/parser/should_fail/readFail046.stderr b/testsuite/tests/parser/should_fail/readFail046.stderr
index c3f3cab7a4..9f5eeddd2d 100644
--- a/testsuite/tests/parser/should_fail/readFail046.stderr
+++ b/testsuite/tests/parser/should_fail/readFail046.stderr
@@ -1,5 +1,5 @@
-readFail046.hs:1:14:
+readFail046.hs:1:14: error: [GHC-46537]
Unsupported extension: ExistientialQuantification
Suggested fix:
Perhaps you meant ‘ExistentialQuantification’ or ‘NoExistentialQuantification’
diff --git a/testsuite/tests/parser/should_fail/readFail047.stderr b/testsuite/tests/parser/should_fail/readFail047.stderr
index 09d27076e1..e68779b085 100644
--- a/testsuite/tests/parser/should_fail/readFail047.stderr
+++ b/testsuite/tests/parser/should_fail/readFail047.stderr
@@ -1,2 +1,3 @@
-readFail047.hs:6:5: parse error (possibly incorrect indentation or mismatched brackets)
+readFail047.hs:6:5: error: [GHC-58481]
+ parse error (possibly incorrect indentation or mismatched brackets)
diff --git a/testsuite/tests/parser/should_fail/readFail048.stderr b/testsuite/tests/parser/should_fail/readFail048.stderr
index b1d7ab4dd2..acc2ac4beb 100644
--- a/testsuite/tests/parser/should_fail/readFail048.stderr
+++ b/testsuite/tests/parser/should_fail/readFail048.stderr
@@ -1,5 +1,5 @@
-readFail048.hs:25:38: error:
+readFail048.hs:25:38: error: [GHC-83865]
• Couldn't match type ‘Char’ with ‘[Char]’
Expected: [String]
Actual: String
diff --git a/testsuite/tests/parser/should_fail/readFailTraditionalRecords1.stderr b/testsuite/tests/parser/should_fail/readFailTraditionalRecords1.stderr
index 9a8ed3ae84..1f2fa108ad 100644
--- a/testsuite/tests/parser/should_fail/readFailTraditionalRecords1.stderr
+++ b/testsuite/tests/parser/should_fail/readFailTraditionalRecords1.stderr
@@ -1,4 +1,4 @@
-readFailTraditionalRecords1.hs:6:16:
+readFailTraditionalRecords1.hs:6:16: error: [GHC-65719]
Illegal record syntax: {i :: Int}
Suggested fix: Perhaps you intended to use TraditionalRecordSyntax
diff --git a/testsuite/tests/parser/should_fail/readFailTraditionalRecords2.stderr b/testsuite/tests/parser/should_fail/readFailTraditionalRecords2.stderr
index 91f9a590b0..c0d4c52d80 100644
--- a/testsuite/tests/parser/should_fail/readFailTraditionalRecords2.stderr
+++ b/testsuite/tests/parser/should_fail/readFailTraditionalRecords2.stderr
@@ -1,4 +1,4 @@
-readFailTraditionalRecords2.hs:6:4:
+readFailTraditionalRecords2.hs:6:4: error: [GHC-65719]
Illegal record syntax: Foo {i = j}
Suggested fix: Perhaps you intended to use TraditionalRecordSyntax
diff --git a/testsuite/tests/parser/should_fail/readFailTraditionalRecords3.stderr b/testsuite/tests/parser/should_fail/readFailTraditionalRecords3.stderr
index b741512b3b..2b946dcdb6 100644
--- a/testsuite/tests/parser/should_fail/readFailTraditionalRecords3.stderr
+++ b/testsuite/tests/parser/should_fail/readFailTraditionalRecords3.stderr
@@ -1,4 +1,4 @@
-readFailTraditionalRecords3.hs:6:7:
+readFailTraditionalRecords3.hs:6:7: error: [GHC-65719]
Illegal record syntax: x {i = 3}
Suggested fix: Perhaps you intended to use TraditionalRecordSyntax
diff --git a/testsuite/tests/parser/should_fail/strictnessDataCon_A.stderr b/testsuite/tests/parser/should_fail/strictnessDataCon_A.stderr
index 27e6c709a5..19b6b40919 100644
--- a/testsuite/tests/parser/should_fail/strictnessDataCon_A.stderr
+++ b/testsuite/tests/parser/should_fail/strictnessDataCon_A.stderr
@@ -1,3 +1,3 @@
-strictnessDataCon_A.hs:1:27: error:
+strictnessDataCon_A.hs:1:27: error: [GHC-24180]
Operator applied to too few arguments: !
diff --git a/testsuite/tests/parser/should_fail/strictnessDataCon_B.stderr b/testsuite/tests/parser/should_fail/strictnessDataCon_B.stderr
index 04ea0c8b18..1c0e03ad62 100644
--- a/testsuite/tests/parser/should_fail/strictnessDataCon_B.stderr
+++ b/testsuite/tests/parser/should_fail/strictnessDataCon_B.stderr
@@ -1,2 +1,3 @@
-strictnessDataCon_B.hs:1:42: error: parse error on input ‘}’
+strictnessDataCon_B.hs:1:42: error: [GHC-58481]
+ parse error on input ‘}’
diff --git a/testsuite/tests/parser/should_fail/typeopsDataCon_A.stderr b/testsuite/tests/parser/should_fail/typeopsDataCon_A.stderr
index a4f089654e..b5af43891e 100644
--- a/testsuite/tests/parser/should_fail/typeopsDataCon_A.stderr
+++ b/testsuite/tests/parser/should_fail/typeopsDataCon_A.stderr
@@ -1,4 +1,4 @@
-typeopsDataCon_A.hs:1:10: error:
+typeopsDataCon_A.hs:1:10: error: [GHC-30670]
Cannot parse an infix data constructor in a data/newtype declaration:
Int :+ Int :+ Int
diff --git a/testsuite/tests/parser/should_fail/typeopsDataCon_B.stderr b/testsuite/tests/parser/should_fail/typeopsDataCon_B.stderr
index 16dd0a8d0b..6cef325378 100644
--- a/testsuite/tests/parser/should_fail/typeopsDataCon_B.stderr
+++ b/testsuite/tests/parser/should_fail/typeopsDataCon_B.stderr
@@ -1,2 +1,3 @@
-typeopsDataCon_B.hs:1:14: error: Not a data constructor: ‘+’
+typeopsDataCon_B.hs:1:14: error: [GHC-25742]
+ Not a data constructor: ‘+’
diff --git a/testsuite/tests/parser/should_fail/typeops_A.stderr b/testsuite/tests/parser/should_fail/typeops_A.stderr
index 8558729f2f..404f38d501 100644
--- a/testsuite/tests/parser/should_fail/typeops_A.stderr
+++ b/testsuite/tests/parser/should_fail/typeops_A.stderr
@@ -1,3 +1,3 @@
-typeops_A.hs:2:1: error:
+typeops_A.hs:2:1: error: [GHC-58481]
parse error (possibly incorrect indentation or mismatched brackets)
diff --git a/testsuite/tests/parser/should_fail/typeops_B.stderr b/testsuite/tests/parser/should_fail/typeops_B.stderr
index 030516a27f..2817c98fa6 100644
--- a/testsuite/tests/parser/should_fail/typeops_B.stderr
+++ b/testsuite/tests/parser/should_fail/typeops_B.stderr
@@ -1,2 +1,3 @@
-typeops_B.hs:1:10: error: Operator applied to too few arguments: +
+typeops_B.hs:1:10: error: [GHC-24180]
+ Operator applied to too few arguments: +
diff --git a/testsuite/tests/parser/should_fail/typeops_C.stderr b/testsuite/tests/parser/should_fail/typeops_C.stderr
index 75372a8a2a..67e6fc584e 100644
--- a/testsuite/tests/parser/should_fail/typeops_C.stderr
+++ b/testsuite/tests/parser/should_fail/typeops_C.stderr
@@ -1,2 +1,3 @@
-typeops_C.hs:1:14: error: Operator applied to too few arguments: +
+typeops_C.hs:1:14: error: [GHC-24180]
+ Operator applied to too few arguments: +
diff --git a/testsuite/tests/parser/should_fail/typeops_D.stderr b/testsuite/tests/parser/should_fail/typeops_D.stderr
index 0ce7e29559..c955915855 100644
--- a/testsuite/tests/parser/should_fail/typeops_D.stderr
+++ b/testsuite/tests/parser/should_fail/typeops_D.stderr
@@ -1,2 +1,3 @@
-typeops_D.hs:1:10: error: Operator applied to too few arguments: +
+typeops_D.hs:1:10: error: [GHC-24180]
+ Operator applied to too few arguments: +
diff --git a/testsuite/tests/parser/should_fail/unpack_before_opr.stderr b/testsuite/tests/parser/should_fail/unpack_before_opr.stderr
index 023803c184..906df2864b 100644
--- a/testsuite/tests/parser/should_fail/unpack_before_opr.stderr
+++ b/testsuite/tests/parser/should_fail/unpack_before_opr.stderr
@@ -1,3 +1,3 @@
-unpack_before_opr.hs:6:34: error:
+unpack_before_opr.hs:6:34: error: [GHC-24180]
Operator applied to too few arguments: +
diff --git a/testsuite/tests/parser/should_fail/unpack_empty_type.stderr b/testsuite/tests/parser/should_fail/unpack_empty_type.stderr
index dbc73c87ff..1d1d93cd4c 100644
--- a/testsuite/tests/parser/should_fail/unpack_empty_type.stderr
+++ b/testsuite/tests/parser/should_fail/unpack_empty_type.stderr
@@ -1,2 +1,3 @@
-unpack_empty_type.hs:3:34: error: parse error on input ‘}’
+unpack_empty_type.hs:3:34: error: [GHC-58481]
+ parse error on input ‘}’
diff --git a/testsuite/tests/parser/should_fail/unpack_inside_type.stderr b/testsuite/tests/parser/should_fail/unpack_inside_type.stderr
index 60d7ba87a3..bef48ba148 100644
--- a/testsuite/tests/parser/should_fail/unpack_inside_type.stderr
+++ b/testsuite/tests/parser/should_fail/unpack_inside_type.stderr
@@ -1,5 +1,5 @@
-unpack_inside_type.hs:3:25: error:
+unpack_inside_type.hs:3:25: error: [GHC-18932]
• Unexpected UNPACK annotation: {-# UNPACK #-}Int
UNPACK annotation cannot appear nested inside a type
• In the first argument of ‘Maybe’, namely ‘({-# UNPACK #-}Int)’