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 "modrm" "-al --listing-lhs-width=2"
47 run_dump_test "opcode"
49 run_dump_test "intel16"
50 run_list_test "intelbad" ""
51 run_dump_test "intelok"
52 run_dump_test "prefix"
54 run_dump_test "katmai"
56 run_dump_test "ssemmx2"
59 run_dump_test "prescott"
61 if {![istarget "*-*-aix*"]
62 && (![is_elf_format] || [istarget "*-*-linux*"]
63 || [istarget "*-*-netbsd*"]
64 || [istarget "*-*-freebsd*"]
65 || [istarget "*-*-netware*"])} {
66 # Don't run this test on targets where '/' starts comments.
67 run_dump_test "divide"
71 run_dump_test "padlock"
73 # These tests require support for 8 and 16 bit relocs,
74 # so we only run them for ELF and COFF targets.
75 if {[is_elf_format] || [istarget "*-*-coff*"]} then {
77 run_dump_test "jump16"
78 run_list_test "white" "-al --listing-lhs-width=3"
80 # These tests should in theory work for PE targets as well,
81 # but the relocs we currently produce are slightly different
82 # from those produced for ELF/COFF based toolchains.
83 # So for now we ignore PE targets.
85 run_dump_test "absrel"
89 if [is_elf_format] then {
90 # PIC is only supported on ELF targets.
91 run_dump_test "intelpic"
96 run_dump_test "tlspic"
97 run_dump_test "tlsnopic"
100 # This is a PE specific test.
101 if { [istarget "*-*-cygwin*"] || [istarget "*-*-pe"]
102 || [istarget "*-*-mingw*"]
104 run_dump_test "secrel"
107 set ASFLAGS "$old_ASFLAGS"
110 if [expr ([istarget "i*86-*-*"] || [istarget "x86_64-*-*"]) && [gas_64_check]] then {
113 set old_ASFLAGS "$ASFLAGS"
114 set ASFLAGS "$ASFLAGS --64"
116 run_dump_test "x86_64"
117 run_dump_test "x86-64-addr32"
118 run_dump_test "x86-64-opcode"
119 run_dump_test "x86-64-rip"
120 run_list_test "x86-64-inval" "-al"
122 # For ELF targets verify that @unwind works.
123 if { ([istarget "*-*-elf*"] || [istarget "*-*-linux*"]
124 || [istarget "*-*-solaris2.*"])
125 && ![istarget *-*-linux*aout*]
126 && ![istarget *-*-linux*oldld*] } then {
127 run_dump_test "x86-64-unwind"
130 set ASFLAGS "$old_ASFLAGS"