Skip to content

Commit 0ddbd48

Browse files
Fix Alternative Parser benchmarks
1 parent 0b8b22c commit 0ddbd48

File tree

1 file changed

+1
-1
lines changed

1 file changed

+1
-1
lines changed

benchmark/Streamly/Benchmark/Data/ParserK.hs

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -234,7 +234,7 @@ takeWhileFailD predicate (Fold fstep finitial _ ffinal) =
234234
fres <- fstep s a
235235
return
236236
$ case fres of
237-
Fold.Partial s1 -> SPartial 1 s1
237+
Fold.Partial s1 -> SContinue 1 s1
238238
Fold.Done b -> SDone 1 b
239239
else return $ Error "fail"
240240

0 commit comments

Comments
 (0)