Index: library/lib/test.tcl =================================================================== diff -u -r8eebe1d6826f1218b6eeb04fd80bce7da9d57523 -rd97d44f12168b44adb58f0d66842eb86bfa9d955 --- library/lib/test.tcl (.../test.tcl) (revision 8eebe1d6826f1218b6eeb04fd80bce7da9d57523) +++ library/lib/test.tcl (.../test.tcl) (revision d97d44f12168b44adb58f0d66842eb86bfa9d955) @@ -122,7 +122,6 @@ # statistics would indicate unbalanced refCounts, etc.). return -level [expr {[info level]-1}] -code error - } if {[info exists :post]} {:call "post" ${:post}} }