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

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

diff --git a/ghc/tests/typecheck/should_compile/tc088.hs b/ghc/tests/typecheck/should_compile/tc088.hs
index e1b8b88..5423200 100644 (file)
--- a/ghc/tests/typecheck/should_compile/tc088.hs
+++ b/ghc/tests/typecheck/should_compile/tc088.hs
@@ -1,6 +1,6 @@
 -- Check that "->" is an instance of Eval
 
-module Foo where
+module ShouldSucceed where
 
 instance (Eq b) => Eq (a -> b) where
        (==) f g = error "attempt to compare functions"