diff options
author | Torsten Schmits <git@tryp.io> | 2023-04-26 21:56:16 +0200 |
---|---|---|
committer | Torsten Schmits <haskell-gitlab@schmits.me> | 2023-05-05 08:43:02 +0000 |
commit | 275836d211d119cb8786a91ca3108a4daa693cb2 (patch) | |
tree | 9dfc96c90e69cd97ba2e674407be8f30bf5ac26c /testsuite/tests/overloadedrecflds | |
parent | e8b72ff6e4aee1f889a9168df57bb1b00168fd21 (diff) | |
download | haskell-275836d211d119cb8786a91ca3108a4daa693cb2.tar.gz |
Add structured error messages for GHC.Rename.Utils
Tracking ticket: #20115
MR: !10350
This converts uses of `mkTcRnUnknownMessage` to newly added constructors
of `TcRnMessage`.
Diffstat (limited to 'testsuite/tests/overloadedrecflds')
20 files changed, 32 insertions, 32 deletions
diff --git a/testsuite/tests/overloadedrecflds/ghci/GHCiDRF.stdout b/testsuite/tests/overloadedrecflds/ghci/GHCiDRF.stdout index c912c3c4ee..4d4e5817d9 100644 --- a/testsuite/tests/overloadedrecflds/ghci/GHCiDRF.stdout +++ b/testsuite/tests/overloadedrecflds/ghci/GHCiDRF.stdout @@ -1,6 +1,6 @@ GHCiDRF.foo :: T -> Int -<interactive>:1:1: error: +<interactive>:1:1: error: [GHC-87543] Ambiguous occurrence ‘GHCiDRF.bar’ It could refer to either the field ‘bar’ of record ‘T’, defined at GHCiDRF.hs:3:28 @@ -17,7 +17,7 @@ data U = MkU {bar :: Bool} -- Defined at GHCiDRF.hs:4:16 GHCiDRF.foo :: GHCiDRF.T -> Int -<interactive>:1:1: error: +<interactive>:1:1: error: [GHC-87543] Ambiguous occurrence ‘GHCiDRF.bar’ It could refer to either the field ‘bar’, @@ -37,7 +37,7 @@ type GHCiDRF.U :: * data GHCiDRF.U = GHCiDRF.MkU {GHCiDRF.bar :: Bool} -- Defined at GHCiDRF.hs:4:16 -<interactive>:11:1: error: +<interactive>:11:1: error: [GHC-87543] Ambiguous occurrence ‘GHCiDRF.bar’ It could refer to either the field ‘bar’, diff --git a/testsuite/tests/overloadedrecflds/ghci/duplicaterecfldsghci01.stdout b/testsuite/tests/overloadedrecflds/ghci/duplicaterecfldsghci01.stdout index b34e509ecc..c1bb4c99f0 100644 --- a/testsuite/tests/overloadedrecflds/ghci/duplicaterecfldsghci01.stdout +++ b/testsuite/tests/overloadedrecflds/ghci/duplicaterecfldsghci01.stdout @@ -8,7 +8,7 @@ data T a = MkT {foo :: Bool, ...} -- Defined at <interactive>:4:18 True -<interactive>:1:1: error: +<interactive>:1:1: error: [GHC-87543] Ambiguous occurrence ‘foo’ It could refer to either the field ‘foo’ of record ‘S’, defined at <interactive>:3:16 diff --git a/testsuite/tests/overloadedrecflds/should_compile/BootFldReexport.stderr b/testsuite/tests/overloadedrecflds/should_compile/BootFldReexport.stderr index 0830beb7fc..29d8f451ca 100644 --- a/testsuite/tests/overloadedrecflds/should_compile/BootFldReexport.stderr +++ b/testsuite/tests/overloadedrecflds/should_compile/BootFldReexport.stderr @@ -1,5 +1,5 @@ -BootFldReexport.hs:8:9: error: +BootFldReexport.hs:8:9: error: [GHC-87543] Ambiguous occurrence ‘fld’ It could refer to either ‘BootFldReexport_N.fld’, diff --git a/testsuite/tests/overloadedrecflds/should_fail/DRFUnused.stderr b/testsuite/tests/overloadedrecflds/should_fail/DRFUnused.stderr index 88e9e6537f..81029d6cd3 100644 --- a/testsuite/tests/overloadedrecflds/should_fail/DRFUnused.stderr +++ b/testsuite/tests/overloadedrecflds/should_fail/DRFUnused.stderr @@ -1,5 +1,5 @@ -DRFUnused.hs:18:5: error: +DRFUnused.hs:18:5: error: [GHC-87543] Ambiguous occurrence ‘foo’ It could refer to either the field ‘foo’ of record ‘S’, defined at DRFUnused.hs:10:16 diff --git a/testsuite/tests/overloadedrecflds/should_fail/NoFieldSelectorsFail.stderr b/testsuite/tests/overloadedrecflds/should_fail/NoFieldSelectorsFail.stderr index 301b6bc4b8..4eb98f3778 100644 --- a/testsuite/tests/overloadedrecflds/should_fail/NoFieldSelectorsFail.stderr +++ b/testsuite/tests/overloadedrecflds/should_fail/NoFieldSelectorsFail.stderr @@ -1,5 +1,5 @@ -NoFieldSelectorsFail.hs:9:14: error: +NoFieldSelectorsFail.hs:9:14: error: [GHC-87543] Ambiguous occurrence ‘foo’ It could refer to either the field ‘foo’ of record ‘Foo’, diff --git a/testsuite/tests/overloadedrecflds/should_fail/T11167_ambiguous_fixity.stderr b/testsuite/tests/overloadedrecflds/should_fail/T11167_ambiguous_fixity.stderr index 277a5bd0ac..8a1691ac22 100644 --- a/testsuite/tests/overloadedrecflds/should_fail/T11167_ambiguous_fixity.stderr +++ b/testsuite/tests/overloadedrecflds/should_fail/T11167_ambiguous_fixity.stderr @@ -2,7 +2,7 @@ [2 of 3] Compiling T11167_ambiguous_fixity_B ( T11167_ambiguous_fixity_B.hs, T11167_ambiguous_fixity_B.o ) [3 of 3] Compiling T11167_ambiguous_fixity ( T11167_ambiguous_fixity.hs, T11167_ambiguous_fixity.o ) -T11167_ambiguous_fixity.hs:6:16: error: +T11167_ambiguous_fixity.hs:6:16: error: [GHC-87543] Ambiguous occurrence ‘foo’ It could refer to either the field ‘foo’ of record ‘A’, diff --git a/testsuite/tests/overloadedrecflds/should_fail/T13132_duplicaterecflds.stderr b/testsuite/tests/overloadedrecflds/should_fail/T13132_duplicaterecflds.stderr index 11374466ec..00fbe0899b 100644 --- a/testsuite/tests/overloadedrecflds/should_fail/T13132_duplicaterecflds.stderr +++ b/testsuite/tests/overloadedrecflds/should_fail/T13132_duplicaterecflds.stderr @@ -1,5 +1,5 @@ -T13132_duplicaterecflds.hs:7:16: error: +T13132_duplicaterecflds.hs:7:16: error: [GHC-87543] Ambiguous occurrence ‘runContT’ It could refer to either the field ‘runContT’ of record ‘ContT’, @@ -13,7 +13,7 @@ T13132_duplicaterecflds.hs:9:11: error: [GHC-46878] namely ‘y’ [infixl 9] in the section: ‘`runContT` x `y` x’ -T13132_duplicaterecflds.hs:9:12: error: +T13132_duplicaterecflds.hs:9:12: error: [GHC-87543] Ambiguous occurrence ‘runContT’ It could refer to either the field ‘runContT’ of record ‘ContT’, diff --git a/testsuite/tests/overloadedrecflds/should_fail/T16745.stderr b/testsuite/tests/overloadedrecflds/should_fail/T16745.stderr index 5969a540e0..b4515b8a19 100644 --- a/testsuite/tests/overloadedrecflds/should_fail/T16745.stderr +++ b/testsuite/tests/overloadedrecflds/should_fail/T16745.stderr @@ -3,7 +3,7 @@ [3 of 4] Compiling T16745D ( T16745D.hs, T16745D.o ) [4 of 4] Compiling T16745A ( T16745A.hs, T16745A.o ) -T16745A.hs:8:9: error: +T16745A.hs:8:9: error: [GHC-87543] Ambiguous occurrence ‘field’ It could refer to either ‘T16745B.field’, diff --git a/testsuite/tests/overloadedrecflds/should_fail/T17420.stderr b/testsuite/tests/overloadedrecflds/should_fail/T17420.stderr index e1db5fa195..3a94cd5639 100644 --- a/testsuite/tests/overloadedrecflds/should_fail/T17420.stderr +++ b/testsuite/tests/overloadedrecflds/should_fail/T17420.stderr @@ -1,7 +1,7 @@ [1 of 2] Compiling T17420A ( T17420A.hs, T17420A.o ) [2 of 2] Compiling T17420 ( T17420.hs, T17420.o ) -T17420.hs:6:17: error: +T17420.hs:6:17: error: [GHC-87543] Ambiguous occurrence ‘name’ It could refer to either the field ‘name’ of record ‘Dog’, diff --git a/testsuite/tests/overloadedrecflds/should_fail/T17469.stderr b/testsuite/tests/overloadedrecflds/should_fail/T17469.stderr index 5d93f46489..2f97d231cd 100644 --- a/testsuite/tests/overloadedrecflds/should_fail/T17469.stderr +++ b/testsuite/tests/overloadedrecflds/should_fail/T17469.stderr @@ -1,5 +1,5 @@ [1 of 3] Compiling T17469A ( T17469A.hs, T17469A.o ) [2 of 3] Compiling Main ( T17469.hs, T17469.o ) -T17469.hs:6:32: error: +T17469.hs:6:32: error: [GHC-53822] Constructor ‘MkFoo’ does not have field ‘bar’ diff --git a/testsuite/tests/overloadedrecflds/should_fail/T18999_NoDisambiguateRecordFields.stderr b/testsuite/tests/overloadedrecflds/should_fail/T18999_NoDisambiguateRecordFields.stderr index f462dcb187..7e7939e028 100644 --- a/testsuite/tests/overloadedrecflds/should_fail/T18999_NoDisambiguateRecordFields.stderr +++ b/testsuite/tests/overloadedrecflds/should_fail/T18999_NoDisambiguateRecordFields.stderr @@ -1,5 +1,5 @@ -T18999_NoDisambiguateRecordFields.hs:6:13: error: +T18999_NoDisambiguateRecordFields.hs:6:13: error: [GHC-87543] Ambiguous occurrence ‘not’ It could refer to either ‘Prelude.not’, diff --git a/testsuite/tests/overloadedrecflds/should_fail/T23010_fail.stderr b/testsuite/tests/overloadedrecflds/should_fail/T23010_fail.stderr index 61e93b95bb..6a1b76dae9 100644 --- a/testsuite/tests/overloadedrecflds/should_fail/T23010_fail.stderr +++ b/testsuite/tests/overloadedrecflds/should_fail/T23010_fail.stderr @@ -1,5 +1,5 @@ -T23010_fail.hs-boot:7:1: error: +T23010_fail.hs-boot:7:1: error: [GHC-87543] Ambiguous occurrence ‘T23010_fail.fld’ It could refer to either the field ‘fld’ of record ‘A’, diff --git a/testsuite/tests/overloadedrecflds/should_fail/overloadedrecfldsfail02.stderr b/testsuite/tests/overloadedrecflds/should_fail/overloadedrecfldsfail02.stderr index 6a27569776..aaf57bd710 100644 --- a/testsuite/tests/overloadedrecflds/should_fail/overloadedrecfldsfail02.stderr +++ b/testsuite/tests/overloadedrecflds/should_fail/overloadedrecfldsfail02.stderr @@ -1,5 +1,5 @@ -overloadedrecfldsfail02.hs:8:18: error: +overloadedrecfldsfail02.hs:8:18: error: [GHC-87543] Ambiguous occurrence ‘x’ It could refer to either the field ‘x’ of record ‘R’, diff --git a/testsuite/tests/overloadedrecflds/should_fail/overloadedrecfldsfail04.stderr b/testsuite/tests/overloadedrecflds/should_fail/overloadedrecfldsfail04.stderr index 6aa4669729..d319ae53f6 100644 --- a/testsuite/tests/overloadedrecflds/should_fail/overloadedrecfldsfail04.stderr +++ b/testsuite/tests/overloadedrecflds/should_fail/overloadedrecfldsfail04.stderr @@ -1,7 +1,7 @@ [1 of 3] Compiling OverloadedRecFldsFail04_A ( OverloadedRecFldsFail04_A.hs, OverloadedRecFldsFail04_A.o ) [2 of 3] Compiling Main ( overloadedrecfldsfail04.hs, overloadedrecfldsfail04.o ) -overloadedrecfldsfail04.hs:9:6: error: +overloadedrecfldsfail04.hs:9:6: error: [GHC-87543] Ambiguous occurrence ‘I.x’ It could refer to either the field ‘x’ of record ‘V’, diff --git a/testsuite/tests/overloadedrecflds/should_fail/overloadedrecfldsfail05.stderr b/testsuite/tests/overloadedrecflds/should_fail/overloadedrecfldsfail05.stderr index bff9bd544f..5e887e33cf 100644 --- a/testsuite/tests/overloadedrecflds/should_fail/overloadedrecfldsfail05.stderr +++ b/testsuite/tests/overloadedrecflds/should_fail/overloadedrecfldsfail05.stderr @@ -1,3 +1,3 @@ -overloadedrecfldsfail05.hs:7:16: error: [-Wunused-top-binds (in -Wextra, -Wunused-binds), Werror=unused-top-binds] +overloadedrecfldsfail05.hs:7:16: error: [GHC-40910] [-Wunused-top-binds (in -Wextra, -Wunused-binds), Werror=unused-top-binds] Defined but not used: record field of MkT ‘foo’ diff --git a/testsuite/tests/overloadedrecflds/should_fail/overloadedrecfldsfail06.stderr b/testsuite/tests/overloadedrecflds/should_fail/overloadedrecfldsfail06.stderr index f1b59db83f..d584430456 100644 --- a/testsuite/tests/overloadedrecflds/should_fail/overloadedrecfldsfail06.stderr +++ b/testsuite/tests/overloadedrecflds/should_fail/overloadedrecfldsfail06.stderr @@ -1,12 +1,12 @@ [1 of 3] Compiling OverloadedRecFldsFail06_A ( OverloadedRecFldsFail06_A.hs, OverloadedRecFldsFail06_A.o ) -OverloadedRecFldsFail06_A.hs:9:15: warning: [-Wunused-top-binds (in -Wextra, -Wunused-binds)] +OverloadedRecFldsFail06_A.hs:9:15: warning: [GHC-40910] [-Wunused-top-binds (in -Wextra, -Wunused-binds)] Defined but not used: data constructor ‘MkUnused’ -OverloadedRecFldsFail06_A.hs:9:42: warning: [-Wunused-top-binds (in -Wextra, -Wunused-binds)] +OverloadedRecFldsFail06_A.hs:9:42: warning: [GHC-40910] [-Wunused-top-binds (in -Wextra, -Wunused-binds)] Defined but not used: record field of MkUnused ‘unused2’ -OverloadedRecFldsFail06_A.hs:9:59: warning: [-Wunused-top-binds (in -Wextra, -Wunused-binds)] +OverloadedRecFldsFail06_A.hs:9:59: warning: [GHC-40910] [-Wunused-top-binds (in -Wextra, -Wunused-binds)] Defined but not used: record field of MkUnused ‘used_locally’ [2 of 3] Compiling Main ( overloadedrecfldsfail06.hs, overloadedrecfldsfail06.o ) diff --git a/testsuite/tests/overloadedrecflds/should_fail/overloadedrecfldsfail11.stderr b/testsuite/tests/overloadedrecflds/should_fail/overloadedrecfldsfail11.stderr index 54472f4293..423472841c 100644 --- a/testsuite/tests/overloadedrecflds/should_fail/overloadedrecfldsfail11.stderr +++ b/testsuite/tests/overloadedrecflds/should_fail/overloadedrecfldsfail11.stderr @@ -1,7 +1,7 @@ [1 of 3] Compiling OverloadedRecFldsFail11_A ( OverloadedRecFldsFail11_A.hs, OverloadedRecFldsFail11_A.o ) [2 of 3] Compiling Main ( overloadedrecfldsfail11.hs, overloadedrecfldsfail11.o ) -overloadedrecfldsfail11.hs:5:15: error: +overloadedrecfldsfail11.hs:5:15: error: [GHC-87543] Ambiguous occurrence ‘foo’ It could refer to either the field ‘foo’ of record ‘S’, diff --git a/testsuite/tests/overloadedrecflds/should_fail/overloadedrecfldsfail12.stderr b/testsuite/tests/overloadedrecflds/should_fail/overloadedrecfldsfail12.stderr index 28ebc96009..a6abb29b19 100644 --- a/testsuite/tests/overloadedrecflds/should_fail/overloadedrecfldsfail12.stderr +++ b/testsuite/tests/overloadedrecflds/should_fail/overloadedrecfldsfail12.stderr @@ -1,7 +1,7 @@ [1 of 3] Compiling OverloadedRecFldsFail12_A ( OverloadedRecFldsFail12_A.hs, OverloadedRecFldsFail12_A.o ) [2 of 3] Compiling Main ( overloadedrecfldsfail12.hs, overloadedrecfldsfail12.o ) -overloadedrecfldsfail12.hs:13:5: error: +overloadedrecfldsfail12.hs:13:5: error: [GHC-87543] Ambiguous occurrence ‘foo’ It could refer to either the field ‘foo’ of record ‘T’, @@ -10,7 +10,7 @@ overloadedrecfldsfail12.hs:13:5: error: or the field ‘foo’ of record ‘S’, defined at overloadedrecfldsfail12.hs:6:16 -overloadedrecfldsfail12.hs:16:5: error: +overloadedrecfldsfail12.hs:16:5: error: [GHC-87543] Ambiguous occurrence ‘foo’ It could refer to either the field ‘foo’ of record ‘T’, diff --git a/testsuite/tests/overloadedrecflds/should_fail/overloadedrecfldsfail13.stderr b/testsuite/tests/overloadedrecflds/should_fail/overloadedrecfldsfail13.stderr index 4fb285b327..cf9a7a5678 100644 --- a/testsuite/tests/overloadedrecflds/should_fail/overloadedrecfldsfail13.stderr +++ b/testsuite/tests/overloadedrecflds/should_fail/overloadedrecfldsfail13.stderr @@ -1,5 +1,5 @@ -overloadedrecfldsfail13.hs:10:5: error: +overloadedrecfldsfail13.hs:10:5: error: [GHC-87543] Ambiguous occurrence ‘x’ It could refer to either the field ‘x’ of record ‘S’, @@ -7,7 +7,7 @@ overloadedrecfldsfail13.hs:10:5: error: or the field ‘x’ of record ‘T’, defined at overloadedrecfldsfail13.hs:7:16 -overloadedrecfldsfail13.hs:12:5: error: +overloadedrecfldsfail13.hs:12:5: error: [GHC-87543] Ambiguous occurrence ‘x’ It could refer to either the field ‘x’ of record ‘S’, @@ -15,7 +15,7 @@ overloadedrecfldsfail13.hs:12:5: error: or the field ‘x’ of record ‘T’, defined at overloadedrecfldsfail13.hs:7:16 -overloadedrecfldsfail13.hs:15:5: error: +overloadedrecfldsfail13.hs:15:5: error: [GHC-87543] Ambiguous occurrence ‘x’ It could refer to either the field ‘x’ of record ‘S’, @@ -23,7 +23,7 @@ overloadedrecfldsfail13.hs:15:5: error: or the field ‘x’ of record ‘T’, defined at overloadedrecfldsfail13.hs:7:16 -overloadedrecfldsfail13.hs:18:5: error: +overloadedrecfldsfail13.hs:18:5: error: [GHC-87543] Ambiguous occurrence ‘x’ It could refer to either the field ‘x’ of record ‘S’, diff --git a/testsuite/tests/overloadedrecflds/should_fail/overloadedrecfldswasrunnowfail06.stderr b/testsuite/tests/overloadedrecflds/should_fail/overloadedrecfldswasrunnowfail06.stderr index c5f1e431c9..2b90b16f97 100644 --- a/testsuite/tests/overloadedrecflds/should_fail/overloadedrecfldswasrunnowfail06.stderr +++ b/testsuite/tests/overloadedrecflds/should_fail/overloadedrecfldswasrunnowfail06.stderr @@ -1,5 +1,5 @@ -overloadedrecfldswasrunnowfail06.hs:11:11: error: +overloadedrecfldswasrunnowfail06.hs:11:11: error: [GHC-87543] Ambiguous occurrence ‘x’ It could refer to either the field ‘x’ of record ‘S’, @@ -9,7 +9,7 @@ overloadedrecfldswasrunnowfail06.hs:11:11: error: or the field ‘x’ of record ‘U’, defined at overloadedrecfldswasrunnowfail06.hs:8:18 -overloadedrecfldswasrunnowfail06.hs:13:11: error: +overloadedrecfldswasrunnowfail06.hs:13:11: error: [GHC-87543] Ambiguous occurrence ‘x’ It could refer to either the field ‘x’ of record ‘S’, @@ -19,7 +19,7 @@ overloadedrecfldswasrunnowfail06.hs:13:11: error: or the field ‘x’ of record ‘U’, defined at overloadedrecfldswasrunnowfail06.hs:8:18 -overloadedrecfldswasrunnowfail06.hs:15:13: error: +overloadedrecfldswasrunnowfail06.hs:15:13: error: [GHC-87543] Ambiguous occurrence ‘x’ It could refer to either the field ‘x’ of record ‘S’, @@ -29,7 +29,7 @@ overloadedrecfldswasrunnowfail06.hs:15:13: error: or the field ‘x’ of record ‘U’, defined at overloadedrecfldswasrunnowfail06.hs:8:18 -overloadedrecfldswasrunnowfail06.hs:21:20: error: +overloadedrecfldswasrunnowfail06.hs:21:20: error: [GHC-87543] Ambiguous occurrence ‘x’ It could refer to either the field ‘x’ of record ‘S’, |