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

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

From-SVN: r58318

gcc/testsuite/ChangeLog

+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.

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 {