papa-semigroupoids-implement 0.2.0 → 0.2.1

raw patch · 4 files changed

+35/−4 lines, 4 filesPVP ok

version bump matches the API change (PVP)

API changes (from Hackage documentation)

Files

• changelog +4/−0
• papa-semigroupoids-implement.cabal +5/−4
• src/Papa/Semigroupoids/Implement.hs +1/−0
• src/Papa/Semigroupoids/Implement/Data/Semigroup/Foldable.hs +25/−0

@@ -1,3 +1,7 @@+0.2.1++* `minimum` and `maximum` functions.+ 0.2.0  * Initial release.

@@ -1,5 +1,5 @@ name:               papa-semigroupoids-implement-version:            0.2.0+version:            0.2.1 license:            BSD3 license-file:       LICENSE author:             Tony Morris <ʇǝu˙sıɹɹoɯʇ@ןןǝʞsɐɥ>@@ -8,15 +8,15 @@ synopsis:           useful `bifunctors` functions reimplemented category:           Prelude description:        useful `bifunctors` functions reimplemented-homepage:           https://github.com/data61/papa-semigroupoids-implement-bug-reports:        https://github.com/data61/papa-semigroupoids-implement/issues+homepage:           https://github.com/data61/papa+bug-reports:        https://github.com/data61/papa/issues cabal-version:      >= 1.10 build-type:         Custom extra-source-files: changelog  source-repository   head   type:             git-  location:         git@github.com:data61/papa-semigroupoids-implement.git+  location:         git@github.com:data61/papa.git  flag                small_base   description:      Choose the new, split-up base package.@@ -41,6 +41,7 @@   exposed-modules:                     Papa.Semigroupoids.Implement                     Papa.Semigroupoids.Implement.Data.Functor.Bind+                    Papa.Semigroupoids.Implement.Data.Semigroup.Foldable                      test-suite doctests   type:

@@ -5,3 +5,4 @@ ) where  import Papa.Semigroupoids.Implement.Data.Functor.Bind as P+import Papa.Semigroupoids.Implement.Data.Semigroup.Foldable as P

@@ -0,0 +1,25 @@+{-# LANGUAGE NoImplicitPrelude #-}++module Papa.Semigroupoids.Implement.Data.Semigroup.Foldable(+  maximum+, minimum+) where++import Control.Category((.))+import Data.Ord(Ord(max, min))+import Data.Semigroup.Foldable+import Data.Semigroup(Max(Max, getMax), Min(Min, getMin))++maximum ::+  (Ord a, Foldable1 f) =>+  f a+  -> a+maximum =+  getMax . foldMap1 Max++minimum ::+  (Ord a, Foldable1 f) =>+  f a+  -> a+minimum =+  getMin . foldMap1 Min