[project @ 1997-11-25 11:52:10 by simonm]

[ghc-hetmet.git] / ghc / tests / typecheck / should_fail / tcfail032.hs

diff --git a/ghc/tests/typecheck/should_fail/tcfail032.hs b/ghc/tests/typecheck/should_fail/tcfail032.hs
index 0e8884d..5950064 100644 (file)
--- a/ghc/tests/typecheck/should_fail/tcfail032.hs
+++ b/ghc/tests/typecheck/should_fail/tcfail032.hs
@@ -9,7 +9,7 @@ It *is* an error, because x does not have the polytype
 becuase it is monomorphic, but the error message isn't very illuminating.
 -}
 
-module TcSig where
+module ShouldFail where
 
 f x = (x :: (Eq a) => a -> Int)