[commit: ghc] master: Comments only (1064ab0)

[Simon Peyton Jones]

Repository : ssh://darcs.haskell.org//srv/darcs/ghc

On branch  : master

http://hackage.haskell.org/trac/ghc/changeset/1064ab02cfe42339bf503366630676c35156b664

>---------------------------------------------------------------

commit 1064ab02cfe42339bf503366630676c35156b664
Author: Simon Peyton Jones <simonpj at microsoft.com>
Date:   Mon Aug 15 08:26:14 2011 +0100

    Comments only

>---------------------------------------------------------------

 compiler/coreSyn/TrieMap.lhs |    3 +++
 1 files changed, 3 insertions(+), 0 deletions(-)

diff --git a/compiler/coreSyn/TrieMap.lhs b/compiler/coreSyn/TrieMap.lhs
index 55aba2b..735f7dd 100644
--- a/compiler/coreSyn/TrieMap.lhs
+++ b/compiler/coreSyn/TrieMap.lhs
@@ -125,6 +125,9 @@ instance TrieMap UniqFM where
 %*									*
 %************************************************************************
 
+If              m is a map from k -> val
+then (MaybeMap m) is a map from (Maybe k) -> val
+
 \begin{code}
 data MaybeMap m a = MM { mm_nothing  :: Maybe a, mm_just :: m a }