@@ -372,6 +372,7 @@ maximum m = go Nothing (toStream m)
373-- | Replace each element of the stream with the result of a monadic action
373-- | Replace each element of the stream with the result of a monadic action
374-- applied on the element.
374-- applied on the element.
375mapM :: (Streaming t, Monad m) => (a -> m b) -> t m a -> t m b
376mapM :: (Streaming t, Monad m) => (a -> m b) -> t m a -> t m b
376mapM f m = fromStream $ go (toStream m)
377mapM f m = fromStream $ go (toStream m)