@@ -1,3 +1,5 @@
2-- Module : Streamly.Internal.FileSystem.IOVec
4-- Module : Streamly.Internal.FileSystem.IOVec
3-- Copyright : (c) 2019 Composewell Technologies
5-- Copyright : (c) 2019 Composewell Technologies
@@ -17,8 +19,9 @@ module Streamly.Internal.FileSystem.IOVec
20import Data.Word (Word8)
23import Data.Word (Word8)
21−#if defined(i386_HOST_ARCH)
24+#if (WORD_SIZE_IN_BITS == 32)
22import Data.Word (Word32)
25import Data.Word (Word32)
24import Data.Word (Word64)
27import Data.Word (Word64)
@@ -36,7 +39,7 @@ import Foreign.Storable (Storable(..))
37data IOVec = IOVec
40data IOVec = IOVec
38 { iovBase :: {-# UNPACK #-} !(Ptr Word8)
41 { iovBase :: {-# UNPACK #-} !(Ptr Word8)
39−#if defined(i386_HOST_ARCH)
42+#if (WORD_SIZE_IN_BITS == 32)
40 , iovLen :: {-# UNPACK #-} !Word32
43 , iovLen :: {-# UNPACK #-} !Word32
42 , iovLen :: {-# UNPACK #-} !Word64
45 , iovLen :: {-# UNPACK #-} !Word64