g++.exp (g++_set_ld_library_path): Renamed to ${tool}_set_ld_library_path.

	gcc/testsuite:
	* lib/g++.exp (g++_set_ld_library_path): Renamed to
	${tool}_set_ld_library_path.
	Changed caller.
	* lib/objc.exp (${tool}_set_ld_library_path): New, copied from
	g++.exp.

	libjava/testsuite:
	* lib/libjava.exp (${tool}_set_ld_library_path): New, copied from
	g++.exp.

From-SVN: r44420

diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index 43c029a820617d8dae55b4a66d451dea530632b8..70e87e0f93e8053128208f3c67d09e9d1d9217b2 100644 (file)
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,11 @@
+2001-07-27  Rainer Orth  <ro@TechFak.Uni-Bielefeld.DE>
+
+       * lib/g++.exp (g++_set_ld_library_path): Renamed to
+       ${tool}_set_ld_library_path.
+       Changed caller.
+       * lib/objc.exp (${tool}_set_ld_library_path): New, copied from
+       g++.exp.
+
 2001-07-26  Stan Cox <scox@redhat.com>
 
        * lib/g++.exp (g++_exit, g++_check_unsupported_p): Removed.

diff --git a/gcc/testsuite/lib/g++.exp b/gcc/testsuite/lib/g++.exp
index c597b03c5406bdd1d4b5952aa5968c101bebda24..274a09652015dd21b2cf48c53d00abc9850905bb 100644 (file)
--- a/gcc/testsuite/lib/g++.exp
+++ b/gcc/testsuite/lib/g++.exp
@@ -288,12 +288,12 @@ proc g++_target_compile { source dest type options } {
 # this on IRIX, but it shouldn't hurt to do it anywhere else.
 #
 
-proc g++_set_ld_library_path { name element op } {
+proc ${tool}_set_ld_library_path { name element op } {
   setenv LD_LIBRARYN32_PATH [getenv LD_LIBRARY_PATH]
   setenv LD_LIBRARY64_PATH [getenv LD_LIBRARY_PATH]
 }
 
-trace variable env(LD_LIBRARY_PATH) w g++_set_ld_library_path
+trace variable env(LD_LIBRARY_PATH) w ${tool}_set_ld_library_path
 
 #
 # ${tool}_option_help

diff --git a/gcc/testsuite/lib/objc.exp b/gcc/testsuite/lib/objc.exp
index c315b6503b629d35d9cedce19f785d3738a4ed0a..c3de61e8149ea0c93aa0eac2eb6956d2f8c513c8 100644 (file)
--- a/gcc/testsuite/lib/objc.exp
+++ b/gcc/testsuite/lib/objc.exp
@@ -237,6 +237,20 @@ if { [info procs prune_warnings] == "" } then {
     }
 }
 
+# On IRIX 6, we have to set variables akin to LD_LIBRARY_PATH, but
+# called LD_LIBRARYN32_PATH (for the N32 ABI) and LD_LIBRARY64_PATH
+# (for the 64-bit ABI).  The right way to do this would be to modify
+# unix.exp -- but that's not an option since it's part of DejaGNU
+# proper, so we do it here, by trickery.  We really only need to do 
+# this on IRIX, but it shouldn't hurt to do it anywhere else.
+
+proc ${tool}_set_ld_library_path { name element op } {
+  setenv LD_LIBRARYN32_PATH [getenv LD_LIBRARY_PATH]
+  setenv LD_LIBRARY64_PATH [getenv LD_LIBRARY_PATH]
+}
+
+trace variable env(LD_LIBRARY_PATH) w ${tool}_set_ld_library_path
+
 # Utility used by mike-gcc.exp and c-torture.exp.
 # Check the compiler(/assembler/linker) output for text indicating that
 # the testcase should be marked as "unsupported".

diff --git a/libjava/testsuite/ChangeLog b/libjava/testsuite/ChangeLog
index 4db61674c51e5b80f76374cc1e20a41d6dcbfcc7..8889313c1243c4cdffece763569cff02f42d534c 100644 (file)
--- a/libjava/testsuite/ChangeLog
+++ b/libjava/testsuite/ChangeLog
@@ -1,3 +1,8 @@
+2001-07-27  Rainer Orth  <ro@TechFak.Uni-Bielefeld.DE>
+
+       * lib/libjava.exp (${tool}_set_ld_library_path): New, copied from
+       g++.exp.
+
 2001-07-19  Jeff Sturm  <jsturm@one-point.com>
 
        * libjava.lang/PR3731.java: New file.

diff --git a/libjava/testsuite/lib/libjava.exp b/libjava/testsuite/lib/libjava.exp
index ace5f6c2b2d2fa4ae6950201ffb0600ca6c38d03..9b45f3c16662b50c51f4c977a72376a86e06fc77 100644 (file)
--- a/libjava/testsuite/lib/libjava.exp
+++ b/libjava/testsuite/lib/libjava.exp
@@ -787,6 +787,20 @@ proc default_libjava_version {} {
 proc default_libjava_start { } {
 }
 
+# On IRIX 6, we have to set variables akin to LD_LIBRARY_PATH, but
+# called LD_LIBRARYN32_PATH (for the N32 ABI) and LD_LIBRARY64_PATH
+# (for the 64-bit ABI).  The right way to do this would be to modify
+# unix.exp -- but that's not an option since it's part of DejaGNU
+# proper, so we do it here, by trickery.  We really only need to do 
+# this on IRIX, but it shouldn't hurt to do it anywhere else.
+
+proc ${tool}_set_ld_library_path { name element op } {
+  setenv LD_LIBRARYN32_PATH [getenv LD_LIBRARY_PATH]
+  setenv LD_LIBRARY64_PATH [getenv LD_LIBRARY_PATH]
+}
+
+trace variable env(LD_LIBRARY_PATH) w ${tool}_set_ld_library_path
+
 # Local Variables:
 # tcl-indent-level:4
 # End: