X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=GHC%2FUnicode.hs;h=52d14f37c8964eea9a20bd29ab2472cf7b62c924;hb=ad2464d7646b2b0745615f4a23967444e23fea40;hp=e190cc16e1f5e5a55d8d84ab66b7e77beafe769f;hpb=aaf764b3ad8b1816d68b5f27299eac125f08e1a5;p=ghc-base.git

diff --git a/GHC/Unicode.hs b/GHC/Unicode.hs
index e190cc1..52d14f3 100644
--- a/GHC/Unicode.hs
+++ b/GHC/Unicode.hs
@@ -15,6 +15,7 @@
 --
 -----------------------------------------------------------------------------
 
+-- #hide
 module GHC.Unicode (
     isAscii, isLatin1, isControl,
     isAsciiUpper, isAsciiLower,
@@ -30,7 +31,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,
@@ -122,7 +122,7 @@ toLower                 :: Char -> Char
 -- -----------------------------------------------------------------------------
 -- Win32 implementation
 
-#if (defined(HAVE_WCTYPE_H) && HAVE_ISWSPACE && defined(HTYPE_WINT_T)) || mingw32_TARGET_OS
+#if (defined(HAVE_WCTYPE_H) && HAVE_ISWSPACE && defined(HTYPE_WINT_T)) || mingw32_HOST_OS
 
 -- Use the wide-char classification functions if available.  Glibc
 -- seems to implement these properly, even for chars > 0xffff, as long