* lib/gas-defs.exp: Replace error proc calls with perror calls.
This commit is contained in:
parent
087188e0df
commit
858665b799
|
@ -1,3 +1,7 @@
|
|||
Tue May 17 14:53:08 1994 Bill Cox (bill@rtl.cygnus.com)
|
||||
|
||||
* lib/gas-defs.exp: Replace error proc calls with perror calls.
|
||||
|
||||
Mon May 16 13:19:16 1994 Jeff Law (law@snake.cs.utah.edu)
|
||||
|
||||
* gas/hppa/reloc/reloc.exp: Tweak expected output to match new
|
||||
|
|
|
@ -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
|
||||
|
|
Loading…
Reference in New Issue