Changeset 14752

Timestamp:

Apr 29, 2011, 8:20:43 AM (14 years ago)

Author:

gz

Message:

List uninstrumented color in the key

File:

• trunk/source/library/cover.lisp (modified) (2 diffs)

trunk/source/library/cover.lisp

@@ -758 +758 @@
     (format html-stream "<div class='st~a'>Partly covered - entered but some subforms not executed</div>" $partially-covered-style)
     (format html-stream "<div class='st~a'>Never entered - not a single instruction executed</div>" $not-executed-style)
+    (format html-stream "<div class='stsource'>Uninstrumented - a form whose coverage was not measured</div>")
     (format html-stream "</div><p></p>~%")
 
@@ -996 +997 @@
 *.st~a { background-color: #aaffaa }
 *.st~a { background-color: #44dd44 }
+*.stsource { background-color: #eeeeee; }
 *.key { margin: 20px; width: 88ex }
 *.source { width: 120ex; background-color: #eeeeee; padding-left: 5px;