deferred-folds 0.6.3 → 0.6.4
raw patch · 3 files changed
+6/−1 lines, 3 filesPVP ok
version bump matches the API change (PVP)
API changes (from Hackage documentation)
+ DeferredFolds.Unfold: instance GHC.Classes.Eq a => GHC.Classes.Eq (DeferredFolds.Unfold.Unfold a)
+ DeferredFolds.UnfoldM: instance GHC.Classes.Eq a => GHC.Classes.Eq (DeferredFolds.UnfoldM.UnfoldM Data.Functor.Identity.Identity a)
Files
- deferred-folds.cabal +1/−1
- library/DeferredFolds/Unfold.hs +2/−0
- library/DeferredFolds/UnfoldM.hs +3/−0
deferred-folds.cabal view
@@ -1,7 +1,7 @@ name: deferred-folds version:- 0.6.3+ 0.6.4 category: Folding synopsis:
library/DeferredFolds/Unfold.hs view
@@ -107,6 +107,8 @@ {-# INLINE foldl' #-} foldl' step init (Unfold run) = run step init +instance Eq a => Eq (Unfold a) where+ (==) left right = toList left == toList right {-| Apply a Gonzalez fold -} {-# INLINE fold #-}
library/DeferredFolds/UnfoldM.hs view
@@ -59,6 +59,9 @@ where identityStep state input = return (step state input) +instance Eq a => Eq (UnfoldM Identity a) where+ (==) left right = toList left == toList right+ {-| Perform a monadic strict left fold -} {-# INLINE foldlM' #-} foldlM' :: Monad m => (output -> input -> m output) -> output -> UnfoldM m input -> m output