chore: Remove warning suppression.

TokTok · Dec 23, 2023 · 66e110b · 66e110b
1 parent 8c0b0f4
commit 66e110b
Show file tree

Hide file tree

Showing 3 changed files with 4 additions and 11 deletions.
diff --git a/BUILD.bazel b/BUILD.bazel
@@ -27,7 +27,6 @@ haskell_library(
 hspec_test(
     name = "testsuite",
     size = "small",
-    compiler_flags = ["-Wno-unused-imports"],
     deps = [
         ":hs-msgpack-types",
         "//third_party/haskell:QuickCheck",

diff --git a/test/Data/MessagePack/Types/AssocSpec.hs b/test/Data/MessagePack/Types/AssocSpec.hs
@@ -5,8 +5,7 @@ module Data.MessagePack.Types.AssocSpec where
 import           Data.MessagePack.Types                (Assoc (..))
 import           Test.Hspec                            (Spec, describe, it,
                                                         shouldBe)
-import           Test.QuickCheck                       (Arbitrary (..),
-                                                        property)
+import           Test.QuickCheck                       (property)
 import           Test.QuickCheck.Instances.MessagePack ()
 
 spec :: Spec

diff --git a/test/Data/MessagePack/Types/ClassSpec.hs b/test/Data/MessagePack/Types/ClassSpec.hs
@@ -8,14 +8,9 @@
 {-# LANGUAGE Trustworthy         #-}
 module Data.MessagePack.Types.ClassSpec where
 
-import           Control.Applicative                   (empty, pure, (<$>),
-                                                        (<*>), (<|>))
-import           Control.Monad                         (mplus, mzero)
-import           Control.Monad.Validate                (MonadValidate (..),
-                                                        runValidate)
+import           Control.Monad.Validate                (runValidate)
 import qualified Data.ByteString                       as BS
 import qualified Data.ByteString.Lazy                  as LBS
-import           Data.Hashable                         (Hashable)
 import qualified Data.HashMap.Strict                   as HashMap
 import           Data.Int                              (Int16, Int32, Int64,
                                                         Int8)
@@ -31,8 +26,8 @@ import qualified Data.Text.Lazy                        as LText
 import qualified Data.Vector                           as V
 import qualified Data.Vector.Storable                  as VS
 import qualified Data.Vector.Unboxed                   as VU
-import           Data.Word                             (Word, Word16, Word32,
-                                                        Word64, Word8)
+import           Data.Word                             (Word16, Word32, Word64,
+                                                        Word8)
 import           GHC.Generics                          (Generic)
 import           Test.Hspec                            (Spec, describe, it,
                                                         shouldBe, shouldSatisfy)