packages feed

reducers 3.10.3.2 → 3.11

raw patch · 16 files changed

+94/−15 lines, 16 files

Files

.travis.yml view
@@ -1,8 +1,49 @@-language: haskell+language: c+sudo: false++matrix:+  include:+    - env: CABALVER=1.16 GHCVER=7.4.2+      addons: {apt: {packages: [cabal-install-1.16,ghc-7.4.2], sources: [hvr-ghc]}}+    - env: CABALVER=1.16 GHCVER=7.6.3+      addons: {apt: {packages: [cabal-install-1.16,ghc-7.6.3], sources: [hvr-ghc]}}+    - env: CABALVER=1.18 GHCVER=7.8.4+      addons: {apt: {packages: [cabal-install-1.18,ghc-7.8.4], sources: [hvr-ghc]}}+    - env: CABALVER=1.22 GHCVER=7.10.1+      addons: {apt: {packages: [cabal-install-1.22,ghc-7.10.1],sources: [hvr-ghc]}}+    - env: CABALVER=head GHCVER=head+      addons: {apt: {packages: [cabal-install-head,ghc-head],  sources: [hvr-ghc]}}++  allow_failures:+   - env: CABALVER=head GHCVER=head++before_install:+ - export PATH=/opt/ghc/$GHCVER/bin:/opt/cabal/$CABALVER/bin:$PATH+ - export CABAL=cabal-$CABALVER+ - $CABAL --version++install:+ - travis_retry $CABAL update+ - $CABAL install --enable-tests --only-dependencies++script:+ - $CABAL configure -v2 --enable-tests+ - $CABAL build+ - $CABAL test+ - $CABAL sdist+ - export SRC_TGZ=$(cabal info . | awk '{print $2 ".tar.gz";exit}') ;+   cd dist/;+   if [ -f "$SRC_TGZ" ]; then+      $CABAL install "$SRC_TGZ";+   else+      echo "expected '$SRC_TGZ' not found";+      exit 1;+   fi+ notifications:   irc:     channels:       - "irc.freenode.org#haskell-lens"     skip_join: true     template:-      - "\x0313reducers\x03/\x0306%{branch}\x03 \x0314%{commit}\x03 %{build_url} %{message}"+      - "\x0313reducers\x0f/\x0306%{branch}\x0f \x0314%{commit}\x0f %{message} \x0302\x1f%{build_url}\x0f"
reducers.cabal view
@@ -1,6 +1,6 @@ name:          reducers category:      Data, Math, Numerical, Semigroups-version:       3.10.3.2+version:       3.11 license:       BSD3 cabal-version: >= 1.6 license-file:  LICENSE
src/Data/Generator.hs view
@@ -35,7 +35,9 @@   , reduceWith   ) where +#if __GLASGOW_HASKELL__ < 710 import Data.Monoid (Monoid, mappend, mempty)+#endif  import Data.Array import Data.Text (Text)@@ -62,7 +64,11 @@ import Data.List.NonEmpty (NonEmpty) import qualified Data.List.NonEmpty as NonEmpty -- import Control.Parallel.Strategies (rseq, parMap)+#if __GLASGOW_HASKELL__ < 710 import Data.Foldable (fold,foldMap)+#else+import Data.Foldable (fold)+#endif import Data.Semigroup.Reducer  -- | minimal definition 'mapReduce' or 'mapTo'
src/Data/Generator/Combinators.hs view
@@ -60,7 +60,9 @@ import Control.Applicative import Control.Monad (MonadPlus) import Data.Generator+#if __GLASGOW_HASKELL__ < 710 import Data.Monoid (Monoid(..))+#endif import Data.Semigroup (Sum(..), Product(..), All(..), Any(..), WrappedMonoid(..)) import Data.Semigroup.Applicative (Traversal(..)) import Data.Semigroup.Alternative (Alternate(..))
src/Data/Semigroup/Alt.hs view
@@ -1,6 +1,6 @@ {-# LANGUAGE FlexibleInstances, MultiParamTypeClasses, GeneralizedNewtypeDeriving, FlexibleContexts #-} {-# LANGUAGE CPP #-}-#if defined(__GLASGOW_HASKELL__) && __GLASGOW_HASKELL__ >= 702+#if __GLASGOW_HASKELL__ >= 702 {-# LANGUAGE Trustworthy #-} #endif @@ -22,7 +22,9 @@     ) where  import Data.Functor.Plus+#if __GLASGOW_HASKELL__ < 710 import Data.Monoid (Monoid(..))+#endif import Data.Semigroup (Semigroup(..)) import Data.Semigroup.Reducer (Reducer(..))
src/Data/Semigroup/Alternative.hs view
@@ -22,7 +22,9 @@     ) where  import Control.Applicative+#if __GLASGOW_HASKELL__ < 710 import Data.Monoid (Monoid(..))+#endif import Data.Semigroup (Semigroup(..)) import Data.Semigroup.Reducer (Reducer(..))
src/Data/Semigroup/Applicative.hs view
@@ -1,6 +1,6 @@ {-# LANGUAGE FlexibleInstances, MultiParamTypeClasses, GeneralizedNewtypeDeriving, FlexibleContexts, TypeOperators #-} {-# LANGUAGE CPP #-}-#if defined(__GLASGOW_HASKELL__) && __GLASGOW_HASKELL__ >= 702+#if __GLASGOW_HASKELL__ >= 702 {-# LANGUAGE Trustworthy #-} #endif @@ -23,7 +23,9 @@     ) where  import Control.Applicative+#if __GLASGOW_HASKELL__ < 710 import Data.Monoid (Monoid(..))+#endif import Data.Semigroup (Semigroup(..)) import Data.Semigroup.Reducer (Reducer(..)) @@ -51,7 +53,7 @@ {-# RULES "unitTraversal" unit = Traversal #-} {-# RULES "snocTraversal" snoc = snocTraversal #-} -newtype Ap f m = Ap { getApp :: f m }+newtype Ap f m = Ap { getAp :: f m }   deriving (Functor,Applicative)  instance (Applicative f, Semigroup m) => Semigroup (Ap f m) where
src/Data/Semigroup/Apply.hs view
@@ -1,6 +1,6 @@ {-# LANGUAGE FlexibleInstances, MultiParamTypeClasses, GeneralizedNewtypeDeriving, FlexibleContexts #-} {-# LANGUAGE CPP #-}-#if defined(__GLASGOW_HASKELL__) && __GLASGOW_HASKELL__ >= 702+#if __GLASGOW_HASKELL__ >= 702 {-# LANGUAGE Trustworthy #-} #endif @@ -22,7 +22,9 @@     , App(..)     ) where +#if __GLASGOW_HASKELL__ < 710 import Data.Functor+#endif import Data.Functor.Apply import Data.Semigroup (Semigroup(..)) import Data.Semigroup.Reducer (Reducer(..))
src/Data/Semigroup/Generator.hs view
@@ -1,5 +1,5 @@ {-# LANGUAGE UndecidableInstances, TypeOperators, FlexibleContexts, MultiParamTypeClasses, FlexibleInstances, TypeFamilies, CPP #-}-#if defined(__GLASGOW_HASKELL__) && __GLASGOW_HASKELL__ >= 702+#if __GLASGOW_HASKELL__ >= 702 && __GLASGOW_HASKELL__ < 710 {-# LANGUAGE Trustworthy #-} #endif
src/Data/Semigroup/Instances.hs view
@@ -1,5 +1,5 @@ {-# LANGUAGE CPP #-}-#if defined(__GLASGOW_HASKELL__) && __GLASGOW_HASKELL__ >= 702+#if __GLASGOW_HASKELL__ >= 702 && __GLASGOW_HASKELL__ < 710 {-# LANGUAGE Trustworthy #-} #endif {-# OPTIONS_GHC -fno-warn-orphans #-}
src/Data/Semigroup/Monad.hs view
@@ -1,6 +1,6 @@ {-# LANGUAGE FlexibleInstances, MultiParamTypeClasses, GeneralizedNewtypeDeriving, FlexibleContexts, TypeOperators #-} {-# LANGUAGE CPP #-}-#if defined(__GLASGOW_HASKELL__) && __GLASGOW_HASKELL__ >= 702+#if __GLASGOW_HASKELL__ >= 702 {-# LANGUAGE Trustworthy #-} #endif @@ -23,8 +23,10 @@     ) where  import Control.Monad (liftM, liftM2)+#if __GLASGOW_HASKELL__ < 710 import Control.Applicative (Applicative(..)) import Data.Monoid (Monoid(..))+#endif import Data.Semigroup (Semigroup(..)) import Data.Semigroup.Reducer (Reducer(..))
src/Data/Semigroup/MonadPlus.hs view
@@ -1,6 +1,6 @@ {-# LANGUAGE FlexibleInstances, MultiParamTypeClasses, GeneralizedNewtypeDeriving, FlexibleContexts, TypeOperators #-} {-# LANGUAGE CPP #-}-#if defined(__GLASGOW_HASKELL__) && __GLASGOW_HASKELL__ >= 702+#if __GLASGOW_HASKELL__ >= 702 {-# LANGUAGE Trustworthy #-} #endif @@ -22,8 +22,12 @@     ) where  import Control.Monad (MonadPlus(..))+#if __GLASGOW_HASKELL__ < 710 import Control.Applicative (Applicative(..),Alternative(..)) import Data.Monoid (Monoid(..))+#else+import Control.Applicative (Alternative(..))+#endif import Data.Semigroup (Semigroup(..)) import Data.Semigroup.Reducer (Reducer(..))
src/Data/Semigroup/Reducer.hs view
@@ -1,5 +1,5 @@ {-# LANGUAGE UndecidableInstances , FlexibleContexts , MultiParamTypeClasses , FlexibleInstances , GeneralizedNewtypeDeriving, TypeOperators, ScopedTypeVariables, CPP #-}-#if defined(__GLASGOW_HASKELL__) && __GLASGOW_HASKELL__ >= 702+#if __GLASGOW_HASKELL__ >= 702 {-# LANGUAGE Trustworthy #-} #endif @@ -25,14 +25,20 @@   , Count(..)   ) where +#if __GLASGOW_HASKELL__ < 710 import Control.Applicative+#endif  import qualified Data.Monoid as Monoid import Data.Semigroup as Semigroup import Data.Semigroup.Foldable import Data.Semigroup.Instances () import Data.Hashable++#if __GLASGOW_HASKELL__ < 710 import Data.Foldable+#endif+ import Data.FingerTree  import qualified Data.Sequence as Seq
src/Data/Semigroup/Reducer/With.hs view
@@ -1,6 +1,6 @@ {-# LANGUAGE UndecidableInstances, FlexibleContexts, MultiParamTypeClasses, FlexibleInstances #-} {-# LANGUAGE CPP #-}-#if defined(__GLASGOW_HASKELL__) && __GLASGOW_HASKELL__ >= 702+#if __GLASGOW_HASKELL__ >= 702 && __GLASGOW_HASKELL__ < 710 {-# LANGUAGE Trustworthy #-} #endif @@ -19,12 +19,18 @@   ( WithReducer(..)   ) where +#if __GLASGOW_HASKELL__ < 710 import Control.Applicative+#endif import Data.FingerTree+#if __GLASGOW_HASKELL__ < 710 import Data.Foldable import Data.Traversable+#endif import Data.Hashable+#if __GLASGOW_HASKELL__ < 710 import Data.Monoid+#endif import Data.Semigroup.Reducer import Data.Semigroup.Foldable import Data.Semigroup.Traversable
src/Data/Semigroup/Self.hs view
@@ -1,6 +1,6 @@ {-# LANGUAGE FlexibleInstances, MultiParamTypeClasses, GeneralizedNewtypeDeriving #-} {-# LANGUAGE CPP #-}-#if defined(__GLASGOW_HASKELL__) && __GLASGOW_HASKELL__ >= 702+#if __GLASGOW_HASKELL__ >= 702 {-# LANGUAGE Trustworthy #-} #endif @@ -26,9 +26,11 @@     ( Self(..)     )  where +#if __GLASGOW_HASKELL__ < 710 import Control.Applicative import Data.Foldable import Data.Traversable+#endif import Data.Semigroup import Data.Semigroup.Foldable import Data.Semigroup.Traversable
src/Data/Semigroup/Union.hs view
@@ -1,6 +1,6 @@ {-# LANGUAGE MultiParamTypeClasses, FlexibleInstances, GeneralizedNewtypeDeriving #-} {-# LANGUAGE CPP #-}-#if defined(__GLASGOW_HASKELL__) && __GLASGOW_HASKELL__ >= 702+#if __GLASGOW_HASKELL__ >= 702 {-# LANGUAGE Trustworthy #-} #endif module Data.Semigroup.Union@@ -36,9 +36,11 @@ import qualified Data.List as List  import Data.Hashable+#if __GLASGOW_HASKELL__ < 710 import Data.Functor import Data.Foldable import Data.Traversable+#endif import Data.Semigroup import Data.Semigroup.Foldable import Data.Semigroup.Traversable