X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=GHC%2FUnicode.hs;fp=GHC%2FUnicode.hs;h=50fef9a8baf4ed3baee1e9e3c70e8eaa32ab6148;hb=d377935297dbe139a0628ec9e713a61ec471bd1e;hp=da74685c0adb8fe42c703340b8d53f1a6ed5029b;hpb=f04f95f83ac336d999aa55b9fa08f7b4589dd20b;p=ghc-base.git diff --git a/GHC/Unicode.hs b/GHC/Unicode.hs index da74685..50fef9a 100644 --- a/GHC/Unicode.hs +++ b/GHC/Unicode.hs @@ -126,7 +126,6 @@ toTitle :: Char -> Char -- Regardless of the O/S and Library, use the functions contained in WCsubst.c -type WInt = HTYPE_WINT_T type CInt = HTYPE_INT isAlpha c = iswalpha (fromIntegral (ord c)) /= 0