aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorAlan Modra <amodra@gmail.com>2003-06-10 13:31:59 +0000
committerAlan Modra <amodra@gmail.com>2003-06-10 13:31:59 +0000
commitd04428bdb429aa7206e45f5273898b5918ae2f18 (patch)
tree8a7690eb0a1d760669221e2e16eaf4bf39b41dee
parentd199a636532144ffb0a8a3d2fae5fc5744558480 (diff)
downloadgdb-d04428bdb429aa7206e45f5273898b5918ae2f18.zip
gdb-d04428bdb429aa7206e45f5273898b5918ae2f18.tar.gz
gdb-d04428bdb429aa7206e45f5273898b5918ae2f18.tar.bz2
* gas/cfi/cfi.exp: Use here. Only run tests when ELF.
* gas/macros/and.s: Avoid .set so we don't break mips.
-rw-r--r--gas/testsuite/ChangeLog2
-rw-r--r--gas/testsuite/gas/cfi/cfi.exp36
-rw-r--r--gas/testsuite/lib/gas-defs.exp37
3 files changed, 52 insertions, 23 deletions
diff --git a/gas/testsuite/ChangeLog b/gas/testsuite/ChangeLog
index 337226e..7eb65c1 100644
--- a/gas/testsuite/ChangeLog
+++ b/gas/testsuite/ChangeLog
@@ -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>
diff --git a/gas/testsuite/gas/cfi/cfi.exp b/gas/testsuite/gas/cfi/cfi.exp
index 88baac2..968d3b1 100644
--- a/gas/testsuite/gas/cfi/cfi.exp
+++ b/gas/testsuite/gas/cfi/cfi.exp
@@ -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"
-}
-if { [istarget alpha*-*-*] } then {
+} elseif { [istarget alpha*-*-*] } then {
+ run_dump_test "cfi-alpha-1"
+ run_dump_test "cfi-alpha-2"
+ run_dump_test "cfi-alpha-3"
- 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"
- }
+} else {
+ return
}
-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"
diff --git a/gas/testsuite/lib/gas-defs.exp b/gas/testsuite/lib/gas-defs.exp
index 5a3af8c..c82bd8a 100644
--- a/gas/testsuite/lib/gas-defs.exp
+++ b/gas/testsuite/lib/gas-defs.exp
@@ -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
#