X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=utils%2Fhpc%2FHpcFlags.hs;h=b4453670236562bfb4ee34474fd5967985b4a748;hb=1d47f08d196252b4ee5f4d5b5af2fb4945720762;hp=761163f2dc129e8ddeaa3cf76e82a4c42c08f203;hpb=1267b64b521ac2099fc163e482118a72b93afa0b;p=ghc-hetmet.git

diff --git a/utils/hpc/HpcFlags.hs b/utils/hpc/HpcFlags.hs
index 761163f..b445367 100644
--- a/utils/hpc/HpcFlags.hs
+++ b/utils/hpc/HpcFlags.hs
@@ -217,7 +217,7 @@ thePostFun INV  n = 0
 thePostFun ZERO x = 0
 
 postFuns = [ (show pos,pos) 
-	     | pos <- [INV .. ZERO]
+	     | pos <- [ID .. ZERO]
 	   ]