[project @ 2001-08-22 12:24:41 by simonmar]

[ghc-hetmet.git] / ghc / tests / rename / should_fail / rnfail018.hs

diff --git a/ghc/tests/rename/should_fail/rnfail018.hs b/ghc/tests/rename/should_fail/rnfail018.hs
deleted file mode 100644 (file)
index 223751c..0000000
--- a/ghc/tests/rename/should_fail/rnfail018.hs
+++ /dev/null
@@ -1,15 +0,0 @@
-{-# OPTIONS -fglasgow-exts #-}
-
-module ShouldFail where
-
--- !!! For-all with parens
-
--- This one crashed ghc-4.04proto; the parens after the for-all fooled it
-
-class Monad m => StateMonad s m where
-   getState :: m s
-
-setState0 :: forall b. (StateMonad (a,b) m => m a)
-setState0 = getState >>= \ (l,_r) -> return l
-
-