Fix type of Stream.mapM_
authorRoman Leshchinskiy <rl@cse.unsw.edu.au>
Sun, 18 Apr 2010 15:09:23 +0000 (15:09 +0000)
committerRoman Leshchinskiy <rl@cse.unsw.edu.au>
Sun, 18 Apr 2010 15:09:23 +0000 (15:09 +0000)
Data/Vector/Fusion/Stream.hs

index e316d3a..af3d667 100644 (file)
@@ -510,7 +510,7 @@ instance Ord a => Ord (M.Stream Id a) where
 -- -------------------
 
 -- | Apply a monadic action to each element of the stream
 -- -------------------
 
 -- | Apply a monadic action to each element of the stream
-mapM_ :: Monad m => (a -> m ()) -> Stream a -> m ()
+mapM_ :: Monad m => (a -> m b) -> Stream a -> m ()
 {-# INLINE mapM_ #-}
 mapM_ f = M.mapM_ f . liftStream
 
 {-# INLINE mapM_ #-}
 mapM_ f = M.mapM_ f . liftStream