composewell/streamly
1
1
Fork 0
mirror of https://github.com/composewell/streamly.git synced 2024-09-20 16:08:20 +03:00
Code Issues Packages Projects Releases Wiki Activity

Use scanl' from the imported stream (D or K)

Browse Source 
It was earlier hardcoded to use D.
This commit is contained in:
Harendra Kumar 2018-11-06 05:12:01 +05:30
parent 734004b570
commit 58e8d397f5
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/Streamly/Prelude.hs
View File

@ -847,7 +847,7 @@ scanlM' step begin m = fromStreamD $ D.scanlM' step begin $ toStreamD m
-- @since 0.2.0
{-# INLINE scanl' #-}
scanl' :: (IsStream t, Monad m) => (b -> a -> b) -> b -> t m a -> t m b
scanl' step = scanlM' (\a b -> return (step a b))
scanl' step z m = fromStreamS $ S.scanl' step z $ toStreamS m
------------------------------------------------------------------------------
-- Transformation by Filtering