* lib/ld.exp: Use [which $ld] rather than [file exists $ld] to see

if the linker exists.

ld/testsuite/ChangeLog

@@ -1,3 +1,19 @@
+Wed Jan  4 18:56:27 1995  Ian Lance Taylor  <ian@sanguine.cygnus.com>
+
+	* 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  <raeburn@cujo.cygnus.com>
+
+	* 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  <ian@rtl.cygnus.com>
+
+	* 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  <ian@sanguine.cygnus.com>
 
 	* ld-bootstrap/bootstrap.exp: Pass cmp output through

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
     }