From be49dc9cbc02a67f6aabaefde501a60708c02194 Mon Sep 17 00:00:00 2001 From: parsonsmatt Date: Wed, 23 May 2018 15:36:43 -0600 Subject: [PATCH] no CPP? --- src/Servant/QuickCheck/Internal/HasGenRequest.hs | 2 -- src/Servant/QuickCheck/Internal/QuickCheck.hs | 2 -- 2 files changed, 4 deletions(-) diff --git a/src/Servant/QuickCheck/Internal/HasGenRequest.hs b/src/Servant/QuickCheck/Internal/HasGenRequest.hs index f49904a..01f17ee 100644 --- a/src/Servant/QuickCheck/Internal/HasGenRequest.hs +++ b/src/Servant/QuickCheck/Internal/HasGenRequest.hs @@ -15,9 +15,7 @@ import Servant.API.ContentTypes (AllMimeRender (..)) import Servant.Client (BaseUrl (..), Scheme (..)) import Test.QuickCheck (Arbitrary (..), Gen, elements, frequency) -#if __GLASGOW_HASKELL__ <= 800 import Data.Monoid ((<>)) -#endif import qualified Data.ByteString as BS import qualified Data.ByteString.Internal as BS (c2w) diff --git a/src/Servant/QuickCheck/Internal/QuickCheck.hs b/src/Servant/QuickCheck/Internal/QuickCheck.hs index d6f1a0e..8732e03 100644 --- a/src/Servant/QuickCheck/Internal/QuickCheck.hs +++ b/src/Servant/QuickCheck/Internal/QuickCheck.hs @@ -19,9 +19,7 @@ import Test.QuickCheck.Monadic (assert, forAllM, monadicIO, monitor, run) import Test.QuickCheck.Property (counterexample) -#if __GLASGOW_HASKELL__ <= 800 import Data.Monoid ((<>)) -#endif import Servant.QuickCheck.Internal.Equality import Servant.QuickCheck.Internal.ErrorTypes