1 # ??? This probably shouldn't be replicated here...
2 proc run_list_test { name opts } {
4 set testname "cfi $name"
5 set file $srcdir/$subdir/$name
6 gas_run ${name}.s $opts ">&dump.out"
7 if { [regexp_diff "dump.out" "${file}.l"] } then {
9 verbose "output is [file_contents "dump.out"]" 2
15 if ![is_elf_format] then {
19 if [istarget "x86_64-*"] then {
20 run_dump_test "cfi-x86_64"
22 } elseif [istarget "i?86-*"] then {
23 run_dump_test "cfi-i386"
25 } elseif { [istarget alpha*-*-*] } then {
26 run_dump_test "cfi-alpha-1"
27 run_dump_test "cfi-alpha-2"
28 run_dump_test "cfi-alpha-3"
30 } elseif { [istarget ppc*-*-*] || [istarget powerpc*-*-*] } then {
31 run_dump_test "cfi-ppc-1"
33 } elseif { [istarget s390*-*-*] } then {
34 run_dump_test "cfi-s390-1"
35 if { [istarget s390x*-*-*] } then {
36 run_dump_test "cfi-s390x-1"
39 } elseif { [istarget "m68*-*"] } then {
40 run_dump_test "cfi-m68k"
42 } elseif { [istarget sparc*-*-*] } then {
47 catch "exec $srcdir/lib/run $NM $NMFLAGS --help" nm_help
48 run_dump_test "cfi-sparc-1"
49 if { [regexp "elf64\[_-\]sparc" $nm_help] } then {
50 run_dump_test "cfi-sparc64-1"
53 } elseif [istarget "sh*-*"] then {
54 if { [istarget sh64*-*-*] || [istarget sh5*-*-*] } then {
56 run_dump_test "cfi-sh-1"
59 } elseif { [istarget "arm*-*"] || [istarget "xscale*-*"] } then {
60 run_dump_test "cfi-arm-1"
62 } elseif { [istarget "mips*-*"] } then {
63 run_dump_test "cfi-mips-1"
64 } elseif { [istarget "hppa*-linux*"] } then {
65 run_dump_test "cfi-hppa-1"
70 run_list_test "cfi-diag-1" ""
71 run_dump_test "cfi-common-1"
72 run_dump_test "cfi-common-2"
73 run_dump_test "cfi-common-3"
74 run_dump_test "cfi-common-4"