X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fcompiler%2Ftypes%2FTyCon.lhs;fp=ghc%2Fcompiler%2Ftypes%2FTyCon.lhs;h=0914b46ed0267c8f286a5b3e3649bfb82c91a25f;hb=89f70afedb1ac0900ed132e3b161316345a9b7ee;hp=3bec98d0ac3f7f1b4c9a78d7b70b625506268c1b;hpb=4557072163532e8b90e9aeffb9057e6d01aeb500;p=ghc-hetmet.git

diff --git a/ghc/compiler/types/TyCon.lhs b/ghc/compiler/types/TyCon.lhs
index 3bec98d..0914b46 100644
--- a/ghc/compiler/types/TyCon.lhs
+++ b/ghc/compiler/types/TyCon.lhs
@@ -102,7 +102,7 @@ data TyCon
 	algTcFields :: [(FieldLabel, Type, Id)],  
 					-- Its fields (empty if none): 
 					--  * field name
-					--  * its type (scoped over tby tyConTyVars)
+					--  * its type (scoped over by tyConTyVars)
 					--  * record selector (name = field name)
 
 	algTcStupidTheta :: [PredType],	-- The "stupid theta" for the data type