Index: library/lib/test.tcl =================================================================== diff -u -r649c33f8bca87b389877c3e3c1b7eb8e1182c843 -r4a27d9aef2dbddc2257c9716a774c4f1662afffb --- library/lib/test.tcl (.../test.tcl) (revision 649c33f8bca87b389877c3e3c1b7eb8e1182c843) +++ library/lib/test.tcl (.../test.tcl) (revision 4a27d9aef2dbddc2257c9716a774c4f1662afffb) @@ -125,7 +125,7 @@ } } else { puts stderr "[set :name]:\tincorrect result for '${:msg}'" - puts stderr "\texpected: '${:expected}', got '$r' [info exists :errorReport]" + puts stderr "\texpected: '${:expected}', got '$r'" puts stderr "\tin test file [info script]" if {[info exists :errorReport]} {eval [set :errorReport]} exit -1