@@ -488,7 +488,7 @@ drop n m = fromStreamD $ D.drop n $ toStreamD m
488-- | Find all the indices where the element in the stream satisfies the given
488-- | Find all the indices where the element in the stream satisfies the given
489-- predicate.
489-- predicate.
491−-- >>> findIndices p = Stream.fold (Fold.findIndices p)
491+-- >>> findIndices p = Stream.scanMaybe (Fold.findIndices p)
493{-# INLINE findIndices #-}
493{-# INLINE findIndices #-}
494findIndices :: Monad m => (a -> Bool) -> Stream m a -> Stream m Int
494findIndices :: Monad m => (a -> Bool) -> Stream m a -> Stream m Int