@@ -64,7 +64,11 @@ import Control.Monad.ST (unsafeIOToST)
6464import Data.Bits ((.&.), xor)
6565import Data.Text.Unsafe.Base (inlinePerformIO)
6666import Data.Text.UnsafeShift (shiftL, shiftR)
67+#if __GLASGOW_HASKELL__ >= 703
68+import Foreign.C.Types (CInt(CInt), CSize(CSize))
69+#else
6770import Foreign.C.Types (CInt, CSize)
71+#endif
6872import GHC.Base (ByteArray#, MutableByteArray#, Int(..),
6973 indexWord16Array#, newByteArray#,
7074 unsafeCoerce#, writeWord16Array#)