* lib/compat.exp (compat-run): Prepend "./" when $dest has no

	directory component.

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

diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index c3a9a36..83d9bf7 100644 (file)
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,8 @@
+2002-10-19  Andreas Schwab  <schwab@suse.de>
+
+       * lib/compat.exp (compat-run): Prepend "./" when $dest has no
+       directory component.
+
 2002-10-18  Mark Mitchell  <mark@codesourcery.com>
 
        * g++.dg/inherit/thunk1.C: New test.

diff --git a/gcc/testsuite/lib/compat.exp b/gcc/testsuite/lib/compat.exp
index 1965f3d..0944ccc 100644 (file)
--- a/gcc/testsuite/lib/compat.exp
+++ b/gcc/testsuite/lib/compat.exp
@@ -96,6 +96,9 @@ proc compat-run { testname objlist dest options optstr } {
     }
 
     # Run the self-checking executable.
+    if ![string match "*/*" $dest] then {
+       set dest "./$dest"
+    }
     set result [${tool}_load $dest "" ""]
     set status [lindex $result 0]
     if { $status == "pass" } then {