@@ -2091,6 +2091,12 @@ data WordsByState st fs b
2091 | WordsByDone
2091 | WordsByDone
2092 | WordsByYield !b (WordsByState st fs b)
2092 | WordsByYield !b (WordsByState st fs b)
2094+-- | Split the stream after stripping leading, trailing, and repeated separators
2095+-- as per the fold supplied.
2096+-- Therefore, @".a..b."@ with '.' as the separator would be parsed as
2097+-- @["a","b"]@. In other words, its like parsing words from whitespace
2094{-# INLINE_NORMAL wordsBy #-}
2100{-# INLINE_NORMAL wordsBy #-}
2095wordsBy :: Monad m => (a -> Bool) -> Fold m a b -> Stream m a -> Stream m b
2101wordsBy :: Monad m => (a -> Bool) -> Fold m a b -> Stream m a -> Stream m b
2096wordsBy predicate (Fold fstep initial done) (Stream step state) =
2102wordsBy predicate (Fold fstep initial done) (Stream step state) =