X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=Data%2FFiniteMap.hs;h=2f1bde7a99bcb13a1f1ad6d2a124b6e7dbbb62bb;hb=7fed02d08be1f19b470e2a79e587064789f0b564;hp=1a08cae9e86942c8d294d2ee4ceda0517c9a4abf;hpb=d4d4ccf5a5563ae4886a472a5a2fce530c28ed1a;p=ghc-base.git

diff --git a/Data/FiniteMap.hs b/Data/FiniteMap.hs
index 1a08cae..2f1bde7 100644
--- a/Data/FiniteMap.hs
+++ b/Data/FiniteMap.hs
@@ -142,7 +142,8 @@ addListToFM	:: (Ord key OUTPUTABLE_key) => FiniteMap key elt -> [(key,elt)] -> F
 
 -- | Adds an element to a 'FiniteMap'.  If there is already an element
 -- with the same key, then the specified combination function is used
--- to calculate the new value.
+-- to calculate the new value. The already present element is passed as
+-- the first argument and the new element to add as second.
 addToFM_C	:: (Ord key OUTPUTABLE_key) => (elt -> elt -> elt)
 			   -> FiniteMap key elt -> key -> elt
 			   -> FiniteMap key elt