summaryrefslogtreecommitdiff
path: root/testsuite/tests/th
diff options
context:
space:
mode:
Diffstat (limited to 'testsuite/tests/th')
-rw-r--r--testsuite/tests/th/T10279.stderr2
-rw-r--r--testsuite/tests/th/T17380.stderr2
-rw-r--r--testsuite/tests/th/TH_1tuple.stderr2
3 files changed, 3 insertions, 3 deletions
diff --git a/testsuite/tests/th/T10279.stderr b/testsuite/tests/th/T10279.stderr
index 0d23a80877..d5f7052d05 100644
--- a/testsuite/tests/th/T10279.stderr
+++ b/testsuite/tests/th/T10279.stderr
@@ -4,5 +4,5 @@ T10279.hs:10:10: error:
no unit id matching ‘rts-1.0’ was found
(This unit ID looks like the source package ID;
the real unit ID is ‘rts’)
- • In the expression: (rts-1.0:A.Foo)
+ • In the expression: rts-1.0:A.Foo
In an equation for ‘blah’: blah = (rts-1.0:A.Foo)
diff --git a/testsuite/tests/th/T17380.stderr b/testsuite/tests/th/T17380.stderr
index 7e1977b6e4..a2501a4cb4 100644
--- a/testsuite/tests/th/T17380.stderr
+++ b/testsuite/tests/th/T17380.stderr
@@ -8,7 +8,7 @@ T17380.hs:9:7: error:
T17380.hs:12:9: error:
• Couldn't match expected type ‘Maybe String’
with actual type ‘Unit (Maybe [Char])’
- • In the expression: (Unit Just "wat")
+ • In the expression: Unit Just "wat"
In an equation for ‘bar’: bar = (Unit Just "wat")
T17380.hs:15:6: error:
diff --git a/testsuite/tests/th/TH_1tuple.stderr b/testsuite/tests/th/TH_1tuple.stderr
index bc7f25ad81..3acb218b6e 100644
--- a/testsuite/tests/th/TH_1tuple.stderr
+++ b/testsuite/tests/th/TH_1tuple.stderr
@@ -3,5 +3,5 @@ TH_1tuple.hs:11:7: error:
• Expecting one more argument to ‘Unit’
Expected a type, but ‘Unit’ has kind ‘* -> *’
• In an expression type signature: Unit
- In the expression: (1 :: Unit)
+ In the expression: 1 :: Unit
In an equation for ‘y’: y = (1 :: Unit)