From e12f9c6276e01826a6cb501a434eb95e3f42f7d4 Mon Sep 17 00:00:00 2001
From: simonmar <unknown>
Date: Thu, 22 May 2003 13:22:39 +0000
Subject: [PATCH] [project @ 2003-05-22 13:22:39 by simonmar] Comment only

---
 ghc/compiler/basicTypes/DataCon.lhs |    4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

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