* binutils-all/objdump.exp: Run compressed debug test only for ELF.
This commit is contained in:
parent
848c6a24d5
commit
22bce68eb8
|
@ -1,3 +1,7 @@
|
||||||
|
2008-07-26 Alan Modra <amodra@bigpond.net.au>
|
||||||
|
|
||||||
|
* binutils-all/objdump.exp: Run compressed debug test only for ELF.
|
||||||
|
|
||||||
2008-07-11 Hans-Peter Nilsson <hp@axis.com>
|
2008-07-11 Hans-Peter Nilsson <hp@axis.com>
|
||||||
|
|
||||||
* binutils-all/objdump.W: Generalize to adjust for targets with
|
* binutils-all/objdump.W: Generalize to adjust for targets with
|
||||||
|
|
|
@ -1,5 +1,5 @@
|
||||||
# Copyright 1993, 1994, 1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002,
|
# Copyright 1993, 1994, 1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002,
|
||||||
# 2003, 2004, 2007
|
# 2003, 2004, 2007, 2008
|
||||||
# Free Software Foundation, Inc.
|
# Free Software Foundation, Inc.
|
||||||
|
|
||||||
# This program is free software; you can redistribute it and/or modify
|
# This program is free software; you can redistribute it and/or modify
|
||||||
|
@ -160,46 +160,48 @@ if [regexp $want $got] then {
|
||||||
|
|
||||||
# Test objdump -s on a file that contains a compressed .debug section
|
# Test objdump -s on a file that contains a compressed .debug section
|
||||||
|
|
||||||
if {![binutils_assemble $srcdir/$subdir/dw2-compressed.S tmpdir/dw2-compressed.o]} then {
|
if { ![is_elf_format] } then {
|
||||||
return
|
unsupported "objdump compressed debug"
|
||||||
}
|
} elseif { ![binutils_assemble $srcdir/$subdir/dw2-compressed.S tmpdir/dw2-compressed.o] } then {
|
||||||
if [is_remote host] {
|
fail "objdump compressed debug"
|
||||||
set compressed_testfile [remote_download host tmpdir/dw2-compressed.o]
|
|
||||||
} else {
|
} else {
|
||||||
set compressed_testfile tmpdir/dw2-compressed.o
|
if [is_remote host] {
|
||||||
|
set compressed_testfile [remote_download host tmpdir/dw2-compressed.o]
|
||||||
|
} else {
|
||||||
|
set compressed_testfile tmpdir/dw2-compressed.o
|
||||||
|
}
|
||||||
|
|
||||||
|
set got [remote_exec host "$OBJDUMP $OBJDUMPFLAGS -s -j .zdebug_abbrev $compressed_testfile" "" "/dev/null" "objdump.out"]
|
||||||
|
|
||||||
|
if { [lindex $got 0] != 0 || ![string match "" [lindex $got 1]] } then {
|
||||||
|
fail "objdump -s -j .zdebug_abbrev (reason: unexpected output)"
|
||||||
|
send_log $got
|
||||||
|
send_log "\n"
|
||||||
|
}
|
||||||
|
|
||||||
|
if { [regexp_diff objdump.out $srcdir/$subdir/objdump.s] } then {
|
||||||
|
fail "objdump -s -j .zdebug_abbrev"
|
||||||
|
} else {
|
||||||
|
pass "objdump -s -j .zdebug_abbrev"
|
||||||
|
}
|
||||||
|
|
||||||
|
# Test objdump -W on a file that contains some compressed .debug sections
|
||||||
|
|
||||||
|
set got [remote_exec host "$OBJDUMP $OBJDUMPFLAGS -W $compressed_testfile" "" "/dev/null" "objdump.out"]
|
||||||
|
|
||||||
|
if { [lindex $got 0] != 0 || ![string match "" [lindex $got 1]] } then {
|
||||||
|
fail "objdump -W (reason: unexpected output)"
|
||||||
|
send_log $got
|
||||||
|
send_log "\n"
|
||||||
|
}
|
||||||
|
|
||||||
|
if { [regexp_diff objdump.out $srcdir/$subdir/objdump.W] } then {
|
||||||
|
fail "objdump -W"
|
||||||
|
} else {
|
||||||
|
pass "objdump -W"
|
||||||
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
set got [remote_exec host "$OBJDUMP $OBJDUMPFLAGS -s -j .zdebug_abbrev $compressed_testfile" "" "/dev/null" "objdump.out"]
|
|
||||||
|
|
||||||
if { [lindex $got 0] != 0 || ![string match "" [lindex $got 1]] } then {
|
|
||||||
fail "objdump -s -j .zdebug_abbrev (reason: unexpected output)"
|
|
||||||
send_log $got
|
|
||||||
send_log "\n"
|
|
||||||
}
|
|
||||||
|
|
||||||
if { [regexp_diff objdump.out $srcdir/$subdir/objdump.s] } then {
|
|
||||||
fail "objdump -s -j .zdebug_abbrev"
|
|
||||||
} else {
|
|
||||||
pass "objdump -s -j .zdebug_abbrev"
|
|
||||||
}
|
|
||||||
|
|
||||||
# Test objdump -W on a file that contains some compressed .debug sections
|
|
||||||
|
|
||||||
set got [remote_exec host "$OBJDUMP $OBJDUMPFLAGS -W $compressed_testfile" "" "/dev/null" "objdump.out"]
|
|
||||||
|
|
||||||
if { [lindex $got 0] != 0 || ![string match "" [lindex $got 1]] } then {
|
|
||||||
fail "objdump -W (reason: unexpected output)"
|
|
||||||
send_log $got
|
|
||||||
send_log "\n"
|
|
||||||
}
|
|
||||||
|
|
||||||
if { [regexp_diff objdump.out $srcdir/$subdir/objdump.W] } then {
|
|
||||||
fail "objdump -W"
|
|
||||||
} else {
|
|
||||||
pass "objdump -W"
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
# Options which are not tested: -a -d -D -R -T -x -l --stabs
|
# Options which are not tested: -a -d -D -R -T -x -l --stabs
|
||||||
# I don't see any generic way to test any of these other than -a.
|
# I don't see any generic way to test any of these other than -a.
|
||||||
|
|
Loading…
Reference in New Issue