Index: library/lib/test.xotcl =================================================================== diff -u -r2111020b49da8ce57758e51accf0b6073037f0d2 -r9f1d59741223795c836a0e8230a891781ecfc09e --- library/lib/test.xotcl (.../test.xotcl) (revision 2111020b49da8ce57758e51accf0b6073037f0d2) +++ library/lib/test.xotcl (.../test.xotcl) (revision 9f1d59741223795c836a0e8230a891781ecfc09e) @@ -85,7 +85,7 @@ #regexp {^(-?[0-9]+) +} $r0 _ mS0 regexp {^(-?[0-9]+) +} $r1 _ mS1 set ms [expr {$mS1*1.0/$c}] - puts stderr "[my name]:\t[format %6.1f $ms] mms, $msg" + puts stderr "[my name]:\t[format %6.2f $ms] mms, $msg" } else { puts stderr "[my name]: $msg ok" }