[project @ 2005-01-28 15:03:06 by simonmar]

Remove some unnecessary #includes of ghcconfig.h

diff --git a/GHC/Conc.lhs b/GHC/Conc.lhs
index 5fd0370..93ffba7 100644 (file)
--- a/GHC/Conc.lhs
+++ b/GHC/Conc.lhs
@@ -14,7 +14,6 @@
 -- 
 -----------------------------------------------------------------------------
 
-#include "ghcconfig.h"
 module GHC.Conc
        ( ThreadId(..)
 

diff --git a/GHC/Handle.hs b/GHC/Handle.hs
index 223c94e..1db09ff 100644 (file)
--- a/GHC/Handle.hs
+++ b/GHC/Handle.hs
@@ -54,8 +54,6 @@ module GHC.Handle (
 
  ) where
 
-#include "ghcconfig.h"
-
 import System.Directory.Internals
 import Control.Monad
 import Data.Bits

diff --git a/GHC/IO.hs b/GHC/IO.hs
index aa4c0c8..6cc8aaa 100644 (file)
--- a/GHC/IO.hs
+++ b/GHC/IO.hs
@@ -27,8 +27,6 @@ module GHC.IO (
    memcpy_baoff_ptr,
  ) where
 
-#include "ghcconfig.h"
-
 import Foreign
 import Foreign.C
 

diff --git a/GHC/Unicode.hs b/GHC/Unicode.hs
index e3ce2bd..d5846c1 100644 (file)
--- a/GHC/Unicode.hs
+++ b/GHC/Unicode.hs
@@ -30,7 +30,6 @@ import GHC.Int
 import GHC.Word
 import GHC.Num  (fromInteger)
 
-#include "ghcconfig.h"
 #include "HsBaseConfig.h"
 
 -- | Selects the first 128 characters of the Unicode character set,

diff --git a/System/Environment.hs b/System/Environment.hs
index 1235920..3271e29 100644 (file)
--- a/System/Environment.hs
+++ b/System/Environment.hs
@@ -34,7 +34,6 @@ import Foreign.C
 import Control.Exception       ( bracket )
 import Control.Monad
 import GHC.IOBase
-#include "ghcconfig.h"
 #endif
 
 #ifdef __HUGS__