* Fix extra brackets in my previous commit.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@162584 138bc75d-0d04-0410-961f-82ee72b054a4

1 files changed, 3 insertions, 3 deletions

diff --git a/gcc/testsuite/lib/gcc-dg.exp b/gcc/testsuite/lib/gcc-dg.exp
index c9b31d10c7b..ebf3167ae85 100644
--- a/gcc/testsuite/lib/gcc-dg.exp
+++ b/gcc/testsuite/lib/gcc-dg.exp
@@ -408,7 +408,7 @@ proc cleanup-coverage-files { } {
     # 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]]
+    set testcase [lindex $testcase 0]
     remove-build-file "[file rootname [file tail $testcase]].gc??"
 
     # Clean up coverage files for additional source files.
@@ -426,7 +426,7 @@ proc cleanup-repo-files { } {
     # 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]]
+    set testcase [lindex $testcase 0]
     remove-build-file "[file rootname [file tail $testcase]].o"
     remove-build-file "[file rootname [file tail $testcase]].rpo"
 
@@ -503,7 +503,7 @@ proc cleanup-saved-temps { args } {
     # 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]]
+    set testcase [lindex $testcase 0]
     foreach suffix $suffixes {
 	remove-build-file "[file rootname [file tail $testcase]]$suffix"
 	# -fcompare-debug dumps