Fix the type of wgencat

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

diff --git a/GHC/Unicode.hs b/GHC/Unicode.hs
index e22fae5..0c0cc12 100644 (file)
--- a/GHC/Unicode.hs
+++ b/GHC/Unicode.hs
@@ -182,7 +182,7 @@ foreign import ccall unsafe "u_towtitle"
   towtitle :: CInt -> CInt
 
 foreign import ccall unsafe "u_gencat"
-  wgencat :: CInt -> Int
+  wgencat :: CInt -> CInt
 
 -- -----------------------------------------------------------------------------
 -- No libunicode, so fall back to the ASCII-only implementation (never used, indeed)