From 2a12627b217f838c04ffe05855390d17ef583803 Mon Sep 17 00:00:00 2001
From: Bill Cox <bill@cygnus>
Date: Tue, 17 May 1994 22:40:29 +0000
Subject: 	* ld.bootstrap/bootstrap.exp, lib/ld.exp: Replace error proc 
   calls with perror calls.

---
 ld/testsuite/lib/ld.exp | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

(limited to 'ld/testsuite/lib')

diff --git a/ld/testsuite/lib/ld.exp b/ld/testsuite/lib/ld.exp
index 659dfe2..aeb8454 100644
--- a/ld/testsuite/lib/ld.exp
+++ b/ld/testsuite/lib/ld.exp
@@ -4,7 +4,7 @@
 #
 proc default_ld_version { ld } {
     if { [file exists $ld] == 0 } then {
-	error "$ld does not exist"
+ perror "$ld does not exist"
 	exit 1
     }
     
@@ -25,7 +25,7 @@ proc default_ld_relocate { ld target objects } {
     global HOSTING_EMU
     
     if { [file exists $ld] == 0 } then {
-	error "$ld does not exist"
+ perror "$ld does not exist"
 	exit 1
     }
     
@@ -56,7 +56,7 @@ proc default_ld_link { ld target objects } {
     set libs "$BFDLIB $LIBIBERTY $HOSTING_LIBS"
     
     if { [file exists $ld] == 0 } then {
-	error "$ld does not exist"
+ perror "$ld does not exist"
 	exit 1
     }
     
@@ -80,7 +80,7 @@ proc default_ld_compile { cc source object } {
     global subdir
     
     if {[which $cc] == 0} then {
-	error "$cc does not exist"
+ perror "$cc does not exist"
 	exit 1
     }
     
-- 
cgit v1.1