From be837bb5a17050a4adae79799fc5770663d6ed8e Mon Sep 17 00:00:00 2001
From: Ian Lynagh <igloo@earth.li>
Date: Tue, 7 Aug 2007 18:55:57 +0000
Subject: [PATCH] Clarify the swapMVar haddock doc

---
 Control/Concurrent/MVar.hs |    2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/Control/Concurrent/MVar.hs b/Control/Concurrent/MVar.hs
index 7213cf1..fc3a30a 100644
--- a/Control/Concurrent/MVar.hs
+++ b/Control/Concurrent/MVar.hs
@@ -59,7 +59,7 @@ readMVar m =
     putMVar m a
     return a
 
--- |Swap the contents of an 'MVar' for a new value.
+-- |Atomically, put a new value into an 'MVar' and return the old value.
 swapMVar :: MVar a -> a -> IO a
 swapMVar mvar new =
   block $ do
-- 
1.7.10.4