Skip to content

Commit 885b847

Browse files
committed
Fix warnings on newer ghc versions
1 parent 1b364cb commit 885b847

File tree

1 file changed

+8
-2
lines changed

1 file changed

+8
-2
lines changed

Codec/Compression/Zlib/Stream.hsc

Lines changed: 8 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -98,7 +98,7 @@ import Foreign
9898
( Word8, Ptr, nullPtr, plusPtr, peekByteOff, pokeByteOff
9999
, ForeignPtr, FinalizerPtr, mallocForeignPtrBytes, addForeignPtrFinalizer
100100
, withForeignPtr, touchForeignPtr, minusPtr )
101-
#if __GLASGOW_HASKELL__ >= 702
101+
#if MIN_VERSION_base(4,4,0)
102102
import Foreign.ForeignPtr.Unsafe ( unsafeForeignPtrToPtr )
103103
import System.IO.Unsafe ( unsafePerformIO )
104104
#else
@@ -112,10 +112,16 @@ import Foreign.C
112112
import Data.ByteString.Internal (nullForeignPtr)
113113
import qualified Data.ByteString.Unsafe as B
114114
import Data.ByteString (ByteString)
115+
#if !(MIN_VERSION_base(4,8,0))
115116
import Control.Applicative (Applicative(..))
117+
#endif
116118
import Control.Monad (ap,liftM)
117-
#if __GLASGOW_HASKELL__ >= 702
119+
#if MIN_VERSION_base(4,4,0)
120+
#if MIN_VERSION_base(4,7,0)
121+
import Control.Monad.ST.Strict
122+
#else
118123
import Control.Monad.ST.Strict hiding (unsafeIOToST)
124+
#endif
119125
import Control.Monad.ST.Unsafe
120126
#else
121127
import Control.Monad.ST.Strict

0 commit comments

Comments
 (0)