diff options
author | Ian Lance Taylor <ian@airs.com> | 1995-01-04 23:59:43 +0000 |
---|---|---|
committer | Ian Lance Taylor <ian@airs.com> | 1995-01-04 23:59:43 +0000 |
commit | e2a8da6a507e716c3cc80a9a8f8d3ced1edc0fa9 (patch) | |
tree | dc84a92326c07dad5f640036d3bfb18698812dd7 /ld/testsuite/lib | |
parent | d3d74a94e9ae5f802954fc7b446dc6433359b7aa (diff) | |
download | gdb-e2a8da6a507e716c3cc80a9a8f8d3ced1edc0fa9.zip gdb-e2a8da6a507e716c3cc80a9a8f8d3ced1edc0fa9.tar.gz gdb-e2a8da6a507e716c3cc80a9a8f8d3ced1edc0fa9.tar.bz2 |
* lib/ld.exp: Use [which $ld] rather than [file exists $ld] to see
if the linker exists.
Diffstat (limited to 'ld/testsuite/lib')
-rw-r--r-- | ld/testsuite/lib/ld.exp | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/ld/testsuite/lib/ld.exp b/ld/testsuite/lib/ld.exp index ee8c047..1a63b68 100644 --- a/ld/testsuite/lib/ld.exp +++ b/ld/testsuite/lib/ld.exp @@ -3,7 +3,7 @@ # extract and print the version number of ld # proc default_ld_version { ld } { - if { [file exists $ld] == 0 } then { + if { [which $ld] == 0 } then { perror "$ld does not exist" exit 1 } @@ -24,7 +24,7 @@ proc default_ld_relocate { ld target objects } { global HOSTING_EMU - if { [file exists $ld] == 0 } then { + if { [which $ld] == 0 } then { perror "$ld does not exist" return 0 } @@ -56,7 +56,7 @@ proc default_ld_link { ld target objects } { set objs "$HOSTING_CRT0 $objects" set libs "$HOSTING_LIBS" - if { [file exists $ld] == 0 } then { + if { [which $ld] == 0 } then { perror "$ld does not exist" return 0 } @@ -80,7 +80,7 @@ proc default_ld_link { ld target objects } { # proc default_ld_simple_link { ld target objects } { - if { [file exists $ld] == 0 } then { + if { [which $ld] == 0 } then { perror "$ld does not exist" return 0 } |