gcc.exp (gcc_init): Use a filename for the testglue that is unique to the tool.

* lib/gcc.exp (gcc_init): Use a filename for the testglue that is
unique to the tool.
* lib/g77.exp (g77_init): Likewise.
* lib/g++.exp (g++_init): Likewise.
* lib/objc.exp (objc_init): Likewise.

From-SVN: r57532

diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index c7b67c6..8be94f0 100644 (file)
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,11 @@
+2002-09-26  Richard Earnshaw  <rearnsha@arm.com>
+
+       * lib/gcc.exp (gcc_init): Use a filename for the testglue that is
+       unique to the tool.
+       * lib/g77.exp (g77_init): Likewise.
+       * lib/g++.exp (g++_init): Likewise.
+       * lib/objc.exp (objc_init): Likewise.
+
 2002-09-25  Mark Mitchell  <mark@codesourcery.com>
 
        * gcc/testsuite/g++.dg/abi/empty5.C: New test.

diff --git a/gcc/testsuite/lib/g++.exp b/gcc/testsuite/lib/g++.exp
index 4fb903e..749e1f1 100644 (file)
--- a/gcc/testsuite/lib/g++.exp
+++ b/gcc/testsuite/lib/g++.exp
@@ -239,7 +239,7 @@ proc g++_init { args } {
     }
 
     if { [target_info needs_status_wrapper] != "" } {
-       set gluefile ${tmpdir}/testglue.o;
+       set gluefile ${tmpdir}/g++-testglue.o;
        set result [build_wrapper $gluefile];
        if { $result != "" } {
            set gluefile [lindex $result 0];

diff --git a/gcc/testsuite/lib/g77.exp b/gcc/testsuite/lib/g77.exp
index 42780c2..8f20eb4 100644 (file)
--- a/gcc/testsuite/lib/g77.exp
+++ b/gcc/testsuite/lib/g77.exp
@@ -168,7 +168,7 @@ proc g77_init { args } {
     }
 
     if { [target_info needs_status_wrapper] != "" } {
-       set gluefile ${tmpdir}/testglue.o;
+       set gluefile ${tmpdir}/g77-testglue.o;
        set result [build_wrapper $gluefile];
        if { $result != "" } {
            set gluefile [lindex $result 0];

diff --git a/gcc/testsuite/lib/gcc.exp b/gcc/testsuite/lib/gcc.exp
index 09e5f9e..f090cb1 100644 (file)
--- a/gcc/testsuite/lib/gcc.exp
+++ b/gcc/testsuite/lib/gcc.exp
@@ -109,7 +109,7 @@ proc gcc_init { args } {
     if {[target_info needs_status_wrapper] != "" && \
            [target_info needs_status_wrapper] != "0" && \
            ![info exists gluefile]} {
-       set gluefile ${tmpdir}/testglue.o;
+       set gluefile ${tmpdir}/gcc-testglue.o;
        set result [build_wrapper $gluefile];
        if { $result != "" } {
            set gluefile [lindex $result 0];

diff --git a/gcc/testsuite/lib/objc.exp b/gcc/testsuite/lib/objc.exp
index d57b597..3ec19e3 100644 (file)
--- a/gcc/testsuite/lib/objc.exp
+++ b/gcc/testsuite/lib/objc.exp
@@ -108,7 +108,7 @@ proc objc_init { args } {
        set tmpdir /tmp
     }
     if { [target_info needs_status_wrapper]!="" && ![info exists gluefile] } {
-       set gluefile ${tmpdir}/testglue.o;
+       set gluefile ${tmpdir}/objc-testglue.o;
        set result [build_wrapper $gluefile];
        if { $result != "" } {
            set gluefile [lindex $result 0];