Remove unused imports. (#168)
authorDavid Eichmann <EichmannD@gmail.com>
Fri, 9 Nov 2018 07:44:47 +0000 (08:44 +0100)
committerHerbert Valerio Riedel <hvr@gnu.org>
Fri, 9 Nov 2018 07:44:47 +0000 (08:44 +0100)
Due to a bug in ghc, some unused imports do not yield warnings.
This commit will remove such unused imports in preparation for
the ghc bug fix (see https://ghc.haskell.org/trac/ghc/ticket/13064).

Data/ByteString/Builder/Internal.hs
Data/ByteString/Internal.hs
Data/ByteString/Lazy/Internal.hs

index 8e83829..b55e055 100644 (file)
@@ -134,7 +134,7 @@ module Data.ByteString.Builder.Internal (
 
 import           Control.Arrow (second)
 
-#if MIN_VERSION_base(4,9,0)
+#if !(MIN_VERSION_base(4,11,0)) && MIN_VERSION_base(4,9,0)
 import           Data.Semigroup (Semigroup((<>)))
 #endif
 #if !(MIN_VERSION_base(4,8,0))
index df21f7f..47cd180 100644 (file)
@@ -91,7 +91,7 @@ import Foreign.C.Types          (CInt, CSize, CULong)
 
 import Foreign.C.String         (CString)
 
-#if MIN_VERSION_base(4,9,0)
+#if !(MIN_VERSION_base(4,11,0)) && MIN_VERSION_base(4,9,0)
 import Data.Semigroup           (Semigroup((<>)))
 #endif
 #if !(MIN_VERSION_base(4,8,0))
index ac305f2..e9e2e46 100644 (file)
@@ -51,7 +51,7 @@ import qualified Data.ByteString          as S (length, take, drop)
 import Data.Word        (Word8)
 import Foreign.Storable (Storable(sizeOf))
 
-#if MIN_VERSION_base(4,9,0)
+#if !(MIN_VERSION_base(4,11,0)) && MIN_VERSION_base(4,9,0)
 import Data.Semigroup   (Semigroup((<>)))
 #endif
 #if !(MIN_VERSION_base(4,8,0))