Posted to tcl by de at Wed Jun 24 12:27:28 GMT 2009view pretty
==== info-38.6 location information for uplevel, ppl, proc-proc-literal FAILED ==== Contents of test case: join [lrange [datal] 0 4] \n ---- Result was: 14 {type proc line 5 cmd {info frame $level} proc ::etrace level 0} 13 {type eval line 3 cmd etrace proc ::control} 12 {type proc line 3 cmd {uplevel 1 $script} proc ::control} 11 {type proc line 2 cmd control proc ::datal level 1} 10 {type eval line 2 cmd datal proc ::tcltest::RunTest} ---- Result should have been (glob matching): * {type source line 728 file info.test cmd {info frame $level} proc ::etrace level 0} * {type source line 1344 file info.test cmd etrace proc ::control} * {type source line 1338 file info.test cmd {uplevel 1 $script} proc ::control} * {type source line 1342 file info.test cmd control proc ::datal level 1} * {type source line 1405 file info.test cmd datal proc ::tcltest::RunTest} ==== info-38.6 FAILED