diff options
author | andy@galois.com <unknown> | 2006-10-24 21:29:07 +0000 |
---|---|---|
committer | andy@galois.com <unknown> | 2006-10-24 21:29:07 +0000 |
commit | d5934bbb856aa0aa620c9b2e0fa51c90a1a5a048 (patch) | |
tree | 065c061d4ff87a6ca8bff6a3a4b0fe205728e066 /driver | |
parent | 33b8b60e0aa925962cd11a8be98d9818666d58a0 (diff) | |
download | haskell-d5934bbb856aa0aa620c9b2e0fa51c90a1a5a048.tar.gz |
Haskell Program Coverage
This large checkin is the new ghc version of Haskell
Program Coverage, an expression-level coverage tool for Haskell.
Parts:
- Hpc.[ch] - small runtime support for Hpc; reading/writing *.tix files.
- Coverage.lhs - Annotates the HsSyn with coverage tickboxes.
- New Note's in Core,
- TickBox -- ticked on entry to sub-expression
- BinaryTickBox -- ticked on exit to sub-expression, depending
-- on the boolean result.
- New Stg level TickBox (no BinaryTickBoxes, though)
You can run the coverage tool with -fhpc at compile time.
Main must be compiled with -fhpc.
Diffstat (limited to 'driver')
-rw-r--r-- | driver/mangler/ghc-asm.lprl | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/driver/mangler/ghc-asm.lprl b/driver/mangler/ghc-asm.lprl index 902593ea7f..21b56f8039 100644 --- a/driver/mangler/ghc-asm.lprl +++ b/driver/mangler/ghc-asm.lprl @@ -699,6 +699,12 @@ sub mangle_asm { $chkcat[$i] = 'data'; $chksymb[$i] = ''; + } elsif ( /^${T_US}([A-Za-z0-9_]+)_hpc?${T_POST_LBL}$/o ) { + # hpc shares tick boxes across modules + $chk[++$i] = $_; + $chkcat[$i] = 'data'; + $chksymb[$i] = ''; + } elsif ( /^${T_US}([A-Za-z0-9_]+)_(alt|dflt)${T_POST_LBL}$/o ) { $chk[++$i] = $_; $chkcat[$i] = 'misc'; |