* gas/cfi/cfi.exp: Use here. Only run tests when ELF.

* gas/macros/and.s: Avoid .set so we don't break mips.
This commit is contained in:
Alan Modra 2003-06-10 13:31:59 +00:00
parent d199a63653
commit d04428bdb4
3 changed files with 54 additions and 25 deletions

View File

@ -1,5 +1,7 @@
2003-06-10 Alan Modra <amodra@bigpond.net.au>
* lib/gas-defs.exp (proc is_elf_format): Copy from ld testsuite.
* gas/cfi/cfi.exp: Use here. Only run tests when ELF.
* gas/macros/and.s: Avoid .set so we don't break mips.
2003-06-10 Alan Modra <amodra@bigpond.net.au>

View File

@ -12,35 +12,25 @@ proc run_list_test { name opts } {
pass $testname
}
set any "0"
if ![is_elf_format] then {
return
}
if [istarget "x86_64-*"] then {
run_dump_test "cfi-x86_64"
set any "1"
}
if [istarget "i?86-*"] then {
} elseif [istarget "i?86-*"] then {
run_dump_test "cfi-i386"
set any "1"
} elseif { [istarget alpha*-*-*] } then {
run_dump_test "cfi-alpha-1"
run_dump_test "cfi-alpha-2"
run_dump_test "cfi-alpha-3"
} else {
return
}
if { [istarget alpha*-*-*] } then {
set elf [expr [istarget *-*-elf*] \
|| [istarget *-*-linux*] \
|| [istarget *-*-freebsd*] \
|| [istarget *-*-netbsd*] ]
if $elf {
run_dump_test "cfi-alpha-1"
run_dump_test "cfi-alpha-2"
run_dump_test "cfi-alpha-3"
set any "1"
}
}
if $any {
run_list_test "cfi-diag-1" ""
run_dump_test "cfi-common-1"
run_dump_test "cfi-common-2"
}
run_list_test "cfi-diag-1" ""
run_dump_test "cfi-common-1"
run_dump_test "cfi-common-2"

View File

@ -182,6 +182,43 @@ proc gas_init { args } {
return
}
#
# is_elf_format
# true if the object format is known to be ELF
#
proc is_elf_format {} {
if { ![istarget *-*-sysv4*] \
&& ![istarget *-*-unixware*] \
&& ![istarget *-*-elf*] \
&& ![istarget *-*-eabi*] \
&& ![istarget hppa*64*-*-hpux*] \
&& ![istarget *-*-linux*] \
&& ![istarget *-*-irix5*] \
&& ![istarget *-*-irix6*] \
&& ![istarget *-*-netbsd*] \
&& ![istarget *-*-solaris2*] } {
return 0
}
if { [istarget *-*-linux*aout*] \
|| [istarget *-*-linux*oldld*] } {
return 0
}
if { ![istarget *-*-netbsdelf*] \
&& ([istarget *-*-netbsd*aout*] \
|| [istarget *-*-netbsdpe*] \
|| [istarget arm*-*-netbsd*] \
|| [istarget sparc-*-netbsd*] \
|| [istarget i*86-*-netbsd*] \
|| [istarget m68*-*-netbsd*] \
|| [istarget vax-*-netbsd*] \
|| [istarget ns32k-*-netbsd*]) } {
return 0
}
return 1
}
# run_dump_test FILE (optional:) EXTRA_OPTIONS
#