util 0.1.2.1 → 0.1.3.0
raw patch · 2 files changed
+7/−2 lines, 2 filesPVP ok
version bump matches the API change (PVP)
API changes (from Hackage documentation)
+ Util: intercalate :: Semigroup a => a -> NonEmpty a -> a
Files
- Util.hs +6/−1
- util.cabal +1/−1
Util.hs view
@@ -7,6 +7,8 @@ import Data.Foldable import Data.Function (flip) import Data.Functor.Classes+import Data.List.NonEmpty (NonEmpty (..))+import qualified Data.List.NonEmpty as NE import Data.Maybe import Data.Semigroup import Data.Monoid (Monoid (..))@@ -16,7 +18,7 @@ infixr 3 &=& (&=&) :: Applicative p => (a -> p b) -> (a -> p c) -> a -> p (b, c)-f &=& g = (liftA2 ∘ liftA2) (,) f g+(&=&) = (liftA2 ∘ liftA2) (,) infixr 3 *=* (*=*) :: Applicative p => (a1 -> p b1) -> (a2 -> p b2) -> (a1, a2) -> p (b1, b2)@@ -96,3 +98,6 @@ (!!?) = go . toList where go [] _ = Nothing go (x:_) 0 = Just x go (_:xs) n = go xs (pred n)++intercalate :: Semigroup a => a -> NonEmpty a -> a+intercalate a = sconcat . NE.intersperse a
util.cabal view
@@ -1,5 +1,5 @@ name: util-version: 0.1.2.1+version: 0.1.3.0 synopsis: Utilities -- description: license: BSD3