[project @ 1999-06-23 10:42:07 by simonmar]

Test for pattern type signatures.

diff --git a/ghc/tests/reader/should_compile/Makefile b/ghc/tests/reader/should_compile/Makefile
index 93597c1..71c4f4f 100644 (file)
--- a/ghc/tests/reader/should_compile/Makefile
+++ b/ghc/tests/reader/should_compile/Makefile
@@ -8,5 +8,6 @@ read004_HC_OPTS = -fno-implicit-prelude
 read012_HC_OPTS += -O -funfold-casms-in-hi-file -fglasgow-exts -ohi T1.hi
 read013_HC_OPTS += -O -funfold-casms-in-hi-file -fglasgow-exts
 read014_HC_OPTS += -Wall
+read022_HC_OPTS = -fglasgow-exts
 
 include $(TOP)/mk/target.mk

diff --git a/ghc/tests/reader/should_compile/read022.hs b/ghc/tests/reader/should_compile/read022.hs
new file mode 100644 (file)
index 0000000..1ed76f3
--- /dev/null
+++ b/ghc/tests/reader/should_compile/read022.hs
@@ -0,0 +1,3 @@
+module ShouldCompile where
+
+f (x :: Int) = x + 1