X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=utils%2Fhpc%2FHpcParser.y;h=cf1d156c6efbd3634d3d70490b39436c6cd41a01;hp=3f7443771bb157ad8506791c01a8118c9ccd54ff;hb=831a35dd00faff195cf938659c2dd736192b865f;hpb=92d9c522010a96acc86f2543163e3c36f1def3fc

diff --git a/utils/hpc/HpcParser.y b/utils/hpc/HpcParser.y
index 3f74437..cf1d156 100644
--- a/utils/hpc/HpcParser.y
+++ b/utils/hpc/HpcParser.y
@@ -1,4 +1,11 @@
 { 
+{-# OPTIONS -Wwarn #-}
+-- The above warning supression flag is a temporary kludge.
+-- While working on this module you are encouraged to remove it and fix
+-- any warnings in the module. See
+--     http://hackage.haskell.org/trac/ghc/wiki/Commentary/CodingStyle#Warnings
+-- for details
+
 module HpcParser where
 
 import HpcLexer
@@ -24,7 +31,7 @@ import HpcLexer
 	'}'		{ SYM '}' }
 	int		{ INT $$ }
 	string		{ STR $$ }
-	cat		{ STR $$ }
+	cat		{ CAT $$ }
 %%
 
 Spec    :: { Spec }