From a86e7bcdfac783e3e3e6b2a9b66d23788810fb70 Mon Sep 17 00:00:00 2001 From: simonm Date: Thu, 28 Jan 1999 12:14:16 +0000 Subject: [PATCH] [project @ 1999-01-28 12:14:16 by simonm] Remove unprintable characters from module header. --- ghc/lib/std/Monad.lhs | 14 +++++++------- 1 file changed, 7 insertions(+), 7 deletions(-) diff --git a/ghc/lib/std/Monad.lhs b/ghc/lib/std/Monad.lhs index d47921b..fcb59a0 100644 --- a/ghc/lib/std/Monad.lhs +++ b/ghc/lib/std/Monad.lhs @@ -11,17 +11,17 @@ module Monad mzero -- :: (MonadPlus m) => m a , mplus -- :: (MonadPlus m) => m a -> m a -> m a ) - , join -- :: (Monad m) => m (m a) -> m a + , join -- :: (Monad m) => m (m a) -> m a , guard -- :: (Monad m) => Bool -> m () - , when -- :: (Monad m) => Bool -> m () -> m () - , unless -- :: (Monad m) => Bool -> m () -> m () - , ap -- :: (Monad m) => (m (a -> b)) -> (m a) -> m b + , when -- :: (Monad m) => Bool -> m () -> m () + , unless -- :: (Monad m) => Bool -> m () -> m () + , ap -- :: (Monad m) => (m (a -> b)) -> (m a) -> m b , msum -- :: (MonadPlus m) => [m a] -> m a , filterM -- :: (Monad m) => (a -> m Bool) -> [m a] -> m [a] - , mapAndUnzipM -- :: (Monad m) => (a -> m (b,c)) -> [a] -> m ([b], [c]) - , zipWithM -- :: (Monad m) => (a -> b -> m c) -> [a] -> [b] -> m [c] + , mapAndUnzipM -- :: (Monad m) => (a -> m (b,c)) -> [a] -> m ([b], [c]) + , zipWithM -- :: (Monad m) => (a -> b -> m c) -> [a] -> [b] -> m [c] , zipWithM_ -- :: (Monad m) => (a -> b -> m c) -> [a] -> [b] -> m () - , foldM -- :: (Monad m) => (a -> b -> m a) -> a -> [b] -> m a + , foldM -- :: (Monad m) => (a -> b -> m a) -> a -> [b] -> m a , liftM -- :: (Monad m) => (a -> b) -> (m a -> m b) , liftM2 -- :: (Monad m) => (a -> b -> c) -> (m a -> m b -> m c) -- 1.7.10.4