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/HpcShowTix.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/HpcShowTix.hs')
| -rw-r--r-- | utils/hpc/HpcShowTix.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/utils/hpc/HpcShowTix.hs b/utils/hpc/HpcShowTix.hs index b81f88cbff..0d17668416 100644 --- a/utils/hpc/HpcShowTix.hs +++ b/utils/hpc/HpcShowTix.hs @@ -38,7 +38,7 @@ showtix_main flags (prog:modNames) = do Nothing -> hpcError showtix_plugin $ "could not read .tix file : " ++ prog Just (Tix tixs) -> do tixs_mixs <- sequence - [ do mix <- readMixWithFlags hpcflags1 tix + [ do mix <- readMixWithFlags hpcflags1 (Right tix) return $ (tix,mix) | tix <- tixs , allowModule hpcflags1 (tixModuleName tix) |