From c013221edab028b68915d8a41fa90a3849764f8e Mon Sep 17 00:00:00 2001 From: Uros Bizjak Date: Tue, 27 Jul 2010 19:55:00 +0200 Subject: [PATCH] gcc-dg.exp (cleanup-coverage-files): Remove options from test name. * lib/gcc-dg.exp (cleanup-coverage-files): Remove options from test name. (cleanup-repo-files): Ditto. (cleanup-saved-temps): Ditto. From-SVN: r162583 --- gcc/testsuite/ChangeLog | 7 +++++++ gcc/testsuite/lib/gcc-dg.exp | 6 ++++++ 2 files changed, 13 insertions(+) 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 + + * 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 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 -- 2.30.2