summaryrefslogtreecommitdiff
path: root/testsuite/tests/th/T3395.stderr
diff options
context:
space:
mode:
Diffstat (limited to 'testsuite/tests/th/T3395.stderr')
-rw-r--r--testsuite/tests/th/T3395.stderr16
1 files changed, 16 insertions, 0 deletions
diff --git a/testsuite/tests/th/T3395.stderr b/testsuite/tests/th/T3395.stderr
new file mode 100644
index 0000000000..f85f7cc1da
--- /dev/null
+++ b/testsuite/tests/th/T3395.stderr
@@ -0,0 +1,16 @@
+
+T3395.hs:6:9:
+ Illegal last statement of a list comprehension:
+ r1 <- undefined
+ (It should be an expression.)
+ When splicing a TH expression: [r1 <- undefined | undefined]
+ In the expression:
+ $(return
+ $ CompE
+ [NoBindS (VarE $ mkName "undefined"),
+ BindS (VarP $ mkName "r1") (VarE $ mkName "undefined")])
+ In an equation for `foo':
+ foo = $(return
+ $ CompE
+ [NoBindS (VarE $ mkName "undefined"),
+ BindS (VarP $ mkName "r1") (VarE $ mkName "undefined")])