diff options
| author | schwab <schwab@138bc75d-0d04-0410-961f-82ee72b054a4> | 2002-10-19 19:27:24 +0000 |
|---|---|---|
| committer | schwab <schwab@138bc75d-0d04-0410-961f-82ee72b054a4> | 2002-10-19 19:27:24 +0000 |
| commit | 8f51ee8339c2f608912dacdda898a42fa43b32d7 (patch) | |
| tree | 80fa0f314501d52b1bb92362b931a17667052c85 /gcc/testsuite/lib/compat.exp | |
| parent | 6e457e48265279aa5bac66ee9046ed32b14e012d (diff) | |
| download | gcc-8f51ee8339c2f608912dacdda898a42fa43b32d7.tar.gz | |
* 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
Diffstat (limited to 'gcc/testsuite/lib/compat.exp')
| -rw-r--r-- | gcc/testsuite/lib/compat.exp | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/gcc/testsuite/lib/compat.exp b/gcc/testsuite/lib/compat.exp index 1965f3d6ea9..0944ccc95d8 100644 --- 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 { |