* lib/libio.exp (test_libio): Reset ld_library_path before appending

        the same path(s) again.

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

diff --git a/libio/testsuite/ChangeLog b/libio/testsuite/ChangeLog
index 0c443af..bd3f288 100644 (file)
--- a/libio/testsuite/ChangeLog
+++ b/libio/testsuite/ChangeLog
@@ -1,3 +1,8 @@
+Sat Jun 27 23:59:35 1998  Carlo Wood  <carlo@runaway.xs4all.nl>
+
+       * lib/libio.exp (test_libio): Reset ld_library_path before appending
+       the same path(s) again.
+
 Sat Sep  6 00:49:31 1997  Brendan Kehoe  <brendan@lisa.cygnus.com>
 
        * lib/libio.exp (test_libio): Lose -L.. before -lio, may as well

diff --git a/libio/testsuite/lib/libio.exp b/libio/testsuite/lib/libio.exp
index 71639e1..d9f01b4 100644 (file)
--- a/libio/testsuite/lib/libio.exp
+++ b/libio/testsuite/lib/libio.exp
@@ -48,13 +48,15 @@ proc test_libio { srcfile compile_args inpfile resultfile exec_args } {
     global LIBIO
     global srcdir subdir objdir
     global TOOL_OPTIONS
-    global wrapper_file wrap_compile_flags;
+    global wrapper_file wrap_compile_flags
+    global ld_library_path
 
     if { $inpfile != "" } {
        set inpfile "$srcdir/../tests/$inpfile"
     }
 
     set args ""
+    set ld_library_path ""
     lappend args "additional_flags=-O3";
     lappend args "additional_flags=-I.. -I$srcdir/.."
     lappend args "additional_flags=$wrap_compile_flags";