[commit: ghc] master: hpc: Output a legend at the top of output files (8a2c247)

Thu May 4 22:23:04 UTC 2017

Repository : ssh://git@git.haskell.org/ghc

On branch  : master
Link       : http://ghc.haskell.org/trac/ghc/changeset/8a2c2476b300969514888cb2084d083f8d18b6b0/ghc

>---------------------------------------------------------------

commit 8a2c2476b300969514888cb2084d083f8d18b6b0
Author: Santiago Munin <santimunin at gmail.com>
Date:   Thu May 4 15:10:54 2017 -0400

    hpc: Output a legend at the top of output files
    
    Updates hpc submodule.
    
    Reviewers: austin, bgamari
    
    Subscribers: rwbarton, thomie
    
    GHC Trac Issues: #11799
    
    Differential Revision: https://phabricator.haskell.org/D3465


>---------------------------------------------------------------

8a2c2476b300969514888cb2084d083f8d18b6b0
 libraries/hpc          | 2 +-
 utils/hpc/HpcMarkup.hs | 7 +++++++
 2 files changed, 8 insertions(+), 1 deletion(-)

diff --git a/libraries/hpc b/libraries/hpc
index b28546c..1544cf0 160000
--- a/libraries/hpc
+++ b/libraries/hpc
@@ -1 +1 @@
-Subproject commit b28546ca003c6dbff586609a093e8c8091c34b14
+Subproject commit 1544cf04c38ab3b613dba1e0737de49c33321655
diff --git a/utils/hpc/HpcMarkup.hs b/utils/hpc/HpcMarkup.hs
index fb68eac..ca30471 100644
--- a/utils/hpc/HpcMarkup.hs
+++ b/utils/hpc/HpcMarkup.hs
@@ -250,6 +250,13 @@ genHtmlFromMod dest_dir flags tix theFunTotals invertOutput = do
                      "</style>",
                      "</head>",
                      "<body>",
+                     "<pre>",
+                     concat [
+                         "<span class=\"decl\">",
+                         "<span class=\"nottickedoff\">never executed</span> ",
+                         "<span class=\"tickonlytrue\">always true</span> ",
+                         "<span class=\"tickonlyfalse\">always false</span></span>"],
+                     "</pre>",
                      "<pre>"] ++ addLines content' ++ "\n</pre>\n</body>\n</html>\n";
 
 

