From e2a8da6a507e716c3cc80a9a8f8d3ced1edc0fa9 Mon Sep 17 00:00:00 2001 From: Ian Lance Taylor Date: Wed, 4 Jan 1995 23:59:43 +0000 Subject: [PATCH] * lib/ld.exp: Use [which $ld] rather than [file exists $ld] to see if the linker exists. --- ld/testsuite/ChangeLog | 16 ++++++++++++++++ ld/testsuite/lib/ld.exp | 8 ++++---- 2 files changed, 20 insertions(+), 4 deletions(-) diff --git a/ld/testsuite/ChangeLog b/ld/testsuite/ChangeLog index feda8a0dc1a..ce101b98eaf 100644 --- a/ld/testsuite/ChangeLog +++ b/ld/testsuite/ChangeLog @@ -1,3 +1,19 @@ +Wed Jan 4 18:56:27 1995 Ian Lance Taylor + + * lib/ld.exp: Use [which $ld] rather than [file exists $ld] to see + if the linker exists. + +Wed Dec 14 16:39:03 1994 Ken Raeburn + + * lib/ld.exp (prune_system_crud): Define if not already defined, + in case the user isn't using the newest DejaGnu version that we + haven't released to the net yet. + +Fri Dec 2 14:17:02 1994 Ian Lance Taylor + + * config/default.exp: Define objdump if it is not defined. + * ld-empic/*: New tests to test -membedded-pic code. + Mon Nov 28 11:24:36 1994 Ian Lance Taylor * ld-bootstrap/bootstrap.exp: Pass cmp output through diff --git a/ld/testsuite/lib/ld.exp b/ld/testsuite/lib/ld.exp index ee8c047841c..1a63b68b986 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 } -- 2.30.2