diff options
| author | andy@galois.com <unknown> | 2007-09-08 05:16:00 +0000 |
|---|---|---|
| committer | andy@galois.com <unknown> | 2007-09-08 05:16:00 +0000 |
| commit | c8742f253f0c0b38f977530eceaaecac55578b4b (patch) | |
| tree | 2e724db5ca6d1b359512e00bfb415848661b9f15 /utils/hpc/HpcFlags.hs | |
| parent | 5f4e77a5a2ea03286b795da4051272ac7c774bd7 (diff) | |
| download | haskell-c8742f253f0c0b38f977530eceaaecac55578b4b.tar.gz | |
updating hpc toolkit
The hpc overlay has been ported from hpc-0.4
The new API for readMix is now used.
Diffstat (limited to 'utils/hpc/HpcFlags.hs')
| -rw-r--r-- | utils/hpc/HpcFlags.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/utils/hpc/HpcFlags.hs b/utils/hpc/HpcFlags.hs index 3147af8a48..30d46799f1 100644 --- a/utils/hpc/HpcFlags.hs +++ b/utils/hpc/HpcFlags.hs @@ -110,7 +110,7 @@ postInvertOpt = noArg "post-invert" "invert output; ticked becomes unticked, unt $ \ f -> f { funTotals = True } ------------------------------------------------------------------------------- -readMixWithFlags :: Flags -> TixModule -> IO Mix +readMixWithFlags :: Flags -> Either String TixModule -> IO Mix readMixWithFlags flags mod = readMix [ dir ++ "/" ++ hpcDir flags | dir <- srcDirs flags ] mod |