no CPP?
This commit is contained in:
parent
962acbb845
commit
be49dc9cbc
@ -15,9 +15,7 @@ import Servant.API.ContentTypes (AllMimeRender (..))
|
|||||||
import Servant.Client (BaseUrl (..), Scheme (..))
|
import Servant.Client (BaseUrl (..), Scheme (..))
|
||||||
import Test.QuickCheck (Arbitrary (..), Gen, elements, frequency)
|
import Test.QuickCheck (Arbitrary (..), Gen, elements, frequency)
|
||||||
|
|
||||||
#if __GLASGOW_HASKELL__ <= 800
|
|
||||||
import Data.Monoid ((<>))
|
import Data.Monoid ((<>))
|
||||||
#endif
|
|
||||||
|
|
||||||
import qualified Data.ByteString as BS
|
import qualified Data.ByteString as BS
|
||||||
import qualified Data.ByteString.Internal as BS (c2w)
|
import qualified Data.ByteString.Internal as BS (c2w)
|
||||||
|
|||||||
@ -19,9 +19,7 @@ import Test.QuickCheck.Monadic (assert, forAllM, monadicIO, monitor,
|
|||||||
run)
|
run)
|
||||||
import Test.QuickCheck.Property (counterexample)
|
import Test.QuickCheck.Property (counterexample)
|
||||||
|
|
||||||
#if __GLASGOW_HASKELL__ <= 800
|
|
||||||
import Data.Monoid ((<>))
|
import Data.Monoid ((<>))
|
||||||
#endif
|
|
||||||
|
|
||||||
import Servant.QuickCheck.Internal.Equality
|
import Servant.QuickCheck.Internal.Equality
|
||||||
import Servant.QuickCheck.Internal.ErrorTypes
|
import Servant.QuickCheck.Internal.ErrorTypes
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user