@@ -111,10 +111,10 @@ manyTill value =
111 pcond = PR.satisfy (== value)
111 pcond = PR.satisfy (== value)
112 in IP.parseD (PR.manyTill FL.length p pcond)
112 in IP.parseD (PR.manyTill FL.length p pcond)
114−{-# INLINE splitAllAny #-}
114+{-# INLINE splitWith #-}
115−splitAllAny :: MonadThrow m
115+splitWith :: MonadThrow m
116 => Int -> SerialT m Int -> m ((), ())
116 => Int -> SerialT m Int -> m ((), ())
117−splitAllAny value =
117+splitWith value =
118 IP.parseD
118 IP.parseD
120 <$> drainWhile (<= (value `div` 2))
120 <$> drainWhile (<= (value `div` 2))
@@ -214,7 +214,7 @@ o_1_space_serial value =
214 [ benchIOSink value "takeWhile" $ takeWhile value
214 [ benchIOSink value "takeWhile" $ takeWhile value
215 , benchIOSink value "groupBy" $ groupBy
215 , benchIOSink value "groupBy" $ groupBy
216 , benchIOSink value "wordBy" $ wordBy value
216 , benchIOSink value "wordBy" $ wordBy value
217− , benchIOSink value "split (all,any)" $ splitAllAny value
217+ , benchIOSink value "splitWith" $ splitWith value
218 , benchIOSink value "many" many
218 , benchIOSink value "many" many
219 , benchIOSink value "many (wordBy even)" $ manyWordByEven
219 , benchIOSink value "many (wordBy even)" $ manyWordByEven
220 , benchIOSink value "some" some
220 , benchIOSink value "some" some