composition-prelude 1.3.0.4 → 1.3.0.5

raw patch · 2 files changed

+11/−18 lines, 2 filesPVP ok

version bump matches the API change (PVP)

API changes (from Hackage documentation)

Files

• composition-prelude.cabal +4/−3
• src/Control/Composition.hs +7/−15

@@ -1,10 +1,10 @@ cabal-version: >=1.10 name: composition-prelude-version: 1.3.0.4+version: 1.3.0.5 license: BSD3 license-file: LICENSE-copyright: Copyright: (c) 2017 Vanessa McHale-maintainer: vanessa.mchale@reconfigure.io+copyright: Copyright: (c) 2017-2018 Vanessa McHale+maintainer: vamchale@gmail.com author: Vanessa McHale homepage: https://github.com/vmchale/composition-prelude#readme synopsis: Higher-order function combinators@@ -30,6 +30,7 @@ library     exposed-modules:         Control.Composition+    build-tools: cpphs -any     hs-source-dirs: src     default-language: Haskell2010     ghc-options: -Wall

@@ -36,11 +36,7 @@ import           Control.Arrow ((***)) import           Control.Monad import           Data.Bool     (bool)-#if __GLASGOW_HASKELL__ > 710 import           Data.Function (fix, on, (&))-#else-import           Data.Function (fix, on)-#endif #if defined(MIN_VERSION_lens) #if MIN_VERSION_lens(3,0) import           Control.Lens  ((<&>))@@ -60,16 +56,14 @@ infixr 8 -.*** infixr 8 -.**** infixl 8 -$-#if __GLASGOW_HASKELL__ <= 710-infixl 1 &--(&) :: a -> (a -> b) -> b-(&) x f = f x-#endif #if defined(MIN_VERSION_lens) #if !MIN_VERSION_lens(3,0) infixl 1 <&> #endif+#elif defined(MIN_VERSION_microlens)+#if !MIN_VERSION_microlens(4,5)+infixl 1 <&>+#endif #else infixl 1 <&> #endif@@ -128,15 +122,13 @@ (<&>) :: Functor f => f a -> (a -> b) -> f b x <&> f = fmap f x #endif+#elif defined(MIN_VERSION_microlens)+#if !MIN_VERSION_microlens(4,5)+#endif #else (<&>) :: Functor f => f a -> (a -> b) -> f b x <&> f = fmap f x #endif --- (<$$)- thread :: [a -> a] -> a -> a thread = foldr (.) id---- setZip :: [ASetter a a b b] -> [b] -> a -> a--- setZip ls ts = thread (zipWith set ls ts)