on master help sign in
Use Continue instead of Partial in noErrorUnsafeSplitWith
commit9cdb82c1aa0e15f375bfde03cf55b79fe2275011 authorHarendra Kumar <harendra@composewell.com> dateWed 14 Apr 2021, 02:02 (6 years ago) parent05b2d53
1 file changed+2−2
src/Streamly/Internal/Data/Parser/ParserD/Type.hs+2−2
src/Streamly/Internal/Data/Parser/ParserD/Type.hs+2−2
@@ -424,7 +424,7 @@ noErrorUnsafeSplitWith func (Parser stepL initialL extractL)
424424 -- Assume that the first parser can never fail, therefore we do not
425425 -- need to keep the input for backtracking.
426426 Partial n s -> return $ Partial n (SeqParseL s)
427− Continue n s -> return $ Partial n (SeqParseL s)
427+ Continue n s -> return $ Continue n (SeqParseL s)
428428 Done n b -> do
429429 res <- initialR
430430 return
@@ -438,7 +438,7 @@ noErrorUnsafeSplitWith func (Parser stepL initialL extractL)
438438 r <- stepR st a
439439 return $ case r of
440440 Partial n s -> Partial n (SeqParseR f s)
441− Continue n s -> Partial n (SeqParseR f s)
441+ Continue n s -> Continue n (SeqParseR f s)
442442 Done n b -> Done n (f b)
443443 Error err -> Error err
444444