This is the mail archive of the
sid@sources.redhat.com
mailing list for the SID project.
Testsuite improvement patch
- From: Ben Elliston <bje at redhat dot com>
- To: sid at sources dot redhat dot com
- Date: Tue, 11 Dec 2001 07:40:29 +1100 (EST)
- Subject: Testsuite improvement patch
The following patch makes SID's component/cgen-cpu testsuites behave
like testsuites such as GCC's: if the test case passes, any object
code generated by the assembler or linker is subsequently removed.
This leaves the testsuite directory in a tidier state at the end of a
test run.
It is not necessary to wrap a Tcl catch{} command around "file delete"
commands -- according to the manual page: ``Trying to delete a
non-existent file is not considered an error.''
Okay to commit?
2001-12-11 Ben Elliston <bje@redhat.com>
* lib/cpudefs.exp (run-one-sid-test): Delete object code if the
test case passes.
***************
*** 390,395 ****
--- 390,396 ----
if { "$opts(xerror)" == "no" } {
if [string match $opts(output) $output] {
pass "$test \#$iter"
+ file delete ${name}.o ${exe-name}
} else {
verbose -log "output: $output" 3
verbose -log "pattern: $opts(output)" 3
***************
*** 408,413 ****
--- 409,415 ----
} else {
if [string match $opts(output) $output] {
pass "$test \#$iter"
+ file delete ${name}.o ${exe-name}
} else {
verbose -log "output: $output" 3
verbose -log "pattern: $opts(output)" 3