diff options
| author | andy@galois.com <unknown> | 2007-07-20 23:57:03 +0000 |
|---|---|---|
| committer | andy@galois.com <unknown> | 2007-07-20 23:57:03 +0000 |
| commit | 4799dfb37be922c17451f8e0f7c8d765a7a7eaab (patch) | |
| tree | a548c93155d94e67c4d3b07302f085412b36863e /utils/hpc/HpcCombine.hs | |
| parent | 30091f98d69664e7f748639749938dc3a0d5821e (diff) | |
| download | haskell-4799dfb37be922c17451f8e0f7c8d765a7a7eaab.tar.gz | |
hpc-tools: improving flag processing and help messages, small bug fixes.
Diffstat (limited to 'utils/hpc/HpcCombine.hs')
| -rw-r--r-- | utils/hpc/HpcCombine.hs | 10 |
1 files changed, 8 insertions, 2 deletions
diff --git a/utils/hpc/HpcCombine.hs b/utils/hpc/HpcCombine.hs index 9788c41259..ea23ab982d 100644 --- a/utils/hpc/HpcCombine.hs +++ b/utils/hpc/HpcCombine.hs @@ -13,10 +13,16 @@ import HpcFlags import Control.Monad import qualified HpcSet as Set import qualified HpcMap as Map +import System.Environment ------------------------------------------------------------------------------ -combine_options = - [ excludeOpt,includeOpt,outputOpt,combineFunOpt, combineFunOptInfo, postInvertOpt ] +combine_options + = excludeOpt + . includeOpt + . outputOpt + . combineFunOpt + . combineFunOptInfo + . postInvertOpt combine_plugin = Plugin { name = "combine" , usage = "[OPTION] .. <TIX_FILE> [<TIX_FILE> [<TIX_FILE> ..]]" |