diff options
Diffstat (limited to 'lib/framework.exp')
| -rw-r--r-- | lib/framework.exp | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/lib/framework.exp b/lib/framework.exp index 04a4ceb..b82b7e3 100644 --- a/lib/framework.exp +++ b/lib/framework.exp @@ -76,8 +76,8 @@ proc open_logs { } { catch "exec rm -f $outdir/$tool.sum" set sum_file [open "$outdir/$tool.sum" w] if { $xml } { - catch "exec rm -f $outdir/$tool.xml" - set xml_file [open "$outdir/$tool.xml" w] + catch "exec rm -f $outdir/$tool.xml" + set xml_file [open "$outdir/$tool.xml" w] xml_output "<?xml version=\"1.0\"?>" insertdtd xml_output "<testsuite>" @@ -379,7 +379,7 @@ proc log_and_exit {} { proc xml_output { message } { global xml_file if { $xml_file != "" } { - puts $xml_file "$message" + puts $xml_file "$message" } } @@ -726,7 +726,7 @@ proc record_test { type message args } { global expect_out set rio { "" "" } if { [catch { set rio [split $expect_out(buffer) "\n"] } result]} { - #do nothing - leave as { "" "" } + #do nothing - leave as { "" "" } } set output "" @@ -740,7 +740,7 @@ proc record_test { type message args } { xml_output " </test>" } - switch $type { + switch $type { PASS { if $prms_id { set message [concat $message "\t(PRMS $prms_id)"] |