rearrange docs a bit
[haskell-directory.git] / System / Environment.hs
index de60de8..3271e29 100644 (file)
@@ -34,7 +34,6 @@ import Foreign.C
 import Control.Exception       ( bracket )
 import Control.Monad
 import GHC.IOBase
-#include "ghcconfig.h"
 #endif
 
 #ifdef __HUGS__
@@ -102,7 +101,7 @@ unpackProgName argv = do
 
    isPathSeparator :: Char -> Bool
    isPathSeparator '/'  = True
-#ifdef mingw32_TARGET_OS 
+#ifdef mingw32_HOST_OS 
    isPathSeparator '\\' = True
 #endif
    isPathSeparator _    = False