[project @ 2003-05-22 13:22:39 by simonmar]

Comment only

diff --git a/ghc/compiler/basicTypes/DataCon.lhs b/ghc/compiler/basicTypes/DataCon.lhs
index 3818580..93aef42 100644 (file)
--- a/ghc/compiler/basicTypes/DataCon.lhs
+++ b/ghc/compiler/basicTypes/DataCon.lhs
@@ -169,7 +169,9 @@ odd that the wrapper doesn't include the stupid context.]
 data DataCon
   = MkData {                   -- Used for data constructors only;
                                -- there *is* no constructor for a newtype
-       dcName    :: Name,      
+
+       dcName    :: Name,      -- This is the name of the *source data con*
+                               -- (see "Note [Data Constructor Naming]" above)
 
        dcUnique :: Unique,             -- Cached from Name
        dcTag    :: ConTag,