Test #8430

testsuite/tests/parser/should_fail/T8430.lhs

+This should not compile:
+
+\end{code}
+
+> module T8430 where
+> main = putStr "a"

testsuite/tests/parser/should_fail/T8430.stderr

+T8430.lhs line 3: unlit: spurious \end{code}
+

testsuite/tests/parser/should_fail/all.T

@@ -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, [''])