diff options
| author | uros <uros@138bc75d-0d04-0410-961f-82ee72b054a4> | 2010-07-27 17:55:00 +0000 |
|---|---|---|
| committer | uros <uros@138bc75d-0d04-0410-961f-82ee72b054a4> | 2010-07-27 17:55:00 +0000 |
| commit | 29553ccbef18594d5293ceee3b544e8ca34df63a (patch) | |
| tree | 5c4c2df5fcb396be4d352155a227d3ea40b2bf55 /gcc | |
| parent | 505a64919ae4c03af5968f3318daffe1fedb1333 (diff) | |
| download | gcc-29553ccbef18594d5293ceee3b544e8ca34df63a.tar.gz | |
* lib/gcc-dg.exp (cleanup-coverage-files): Remove options from
test name.
(cleanup-repo-files): Ditto.
(cleanup-saved-temps): Ditto.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@162583 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc')
| -rw-r--r-- | gcc/testsuite/ChangeLog | 7 | ||||
| -rw-r--r-- | gcc/testsuite/lib/gcc-dg.exp | 6 |
2 files changed, 13 insertions, 0 deletions
diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index 7bfba79f0f4..858c0ad1200 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,3 +1,10 @@ +2010-07-27 Uros Bizjak <ubizjak@gmail.com> + + * lib/gcc-dg.exp (cleanup-coverage-files): Remove options from + test name. + (cleanup-repo-files): Ditto. + (cleanup-saved-temps): Ditto. + 2010-07-27 Jakub Jelinek <jakub@redhat.com> PR testsuite/44701 diff --git a/gcc/testsuite/lib/gcc-dg.exp b/gcc/testsuite/lib/gcc-dg.exp index 512144a6aa6..c9b31d10c7b 100644 --- a/gcc/testsuite/lib/gcc-dg.exp +++ b/gcc/testsuite/lib/gcc-dg.exp @@ -407,6 +407,8 @@ proc cleanup-coverage-files { } { # that stores the filename of the testcase in a local variable "name". # A cleaner solution would require a new DejaGnu release. upvar 2 name testcase + # The name might include a list of options; extract the file name. + set testcase [lindex $testcase 0]] remove-build-file "[file rootname [file tail $testcase]].gc??" # Clean up coverage files for additional source files. @@ -423,6 +425,8 @@ proc cleanup-repo-files { } { # that stores the filename of the testcase in a local variable "name". # A cleaner solution would require a new DejaGnu release. upvar 2 name testcase + # The name might include a list of options; extract the file name. + set testcase [lindex $testcase 0]] remove-build-file "[file rootname [file tail $testcase]].o" remove-build-file "[file rootname [file tail $testcase]].rpo" @@ -498,6 +502,8 @@ proc cleanup-saved-temps { args } { # that stores the filename of the testcase in a local variable "name". # A cleaner solution would require a new DejaGnu release. upvar 2 name testcase + # The name might include a list of options; extract the file name. + set testcase [lindex $testcase 0]] foreach suffix $suffixes { remove-build-file "[file rootname [file tail $testcase]]$suffix" # -fcompare-debug dumps |