From: simonmar <unknown>
Date: Thu, 22 May 2003 13:22:39 +0000 (+0000)
Subject: [project @ 2003-05-22 13:22:39 by simonmar]
X-Git-Tag: Approx_11550_changesets_converted~873
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=e12f9c6276e01826a6cb501a434eb95e3f42f7d4;p=ghc-hetmet.git

[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
--- 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,