From: andy <unknown>
Date: Thu, 9 Mar 2000 21:16:49 +0000 (+0000)
Subject: [project @ 2000-03-09 21:16:49 by andy]
X-Git-Tag: Approximately_9120_patches~5026
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=237783e77c42ef3b1d5bfe2d31545b9554a1c38a;p=ghc-hetmet.git

[project @ 2000-03-09 21:16:49 by andy]
Wibble: rm needless import Prelude used by Hugs.
---

diff --git a/ghc/lib/std/Array.lhs b/ghc/lib/std/Array.lhs
index 5ee94ff..9c32f4a 100644
--- a/ghc/lib/std/Array.lhs
+++ b/ghc/lib/std/Array.lhs
@@ -45,7 +45,6 @@ import PrelShow
 import PrelArr		-- Most of the hard work is done here
 import PrelBase
 #else
-import Prelude
 import privileged Prelude ( PrimArray
 			  , runST
 		          , primNewArray
diff --git a/ghc/lib/std/IO.lhs b/ghc/lib/std/IO.lhs
index a0559f7..a1af357 100644
--- a/ghc/lib/std/IO.lhs
+++ b/ghc/lib/std/IO.lhs
@@ -94,7 +94,6 @@ module IO (
 
 #ifdef __HUGS__
 import Ix(Ix)
-import Prelude
 import privileged Prelude ( IORef
 			  , unsafePerformIO
 			  , prelCleanupAfterRunAction
diff --git a/ghc/lib/std/Random.lhs b/ghc/lib/std/Random.lhs
index 2d61fc2..beafd35 100644
--- a/ghc/lib/std/Random.lhs
+++ b/ghc/lib/std/Random.lhs
@@ -39,7 +39,6 @@ import PrelReal		( toInt )
 import PrelFloat	( float2Double, double2Float )
 import Time		( getClockTime, ClockTime(..) )
 #else
-import Prelude
 import privileged Prelude
 			( IORef
 			, newIORef
diff --git a/ghc/lib/std/System.lhs b/ghc/lib/std/System.lhs
index ab4f9d9..1b7637d 100644
--- a/ghc/lib/std/System.lhs
+++ b/ghc/lib/std/System.lhs
@@ -188,7 +188,6 @@ unpackProgName argv
 --
 -- Suitable for use with Hugs 98
 -----------------------------------------------------------------------------
-import Prelude
 import privileged Prelude ( primGetRawArgs
 			  , primGetEnv
 			  , prelCleanupAfterRunAction