diff options
author | Alan Modra <amodra@gmail.com> | 2007-05-02 10:38:00 +0000 |
---|---|---|
committer | Alan Modra <amodra@gmail.com> | 2007-05-02 10:38:00 +0000 |
commit | 0d063f63c5ddefb05c3a80e3ce1d2dd5c07e996d (patch) | |
tree | 753d7270dab2eada460a9b951ebea6e7c020dc7a /binutils/testsuite | |
parent | 9e7750f2abd3c64e99d9a048958f4fd90acbb8b5 (diff) | |
download | gdb-0d063f63c5ddefb05c3a80e3ce1d2dd5c07e996d.zip gdb-0d063f63c5ddefb05c3a80e3ce1d2dd5c07e996d.tar.gz gdb-0d063f63c5ddefb05c3a80e3ce1d2dd5c07e996d.tar.bz2 |
* binutils-all/objcopy.exp (copy_setup): Don't perror, use send_log.
(copy_executable): Return early if test2 is blank.
Return unsupported rather than unresolved if we can't run
executables. Do test1 if we can compile.
Diffstat (limited to 'binutils/testsuite')
-rw-r--r-- | binutils/testsuite/ChangeLog | 7 | ||||
-rw-r--r-- | binutils/testsuite/binutils-all/objcopy.exp | 17 |
2 files changed, 19 insertions, 5 deletions
diff --git a/binutils/testsuite/ChangeLog b/binutils/testsuite/ChangeLog index 7ec2cea..7b4a1fa 100644 --- a/binutils/testsuite/ChangeLog +++ b/binutils/testsuite/ChangeLog @@ -1,3 +1,10 @@ +2007-05-02 Alan Modra <amodra@bigpond.net.au> + + * binutils-all/objcopy.exp (copy_setup): Don't perror, use send_log. + (copy_executable): Return early if test2 is blank. + Return unsupported rather than unresolved if we can't run + executables. Do test1 if we can compile. + 2007-04-24 Nathan Froyd <froydnj@codesourcery.com> Phil Edwards <phil@codesourcery.com> diff --git a/binutils/testsuite/binutils-all/objcopy.exp b/binutils/testsuite/binutils-all/objcopy.exp index 0493d86..10cc86f 100644 --- a/binutils/testsuite/binutils-all/objcopy.exp +++ b/binutils/testsuite/binutils-all/objcopy.exp @@ -516,7 +516,7 @@ proc copy_setup { } { set status [lindex $result 0] if { $status != "pass" } { - perror "unresolved setup, status = $status" + send_log "cannot run executable, status = ${status}\n" return 3 } @@ -541,6 +541,9 @@ proc copy_executable { prog flags test1 test2 } { if ![string match "" $exec_output] { fail $test1 + if [string match "" $test2] { + return + } fail $test2 return } @@ -582,6 +585,10 @@ proc copy_executable { prog flags test1 test2 } { fail $test1 } + if [string match "" $test2] { + return + } + set output [remote_load target tmpdir/copyprog] set status [lindex $output 0] if { $status != "pass" } { @@ -693,10 +700,10 @@ switch [copy_setup] { untested $test4 } "3" { - unresolved $test1 - unresolved $test2 - unresolved $test3 - unresolved $test4 + copy_executable "$OBJCOPY" "$OBJCOPYFLAGS" "$test1" "" + unsupported $test2 + unsupported $test3 + unsupported $test4 } "0" { copy_executable "$OBJCOPY" "$OBJCOPYFLAGS" "$test1" "$test2" |