X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=compiler%2Ftypes%2FTyCon.lhs;h=3ae5c3ef46954559098cab76b1fb04d9157ae8d6;hp=fc27995d95c3d63d8044c9218fe8f7f9a0936e6a;hb=5e41a5afcc39480f4e60055843a5e4106b6f8875;hpb=1ee8a6f6cf3c06e3651438720333612a70348091

diff --git a/compiler/types/TyCon.lhs b/compiler/types/TyCon.lhs
index fc27995..3ae5c3e 100644
--- a/compiler/types/TyCon.lhs
+++ b/compiler/types/TyCon.lhs
@@ -173,7 +173,8 @@ data TyCon
 	tyConUnique   :: Unique,
 	tyConName     :: Name,
 	tyConKind     :: Kind,
-	tyConArity    :: Arity,
+	tyConArity    :: Arity,		-- SLPJ Oct06: I'm not sure what the significance
+					--	       of the arity of a primtycon is!
 
 	primTyConRep  :: PrimRep,
 			-- Many primitive tycons are unboxed, but some are