Benchmark splitSepBy_ instead of splitOn

composewell · Jan 7, 2025 · 60a1383 · 60a1383
1 parent 05d6e90
commit 60a1383
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/benchmark/Streamly/Benchmark/Data/Stream/Split.hs b/benchmark/Streamly/Benchmark/Data/Stream/Split.hs
@@ -61,7 +61,7 @@ toarr = Array.fromList . map (fromIntegral . ord)
 splitOn :: Handle -> IO Int
 splitOn inh =
     (Stream.fold Fold.length
-        $ Stream.splitOn (== lf) Fold.drain
+        $ Stream.splitSepBy_ (== lf) Fold.drain
         $ Handle.read inh) -- >>= print
 
 #ifdef INSPECTION