[project @ 1997-11-12 16:55:57 by simonm]

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

diff --git a/ghc/tests/typecheck/should_fail/tcfail076.hs b/ghc/tests/typecheck/should_fail/tcfail076.hs
index 7e0b45a..08f775b 100644 (file)
--- a/ghc/tests/typecheck/should_fail/tcfail076.hs
+++ b/ghc/tests/typecheck/should_fail/tcfail076.hs
@@ -9,10 +9,9 @@ Needless to say that it uses some of GHC's arcane type extensions.
 
 {-# OPTIONS -fglasgow-exts #-}
 
-module Test                    (  module Test  )
-where
+module ShouldFail where
 
-import GlaExts
+import GHC ( All )
 
 data ContT m a         =  KContT ((All res) => (a -> m res) -> m res)
 unKContT (KContT x)    =  x