[project @ 1998-02-03 11:32:42 by simonm]

illegal char test

diff --git a/ghc/tests/reader/should_fail/read005.hs b/ghc/tests/reader/should_fail/read005.hs
new file mode 100644 (file)
index 0000000..8ed88c0
--- /dev/null
+++ b/ghc/tests/reader/should_fail/read005.hs
@@ -0,0 +1,4 @@
+module Tests where
+
+-- this char is forbidden
+c = '\&'

diff --git a/ghc/tests/reader/should_fail/read005.stderr b/ghc/tests/reader/should_fail/read005.stderr
new file mode 100644 (file)
index 0000000..36a567b
--- /dev/null
+++ b/ghc/tests/reader/should_fail/read005.stderr
@@ -0,0 +1,2 @@
+read005.hs:4:7: Illegal character escape: `\&'
+read005.hs:4:7:  on input: "&"