diff --git a/ghc/tests/reader/should_fail/read001.hs b/ghc/tests/reader/should_fail/read001.hs
index cc188fdbd3363786944fbb9644abbff722b19a99..79576f89754362f0a646294d02c1306c4938f556 100644
--- a/ghc/tests/reader/should_fail/read001.hs
+++ b/ghc/tests/reader/should_fail/read001.hs
@@ -14,10 +14,10 @@ module OneOfEverything (
 	module OneOfEverything
     ) where
 
-import qualified OneA 
-import OneB		( fB )
-import OneC hiding	( fC )
-import OneC hiding	( fC )
+import qualified Prelude
+import IO		( putStr )
+import System hiding	( getArgs )
+import Monad hiding	( filter )
 
 -- HsDecls stuff