Skip to content
Browse files

Change MIN_VERSION_base in hsc files to __GLASGOW_HASKELL__ > foo

  • Loading branch information...
1 parent 40ddb9e commit 3835d93748404a993068d9804590b5c9eb118a62 @gregorycollins gregorycollins committed Sep 19, 2012
Showing with 4 additions and 4 deletions.
  1. +2 −2 src/System/SendFile/FreeBSD.hsc
  2. +2 −2 src/System/SendFile/Linux.hsc
View
4 src/System/SendFile/FreeBSD.hsc
@@ -6,15 +6,15 @@ module System.SendFile.FreeBSD (sendFile) where
import Control.Concurrent (threadWaitWrite)
import Data.Int
import Foreign.C.Error (eAGAIN, eINTR, getErrno, throwErrno)
-#if MIN_VERSION_base(4,5,0)
+#if __GLASGOW_HASKELL__ > 740
import Foreign.C.Types (CSize(..), CInt(..))
#else
import Foreign.C.Types (CInt, CSize)
#endif
import Foreign.Marshal.Alloc (alloca)
import Foreign.Ptr (Ptr, nullPtr)
import Foreign.Storable (peek)
-#if MIN_VERSION_base(4,5,0)
+#if __GLASGOW_HASKELL__ > 740
import System.Posix.Types (COff(..), Fd(..))
#else
import System.Posix.Types (COff, Fd)
View
4 src/System/SendFile/Linux.hsc
@@ -6,15 +6,15 @@ module System.SendFile.Linux (sendFile) where
import Data.Int
import Foreign.C.Error (eAGAIN, getErrno, throwErrno)
-#if MIN_VERSION_base(4,5,0)
+#if __GLASGOW_HASKELL__ > 740
import Foreign.C.Types (CSize(..), CInt(..))
#else
import Foreign.C.Types (CSize)
#endif
import Foreign.Marshal (alloca)
import Foreign.Ptr (Ptr, nullPtr)
import Foreign.Storable (poke)
-#if MIN_VERSION_base(4,5,0)
+#if __GLASGOW_HASKELL__ > 740
import System.Posix.Types (Fd(..), COff(..), CSsize(..))
#else
import System.Posix.Types (Fd, COff, CSsize)

0 comments on commit 3835d93

Please sign in to comment.
Something went wrong with that request. Please try again.