aboutsummaryrefslogtreecommitdiff
path: root/gas/testsuite/lib
diff options
context:
space:
mode:
authorBill Cox <bill@cygnus>1994-05-17 21:54:41 +0000
committerBill Cox <bill@cygnus>1994-05-17 21:54:41 +0000
commit858665b79900c1ec22ec4e897b251c3b05e98510 (patch)
treea8fa9d40bc92f60412953090b10abda8ccc8d69f /gas/testsuite/lib
parent087188e0df58b88eddca6b3ae177b9ddb3c4e629 (diff)
downloadgdb-858665b79900c1ec22ec4e897b251c3b05e98510.zip
gdb-858665b79900c1ec22ec4e897b251c3b05e98510.tar.gz
gdb-858665b79900c1ec22ec4e897b251c3b05e98510.tar.bz2
* lib/gas-defs.exp: Replace error proc calls with perror calls.
Diffstat (limited to 'gas/testsuite/lib')
-rw-r--r--gas/testsuite/lib/gas-defs.exp12
1 files changed, 6 insertions, 6 deletions
diff --git a/gas/testsuite/lib/gas-defs.exp b/gas/testsuite/lib/gas-defs.exp
index 1ea3512..e8942af 100644
--- a/gas/testsuite/lib/gas-defs.exp
+++ b/gas/testsuite/lib/gas-defs.exp
@@ -59,7 +59,7 @@ proc gas_start { prog as_opts } {
spawn -noecho -nottyinit $srcdir/lib/run $AS $ASFLAGS $as_opts $srcdir/$subdir/$prog
} foo
if ![regexp {^[0-9]+} $foo] then {
- error "Can't run $subdir/$prog: $foo"
+ perror "Can't run $subdir/$prog: $foo"
}
}
@@ -189,7 +189,7 @@ proc objdump_start_no_subdir { prog opts } {
spawn -noecho -nottyinit $srcdir/lib/run $OBJDUMP $opts $prog
} foo
if ![regexp {^[0-9]+} $foo] then {
- error "Can't run $prog: $foo"
+ perror "Can't run $prog: $foo"
}
}
@@ -200,10 +200,10 @@ proc objdump_finish { } {
}
expect_after {
- timeout { error "timeout" }
- "virtual memory exhausted" { error "virtual memory exhausted" }
- buffer_full { error "buffer full" }
- eof { error "eof" }
+ timeout { perror "timeout" }
+ "virtual memory exhausted" { perror "virtual memory exhausted" }
+ buffer_full { perror "buffer full" }
+ eof { perror "eof" }
}
# regexp_diff, based on simple_diff taken from ld test suite