Test #8430
authorKrzysztof Gogolewski <krz.gogolewski@gmail.com>
Fri, 11 Oct 2013 22:54:09 +0000 (00:54 +0200)
committerKrzysztof Gogolewski <krz.gogolewski@gmail.com>
Fri, 11 Oct 2013 22:54:09 +0000 (00:54 +0200)
testsuite/tests/parser/should_fail/T8430.lhs [new file with mode: 0644]
testsuite/tests/parser/should_fail/T8430.stderr [new file with mode: 0644]
testsuite/tests/parser/should_fail/all.T

diff --git a/testsuite/tests/parser/should_fail/T8430.lhs b/testsuite/tests/parser/should_fail/T8430.lhs
new file mode 100644 (file)
index 0000000..4c7892a
--- /dev/null
@@ -0,0 +1,6 @@
+This should not compile:
+
+\end{code}
+
+> module T8430 where
+> main = putStr "a"
diff --git a/testsuite/tests/parser/should_fail/T8430.stderr b/testsuite/tests/parser/should_fail/T8430.stderr
new file mode 100644 (file)
index 0000000..2d7b703
--- /dev/null
@@ -0,0 +1,2 @@
+T8430.lhs line 3: unlit: spurious \end{code}
+
index f6d5716..255d2a4 100644 (file)
@@ -80,3 +80,4 @@ test('T5425', normal, compile_fail, [''])
 test('T984', normal, compile_fail, [''])
 test('T7848', normal, compile_fail, ['-dppr-user-length=100'])
 test('ExportCommaComma', normal, compile_fail, [''])
+test('T8430', literate, compile_fail, [''])