From: Bill Cox <bill@cygnus>
Date: Tue, 17 May 1994 21:06:39 +0000 (+0000)
Subject: 	* config/default.exp, config/unix.exp: Replace error
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=087188e0df58b88eddca6b3ae177b9ddb3c4e629;p=binutils-gdb.git

	* config/default.exp, config/unix.exp: Replace error
	  proc calls with perror.
---

diff --git a/binutils/testsuite/ChangeLog b/binutils/testsuite/ChangeLog
index e050e43d364..05a34c764bb 100644
--- a/binutils/testsuite/ChangeLog
+++ b/binutils/testsuite/ChangeLog
@@ -1,3 +1,8 @@
+Tue May 17 14:04:05 1994  Bill Cox  (bill@rtl.cygnus.com)
+
+	* config/default.exp, config/unix.exp: Replace error
+	  proc calls with perror.
+
 Tue May 10 11:20:54 1994  Stan Shebs  (shebs@andros.cygnus.com)
 
 	* configure.in (sparclite): Match on sparclite*-*-*.
diff --git a/binutils/testsuite/config/default.exp b/binutils/testsuite/config/default.exp
index 31fe7e37821..4f4d7b31b1e 100644
--- a/binutils/testsuite/config/default.exp
+++ b/binutils/testsuite/config/default.exp
@@ -23,7 +23,7 @@ load_lib util-defs.exp
 
 global NM
 if ![info exists NM] then {
-    set NM [transform nm]
+    set NM [findfile $base_dir/../nm]
 }
 global NMFLAGS
 if ![info exists NMFLAGS] then {
@@ -31,7 +31,7 @@ if ![info exists NMFLAGS] then {
 }
 global SIZE
 if ![info exists SIZE] then {
-    set SIZE [transform size]
+    set SIZE [findfile $base_dir/../size]
 }
 global SIZEFLAGS
 if ![info exists SIZEFLAGS] then {
@@ -39,7 +39,7 @@ if ![info exists SIZEFLAGS] then {
 }
 global OBJDUMP
 if ![info exists OBJDUMP] then {
-    set OBJDUMP [transform objdump]
+    set OBJDUMP [findfile $base_dir/../objdump]
 }
 global OBJDUMPFLAGS
 if ![info exists OBJDUMPFLAGS] then {
@@ -51,8 +51,8 @@ if ![info exists OBJDUMPFLAGS] then {
 # within the tests themselves
 #
 expect_before {
-    buffer_full		   { error "internal buffer is full." }
-    "can't open '*'" { error "Can't open test file." }
+    buffer_full		   { perror "internal buffer is full." }
+    "can't open '*'" { perror "Can't open test file." }
 }
 
 
diff --git a/binutils/testsuite/config/unix.exp b/binutils/testsuite/config/unix.exp
index b5aa505707b..10da27012bf 100644
--- a/binutils/testsuite/config/unix.exp
+++ b/binutils/testsuite/config/unix.exp
@@ -51,8 +51,8 @@ if ![info exists OBJDUMPFLAGS] then {
 # within the tests themselves
 #
 expect_before {
-    buffer_full		   { error "internal buffer is full." }
-    "can't open '*'" { error "Can't open test file." }
+    buffer_full		   { perror "internal buffer is full." }
+    "can't open '*'" { perror "Can't open test file." }
 }