From: Ian Lynagh <igloo@earth.li>
Date: Wed, 6 Aug 2008 23:29:48 +0000 (+0000)
Subject: Use the proper CInt type in GHC.Unicode
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=280f54592dfa7af126943f65dce075890d6240bc;p=ghc-base.git

Use the proper CInt type in GHC.Unicode
---

diff --git a/GHC/Unicode.hs b/GHC/Unicode.hs
index 83e2a03..d90c96e 100644
--- a/GHC/Unicode.hs
+++ b/GHC/Unicode.hs
@@ -29,9 +29,9 @@ module GHC.Unicode (
   ) where
 
 import GHC.Base
-import GHC.Real  (fromIntegral)
-import GHC.Int
-import GHC.Num   (fromInteger)
+import GHC.Real        (fromIntegral)
+import Foreign.C.Types (CInt)
+import GHC.Num         (fromInteger)
 
 #include "HsBaseConfig.h"
 
@@ -134,8 +134,6 @@ toTitle                 :: Char -> Char
 
 -- Regardless of the O/S and Library, use the functions contained in WCsubst.c
 
-type CInt = HTYPE_INT
-
 isAlpha    c = iswalpha (fromIntegral (ord c)) /= 0
 isAlphaNum c = iswalnum (fromIntegral (ord c)) /= 0
 --isSpace    c = iswspace (fromIntegral (ord c)) /= 0