on master help sign in
fix build for ghc 8.4
663ecb9Harendra Kumar
.travis.yml+1−1
@@ -121,7 +121,7 @@ matrix:
121
121
122 # Note COVERALLS (hpc-coveralls) works only with cabal build.
122 # Note COVERALLS (hpc-coveralls) works only with cabal build.
123 # For this to succeed you have to add your project to coveralls.io first
123 # For this to succeed you have to add your project to coveralls.io first
124− - env: BUILD=cabal CABALVER=2.0 GHCVER=8.2.2 COVERALLS_OPTIONS="--coverage-mode=StrictlyFullLines --exclude-dir=test test"
124+ - env: BUILD=cabal CABALVER=2.0 GHCVER=8.2.2 COVERALLS_OPTIONS="--coverage-mode=StrictlyFullLines --exclude-dir=test test properties"
125 addons: {apt: {packages: [cabal-install-2.0,ghc-8.2.2], sources: [hvr-ghc]}}
125 addons: {apt: {packages: [cabal-install-2.0,ghc-8.2.2], sources: [hvr-ghc]}}
126
126
127 # --------------------------------------------------------------------------
127 # --------------------------------------------------------------------------
test/Prop.hs+8−1
@@ -1,3 +1,5 @@
1+{-# LANGUAGE CPP #-}
2+
1module Main (main) where
3module Main (main) where
2
4
3import Control.Monad (when)
5import Control.Monad (when)
@@ -161,7 +163,12 @@ transformOpsWord8 desc t = do
161 prop (desc ++ " elem") $ elemOp t A.notElem notElem
163 prop (desc ++ " elem") $ elemOp t A.notElem notElem
162
164
163semigroupOps
165semigroupOps
164− :: (Streaming t, MonadPlus (t IO), Semigroup (t IO Int), Monoid (t IO Int))
166+ :: ( Streaming t, MonadPlus (t IO)
167+
168+#if __GLASGOW_HASKELL__ < 804
169+ , Semigroup (t IO Int)
170+#endif
171+ , Monoid (t IO Int))
165 => String -> (t IO Int -> t IO Int) -> Spec
172 => String -> (t IO Int -> t IO Int) -> Spec
166semigroupOps desc t = do
173semigroupOps desc t = do
167 prop (desc ++ " <>") $ foldFromList (foldMapWith (<>) return) t
174 prop (desc ++ " <>") $ foldFromList (foldMapWith (<>) return) t