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

[ghc-hetmet.git] / ghc / tests / reader / should_fail / read001.hs

diff --git a/ghc/tests/reader/should_compile/read001.hs b/ghc/tests/reader/should_fail/read001.hs
similarity index 93%
rename from ghc/tests/reader/should_compile/read001.hs
rename to ghc/tests/reader/should_fail/read001.hs
index dc434eb..cc188fd 100644 (file)
--- a/ghc/tests/reader/should_compile/read001.hs
+++ b/ghc/tests/reader/should_fail/read001.hs
@@ -10,14 +10,14 @@ module OneOfEverything (
        EqTree(EqLeaf, EqBranch),
        EqClass(..),
        OrdClass(orda, ordb),
-       OneC.. ,
-       OneOfEverything..
+       module OneC ,
+       module OneOfEverything
     ) where
 
-import OneA renaming   ( fA to renamedA )
+import qualified OneA 
 import OneB            ( fB )
 import OneC hiding     ( fC )
-import OneC hiding     ( fC ) renaming ( fc to renamedC )
+import OneC hiding     ( fC )
 
 -- HsDecls stuff