From 36908417be25c8de3bff3a7726984bc8f363a127 Mon Sep 17 00:00:00 2001
From: simonpj <unknown>
Date: Mon, 27 Mar 2000 08:58:37 +0000
Subject: [PATCH] [project @ 2000-03-27 08:58:37 by simonpj] Fix sig for guard
 in module header

---
 ghc/lib/std/Monad.lhs |    2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/ghc/lib/std/Monad.lhs b/ghc/lib/std/Monad.lhs
index 4c8c3ed..6cfff09 100644
--- a/ghc/lib/std/Monad.lhs
+++ b/ghc/lib/std/Monad.lhs
@@ -12,7 +12,7 @@ module Monad
 	, mplus     -- :: (MonadPlus m) => m a -> m a -> m a
 	)
     , join          -- :: (Monad m) => m (m a) -> m a
-    , guard	    -- :: (Monad m) => Bool -> m ()
+    , guard	    -- :: (MonadPlus 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
-- 
1.7.10.4