Merge pull request #12 from tibbe/ffi-fix

Fix build with GHC 7.3+
haskell · Oct 29, 2011 · c02bc86 · c02bc86
2 parents 587e36f + 4b5864e
commit c02bc86
Showing 1 changed file with 4 additions and 0 deletions.
diff --git a/Data/Text/Array.hs b/Data/Text/Array.hs
@@ -64,7 +64,11 @@ import Control.Monad.ST (unsafeIOToST)
 import Data.Bits ((.&.), xor)
 import Data.Text.Unsafe.Base (inlinePerformIO)
 import Data.Text.UnsafeShift (shiftL, shiftR)
+#if __GLASGOW_HASKELL__ >= 703
+import Foreign.C.Types (CInt(CInt), CSize(CSize))
+#else
 import Foreign.C.Types (CInt, CSize)
+#endif
 import GHC.Base (ByteArray#, MutableByteArray#, Int(..),
                  indexWord16Array#, newByteArray#,
                  unsafeCoerce#, writeWord16Array#)