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

[ghc-base.git] / GHC / Unicode.hs

diff --git a/GHC/Unicode.hs b/GHC/Unicode.hs
index b29d44f..d5846c1 100644 (file)
--- a/GHC/Unicode.hs
+++ b/GHC/Unicode.hs
@@ -1,4 +1,4 @@
-{-# OPTIONS -fno-implicit-prelude #-}
+{-# OPTIONS_GHC -fno-implicit-prelude #-}
 -----------------------------------------------------------------------------
 -- |
 -- Module      :  GHC.Unicde
@@ -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,
@@ -122,7 +121,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