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

Fix a bug in foldMany1

Browse Source 
Jump to correct state on Skip.
This commit is contained in:
Harendra Kumar 2021-02-05 18:46:45 +05:30
parent ccbaa15147
commit 01e5e5179e
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/Internal/Data/Stream/StreamD/Type.hs
View File

@ -890,7 +890,7 @@ foldMany1 (Fold fstep initial extract) (Stream step state) =
r <- step (adaptState gst) st
case r of
Yield x s -> consume x s fs
Skip s -> return $ Skip (FoldMany1Start s)
Skip s -> return $ Skip (FoldMany1First fs s)
Stop -> return Stop
step' gst (FoldMany1Loop st fs) = do
r <- step (adaptState gst) st