summaryrefslogtreecommitdiff
path: root/testsuite/tests/typecheck/should_fail/tcfail104.stderr
diff options
context:
space:
mode:
Diffstat (limited to 'testsuite/tests/typecheck/should_fail/tcfail104.stderr')
-rw-r--r--testsuite/tests/typecheck/should_fail/tcfail104.stderr16
1 files changed, 16 insertions, 0 deletions
diff --git a/testsuite/tests/typecheck/should_fail/tcfail104.stderr b/testsuite/tests/typecheck/should_fail/tcfail104.stderr
new file mode 100644
index 0000000000..8bd4608bde
--- /dev/null
+++ b/testsuite/tests/typecheck/should_fail/tcfail104.stderr
@@ -0,0 +1,16 @@
+
+tcfail104.hs:16:19:
+ Couldn't match expected type `a0 -> a0'
+ with actual type `forall a. a -> a'
+ In the expression: x
+ In the expression: (\ x -> x)
+ In the expression:
+ if v then (\ (x :: forall a. a -> a) -> x) else (\ x -> x)
+
+tcfail104.hs:22:39:
+ Couldn't match expected type `forall a. a -> a'
+ with actual type `a0 -> a0'
+ In the expression: x
+ In the expression: (\ (x :: forall a. a -> a) -> x)
+ In the expression:
+ if v then (\ x -> x) else (\ (x :: forall a. a -> a) -> x)