From: simonpj@microsoft.com <unknown>
Date: Mon, 11 Sep 2006 08:34:40 +0000 (+0000)
Subject: Add comment
X-Git-Tag: Before_FC_branch_merge~32
X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=commitdiff_plain;h=38f4f2e06695db9e396e3ebaf97b870c4975c803

Add comment
---

diff --git a/compiler/basicTypes/Var.lhs b/compiler/basicTypes/Var.lhs
index 60fdf38..4ba7d89 100644
--- a/compiler/basicTypes/Var.lhs
+++ b/compiler/basicTypes/Var.lhs
@@ -74,7 +74,7 @@ data Var
 	tcTyVarDetails :: TcTyVarDetails }
 
   | GlobalId { 			-- Used for imported Ids, dict selectors etc
-	varName    :: !Name,
+	varName    :: !Name,	-- Always an External or WiredIn Name
 	realUnique :: FastInt,
    	idType     :: Type,
 	idInfo     :: IdInfo,