Change to the 0xEF80..0xEFFF private-use range for //ROUNDTRIP

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

diff --git a/GHC/Unicode.hs b/GHC/Unicode.hs
index 73e453a..b34f677 100644 (file)
--- a/GHC/Unicode.hs
+++ b/GHC/Unicode.hs
@@ -1,6 +1,7 @@
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE CPP, NoImplicitPrelude, ForeignFunctionInterface #-}
 {-# OPTIONS -#include "WCsubst.h" #-}
 {-# OPTIONS_HADDOCK hide #-}
+
 -----------------------------------------------------------------------------
 -- |
 -- Module      :  GHC.Unicode
@@ -31,7 +32,6 @@ module GHC.Unicode (
 import GHC.Base
 import GHC.Real        (fromIntegral)
 import Foreign.C.Types (CInt)
-import GHC.Num         (fromInteger)
 
 #include "HsBaseConfig.h"
 
@@ -64,7 +64,7 @@ isControl               :: Char -> Bool
 isPrint                 :: Char -> Bool
 
 -- | Returns 'True' for any Unicode space character, and the control
--- characters @\t@, @\\n@, @\\r@, @\\f@, @\\v@.
+-- characters @\\t@, @\\n@, @\\r@, @\\f@, @\\v@.
 isSpace                 :: Char -> Bool
 -- isSpace includes non-breaking space
 -- Done with explicit equalities both for efficiency, and to avoid a tiresome