[project @ 1997-09-05 14:11:05 by simonm]

[ghc-hetmet.git] / ghc / tests / typecheck / should_compile / tc091.hs

diff --git a/ghc/tests/typecheck/should_compile/tc091.hs b/ghc/tests/typecheck/should_compile/tc091.hs
index fc4e82c..eb52c16 100644 (file)
--- a/ghc/tests/typecheck/should_compile/tc091.hs
+++ b/ghc/tests/typecheck/should_compile/tc091.hs
@@ -48,7 +48,7 @@ all right.
        -- Lennart
 - ------- End of forwarded message -------
 -}
-module ShouldFail where
+module ShouldSucceed where
 
 sort :: Ord a => [a] -> [a]
 sort xs = s xs (length xs)