diff options
Diffstat (limited to 'binutils/testsuite')
-rw-r--r-- | binutils/testsuite/binutils-all/objdump.exp | 40 |
1 files changed, 22 insertions, 18 deletions
diff --git a/binutils/testsuite/binutils-all/objdump.exp b/binutils/testsuite/binutils-all/objdump.exp index ef5f246..3206a00 100644 --- a/binutils/testsuite/binutils-all/objdump.exp +++ b/binutils/testsuite/binutils-all/objdump.exp @@ -204,28 +204,32 @@ if { ![is_elf_format] } then { # Test objdump -WL on a file that contains line information for multiple files and search directories. -if { ![binutils_assemble $srcdir/$subdir/dw2-decodedline.S tmpdir/dw2-decodedline.o] } then { - fail "objdump decoded line" -} - -if [is_remote host] { - set decodedline_testfile [remote_download host tmpdir/dw2-decodedline.o] +if { ![is_elf_format] } then { + unsupported "objump decode line" } else { - set decodedline_testfile tmpdir/dw2-decodedline.o -} + if { ![binutils_assemble $srcdir/$subdir/dw2-decodedline.S tmpdir/dw2-decodedline.o] } then { + fail "objdump decoded line" + } + + if [is_remote host] { + set decodedline_testfile [remote_download host tmpdir/dw2-decodedline.o] + } else { + set decodedline_testfile tmpdir/dw2-decodedline.o + } -set got [remote_exec host "$OBJDUMP $OBJDUMPFLAGS -WL $decodedline_testfile" "" "/dev/null" "objdump.out"] + set got [remote_exec host "$OBJDUMP $OBJDUMPFLAGS -WL $decodedline_testfile" "" "/dev/null" "objdump.out"] -if { [lindex $got 0] != 0 || ![string match "" [lindex $got 1]] } then { - fail "objdump -WL (reason: unexpected output)" - send_log $got - send_log "\n" -} + if { [lindex $got 0] != 0 || ![string match "" [lindex $got 1]] } then { + fail "objdump -WL (reason: unexpected output)" + send_log $got + send_log "\n" + } -if { [regexp_diff objdump.out $srcdir/$subdir/objdump.WL] } then { - fail "objdump -WL" -} else { - pass "objdump -WL" + if { [regexp_diff objdump.out $srcdir/$subdir/objdump.WL] } then { + fail "objdump -WL" + } else { + pass "objdump -WL" + } } # Options which are not tested: -a -d -D -R -T -x -l --stabs |