#
# Some ARM tests
#
-proc run_errors_test { name opts tname} {
- global srcdir subdir
- set testname "$tname"
- set file $srcdir/$subdir/$name
- gas_run ${name}.s $opts ">&${name}.out"
- if { [regexp_diff "${name}.out" "${file}.l"] } then {
- fail $testname
- verbose "output is [file_contents "${name}.out"]" 2
- return
- }
- pass $testname
-}
-
-if {[istarget *arm*-*-*] || [istarget "xscale-*-*"]} then {
-
- if {[istarget *-wince-*]} then {
- run_dump_test "wince_inst"
- run_dump_test "wince_ldconst"
- run_dump_test "wince_arm7t"
- run_dump_test "wince_copro"
- } else {
- run_dump_test "inst"
- run_dump_test "ldconst"
- run_dump_test "arm7t"
- run_dump_test "copro"
- }
-
- gas_test "arm3.s" "-mcpu=arm3" $stdoptlist "Arm 3 instructions"
- gas_test "arm6.s" "-mcpu=arm6" $stdoptlist "Arm 6 instructions"
- gas_test "arm7dm.s" "-mcpu=arm7dm" $stdoptlist "Arm 7DM instructions"
- gas_test "arch4t.s" "-march=armv4t" $stdoptlist "Arm architecture 4t instructions"
- gas_test "immed.s" "" $stdoptlist "immediate expressions"
- gas_test "float.s" "-mcpu=arm7tdmi -mfpu=fpa" $stdoptlist "Core floating point instructions"
- gas_test "offset.s" "" $stdoptlist "OFFSET_IMM regression"
-
- run_dump_test "armv1"
- run_dump_test "arch5tej"
- run_dump_test "fpa-monadic"
- run_dump_test "fpa-dyadic"
- run_dump_test "fpa-mem"
- run_dump_test "vfp1xD"
- run_dump_test "vfp1"
- run_dump_test "vfp2"
- run_dump_test "xscale"
- run_dump_test "adrl"
- run_dump_test "reg-alias"
- run_dump_test "maverick"
- run_dump_test "archv6"
- run_dump_test "thumbv6"
- run_dump_test "arch6zk"
-
- run_errors_test "vfp-bad" "-mfpu=vfp" "VFP errors"
- run_errors_test "req" "-mcpu=arm7m" ".req errors"
- run_errors_test "armv1-bad" "-mcpu=arm7m" "ARM v1 errors"
- run_errors_test "r15-bad" "" "Invalid use of r15 errors"
- run_errors_test "undefined" "" "Undefined local label error"
-
- if {[istarget *-*-*elf*] || [istarget *-*-linux*] || [istarget *-*-*eabi]} then {
- run_dump_test "pic"
- run_dump_test "mapping"
- gas_test "bignum1.s" "" $stdoptlist "bignums"
- run_dump_test "unwind"
- }
-
- if {! [istarget arm*-*-aout] && ![istarget arm-*-pe]} then {
- # The arm-aout port does not support Thumb mode.
- gas_test "thumb.s" "-mcpu=arm7t" $stdoptlist "Thumb instructions"
- }
-}
-
-# Not all arm targets are bi-endian, so only run this test on ones
-# we know that are. FIXME: We should probably also key off armeb/armel.
-
-if [istarget arm-*-pe] {
- run_dump_test "le-fpconst"
-
- # Since big-endian numbers have the normal format, this doesn't exist.
- #run_dump_test "be-fpconst"
-}
-if [istarget xscale-*] {
- run_dump_test "iwmmxt"
- run_errors_test "iwmmxt-bad" "-mcpu=iwmmxt" "iWMMXt errors"
+if {[istarget *arm*-*-*] || [istarget *xscale*-*-*]} {
+ run_dump_tests [lsort [glob -nocomplain $srcdir/$subdir/*.d]]
}