commit - 1041414ec4daa58723fd3837ef14d2be49d29d52
commit + 8e4033faa2a65945f3eef825447e1685d6b31def
blob - afeac218f30258a55bee4d871dfe9f926267cbe1
blob + aa59087be78be413b07f5af0ba3b78b914b8266a
--- exercise
+++ exercise
# color
if {[isatty stdout]} {
- set notok [notok $counters]
+ set good [expr {$ok>0 && ![notok $counters]}]
- if {!$notok} {set o [color {1;32} $o]} ;# bright green
+ if {$run==0} {set r [color {31} $r]} ;# dark red
+ if {$good} {set o [color {1;32} $o]} ;# bright green
if {$fail>0} {set f [color {1;31} $f]} ;# bright red
if {$error>0} {set e [color {31} $e]} ;# dark red
}