X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=utils%2Fhpc%2FHpcReport.hs;h=d3e3ef07232aba40553fb36ac67688c5f0a0176f;hb=b00e3a6c0a82a8af3238d677f798d812cd7fd49f;hp=5d8c7146925f57866b275b77eb3479e192edf02d;hpb=04d3b8d7ad637c6e5b8b8004a0555c4f1ead83dc;p=ghc-hetmet.git diff --git a/utils/hpc/HpcReport.hs b/utils/hpc/HpcReport.hs index 5d8c714..d3e3ef0 100644 --- a/utils/hpc/HpcReport.hs +++ b/utils/hpc/HpcReport.hs @@ -11,7 +11,7 @@ import HpcFlags import Trace.Hpc.Mix import Trace.Hpc.Tix import Control.Monad hiding (guard) -import qualified HpcSet as Set +import qualified Data.Set as Set notExpecting :: String -> a notExpecting s = error ("not expecting "++s)