663ecb9 · streamly · git.iko.soy

git.iko.soy/streamly

fix build for ghc 8.4

commit663ecb9e2716ddda23eb363c63b817e83c999f12 authorHarendra Kumar <harendra.kumar@gmail.com> dateSat 14 Apr 2018, 17:12 (9 years ago) parentac3b3df

2 files changed+9−2

unifiedsplit

.travis.yml+1−1

@@ -121,7 +121,7 @@ matrix:

121121

122122 # Note COVERALLS (hpc-coveralls) works only with cabal build.

123123 # 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"

125125 addons: {apt: {packages: [cabal-install-2.0,ghc-8.2.2], sources: [hvr-ghc]}}

126126

127127 # --------------------------------------------------------------------------

test/Prop.hs+8−1

@@ -1,3 +1,5 @@

1+{-# LANGUAGE CPP #-}

13module Main (main) where

35import Control.Monad (when)

@@ -161,7 +163,12 @@ transformOpsWord8 desc t = do

161163 prop (desc ++ " elem") $ elemOp t A.notElem notElem

162164

163165semigroupOps

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))

165172 => String -> (t IO Int -> t IO Int) -> Spec

166173semigroupOps desc t = do

167174 prop (desc ++ " <>") $ foldFromList (foldMapWith (<>) return) t