X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=compiler%2Fparser%2FParserCore.y;h=f2d48da7b61aca937ccff9e599801f4cd603b405;hp=a9669b23ec4619608b42aa0d47267c6a93584aa0;hb=795c86daa4afb53f7ec99f5082e2e7fcc690830c;hpb=186a80cbcfbe0490ddd153e5f75faac23f4e5021

diff --git a/compiler/parser/ParserCore.y b/compiler/parser/ParserCore.y
index a9669b2..f2d48da 100644
--- a/compiler/parser/ParserCore.y
+++ b/compiler/parser/ParserCore.y
@@ -107,7 +107,7 @@ con	:: { LConDecl RdrName }
 	: d_pat_occ attv_bndrs hs_atys 
 		{ noLoc $ ConDecl (noLoc (mkRdrUnqual $1)) Explicit $2 (noLoc []) (PrefixCon $3) ResTyH98}
         | d_pat_occ '::' ty
-                -- XXX - autrijus - $3 needs to be split into argument and return types!
+                -- XXX - audreyt - $3 needs to be split into argument and return types!
                 -- also not sure whether the [] below (quantified vars) appears.
                 -- also the "PrefixCon []" is wrong.
                 -- also we want to munge $3 somehow.