Changeset 2167
- Timestamp:
- Mar 30, 2011 11:07:37 AM (13 years ago)
- Location:
- trunk/tester/scripts
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/tester/scripts/main.tcl
r2165 r2167 297 297 foreach file [glob -nocomplain -directory $params(-testdir) *.xml] { 298 298 set testobj [Rappture::Tester::Test ::#auto $ToolObj $file] 299 $testtree add $testobj 299 if {[$testobj getTestInfo test.label] eq ""} { 300 puts stderr "ERROR: Missing test label in $file" 301 puts stderr " skipping that test..." 302 } elseif {[catch {$testtree add $testobj} err]} { 303 puts stderr "ERROR: Can't load test $file" 304 puts stderr " $err" 305 puts stderr " skipping that test..." 306 } 300 307 } 301 308 $testtree component treeview open -recurse root -
trunk/tester/scripts/test.tcl
r2163 r2167 249 249 itcl::delete object $_testobj 250 250 set _testobj $_runobj 251 set _runobj "" 251 252 252 253 set _diffs ""
Note: See TracChangeset
for help on using the changeset viewer.