[project @ 1997-09-04 12:54:24 by simonm]

[ghc-hetmet.git] / ghc / tests / deriving / should_fail / drvfail007.hs

diff --git a/ghc/tests/deriving/should_compile/drv007.hs b/ghc/tests/deriving/should_fail/drvfail007.hs
similarity index 80%
rename from ghc/tests/deriving/should_compile/drv007.hs
rename to ghc/tests/deriving/should_fail/drvfail007.hs
index ba1a864..87efc24 100644 (file)
--- a/ghc/tests/deriving/should_compile/drv007.hs
+++ b/ghc/tests/deriving/should_fail/drvfail007.hs
@@ -1,4 +1,4 @@
 --!!! buggy deriving with function type, reported by Sigbjorn Finne
-module ShouldSucceed where
+module ShouldFail where
 
 data Foo = Foo (Int -> Int) deriving Eq