4 proc run_list_test
{ name opts
} {
6 set testname
"i386 $name"
7 set file $srcdir
/$subdir
/$
name
8 gas_run $
{name}.s $opts
">&dump.out"
9 if { [regexp_diff
"dump.out" "${file}.l"] } then {
11 verbose
"output is [file_contents "dump.out"]" 2
17 proc gas_64_check
{ } {
22 catch
"exec $srcdir/lib/run $NM $NMFLAGS --help" nm_help
23 return [regexp
"targets:.*x86-64" $nm_help]
26 proc gas_32_check
{ } {
31 catch
"exec $srcdir/lib/run $NM $NMFLAGS --help" nm_help
32 return [regexp
"targets:.*i386" $nm_help]
36 if [expr
([istarget
"i*86-*-*"] || [istarget "x86_64-*-*"]) && [gas_32_check]] then {
39 set old_ASFLAGS
"$ASFLAGS"
40 set ASFLAGS
"$ASFLAGS --32"
42 run_list_test
"float" "-al"
43 run_list_test
"general" "-al --listing-lhs-width=2"
44 run_list_test
"inval" "-al"
45 run_list_test
"segment" "-al"
46 run_list_test
"inval-seg" "-al"
47 run_list_test
"modrm" "-al --listing-lhs-width=2"
49 run_dump_test
"opcode"
51 run_dump_test
"intel16"
52 run_list_test
"intelbad" ""
53 run_dump_test
"intelok"
54 run_dump_test
"prefix"
56 run_dump_test
"katmai"
58 run_dump_test
"ssemmx2"
61 run_dump_test
"prescott"
64 run_dump_test
"suffix"
65 run_dump_test
"immed32"
67 if {![istarget
"*-*-aix*"]
68 && (![is_elf_format
] ||
[istarget
"*-*-linux*"]
69 ||
[istarget
"*-*-netbsd*"]
70 ||
[istarget
"*-*-freebsd*"]
71 ||
[istarget
"*-*-netware*"]
72 ||
[istarget
"*-*-vxworks*"])} {
73 # Don
't run this test on targets where '/' starts comments.
74 run_dump_test "divide"
77 run_dump_test "padlock"
79 run_list_test "cr-err" ""
82 # These tests require support for 8 and 16 bit relocs,
83 # so we only run them for ELF and COFF targets.
84 if {[is_elf_format] || [istarget "*-*-coff*"]} then {
86 run_dump_test "jump16"
87 run_list_test "white" "-al --listing-lhs-width=3"
89 # These tests should in theory work for PE targets as well,
90 # but the relocs we currently produce are slightly different
91 # from those produced for ELF/COFF based toolchains.
92 # So for now we ignore PE targets.
94 run_dump_test "absrel"
98 if [is_elf_format] then {
99 # PIC is only supported on ELF targets.
100 run_dump_test "intelpic"
102 run_dump_test "relax"
103 run_dump_test "gotpc"
105 run_dump_test "tlspic"
106 run_dump_test "tlsnopic"
108 run_dump_test "reloc32"
109 run_list_test "reloc32" "--defsym _bad_=1"
112 # This is a PE specific test.
113 if { [istarget "*-*-cygwin*"] || [istarget "*-*-pe"]
114 || [istarget "*-*-mingw*"]
116 run_dump_test "secrel"
119 set ASFLAGS "$old_ASFLAGS"
122 if [expr ([istarget "i*86-*-*"] || [istarget "x86_64-*-*"]) && [gas_64_check]] then {
125 set old_ASFLAGS "$ASFLAGS"
126 set ASFLAGS "$ASFLAGS --64"
128 run_dump_test "x86_64"
129 run_dump_test "x86-64-addr32"
130 run_dump_test "x86-64-opcode"
131 run_dump_test "x86-64-pcrel"
132 run_dump_test "x86-64-rip"
133 run_list_test "x86-64-inval" "-al"
134 run_list_test "x86-64-segment" "-al"
135 run_list_test "x86-64-inval-seg" "-al"
136 run_dump_test "x86-64-branch"
137 run_dump_test "svme64"
138 run_dump_test "x86-64-vmx"
139 run_dump_test "immed64"
141 # For ELF targets verify that @unwind works.
142 if { ([istarget "*-*-elf*"] || [istarget "*-*-linux*"]
143 || [istarget "*-*-solaris2.*"])
144 && ![istarget *-*-linux*aout*]
145 && ![istarget *-*-linux*oldld*] } then {
146 run_dump_test "x86-64-unwind"
150 if [is_elf_format] then {
151 run_dump_test "reloc64"
152 run_list_test "reloc64" "--defsym _bad_=1"
155 set ASFLAGS "$old_ASFLAGS"