From: krasimir <unknown>
Date: Thu, 6 Jan 2005 19:10:14 +0000 (+0000)
Subject: [project @ 2005-01-06 19:10:14 by krasimir]
X-Git-Tag: nhc98-1-18-release~139
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=bb101834420322740e520292b34ef5a8b31ddc8b;p=ghc-base.git

[project @ 2005-01-06 19:10:14 by krasimir]
Reduce dependencies for GHC. This allows System.FilePath to be used in
some low-level modules.
---

diff --git a/System/FilePath.hs b/System/FilePath.hs
index cf0a66a..3fead9b 100644
--- a/System/FilePath.hs
+++ b/System/FilePath.hs
@@ -1,3 +1,5 @@
+{-# OPTIONS -fno-implicit-prelude #-}
+
 -----------------------------------------------------------------------------
 -- |
 -- Module      :  System.FilePath
@@ -43,9 +45,15 @@ module System.FilePath
 	 , dllExtension
          ) where
 
+#ifdef __GLASGOW_HASKELL__
+import GHC.Base
+import GHC.IOBase(FilePath)
+import GHC.Num
+#else
 import Prelude -- necessary to get dependencies right
-
-import Data.List(intersperse)
+#endif
+import Data.Maybe
+import Data.List
 
 --------------------------------------------------------------
 -- * FilePath