2005-07-04 Zack Weinberg <zack@codesourcery.com>

[deliverable/binutils-gdb.git] / gas / testsuite / gas / arm / arm.exp

diff --git a/gas/testsuite/gas/arm/arm.exp b/gas/testsuite/gas/arm/arm.exp
index 94a5cf9a11b5cc50a3eb55e5c0ddd5af2343b56d..56aef3b869aa54c654cdf174256cd5b02fdfcede 100644 (file)
--- a/gas/testsuite/gas/arm/arm.exp
+++ b/gas/testsuite/gas/arm/arm.exp
@@ -1,84 +1,7 @@
 #
 # 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 {
-    run_dump_test "inst"
-
-    run_dump_test "ldconst"
-
-    run_dump_test "armv1"
-
-    run_errors_test "armv1-bad" "-mcpu=arm7m" "ARM v1 errors"
-
-    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"
-
-    run_dump_test "arm7t"
-
-    if {! [istarget arm*-*-aout]} then {
-       # The arm-aout port does not support Thumb mode.
-       gas_test "thumb.s" "-mcpu=arm7t" $stdoptlist "Thumb instructions"
-    }
-
-    gas_test "arch4t.s" "-march=armv4t" $stdoptlist "Arm architecture 4t instructions"
-
-    run_dump_test "arch5tej"
-
-    gas_test "copro.s" "" $stdoptlist "Co processor instructions"
-
-    gas_test "immed.s" "" $stdoptlist "immediate expressions"
-
-    gas_test "float.s" "-mcpu=arm7tdmi" $stdoptlist "Core floating point instructions"
-
-    run_dump_test "fpa-monadic"
-
-    run_dump_test "fpa-dyadic"
-
-    run_dump_test "fpa-mem"
-
-    run_dump_test "vfp1xD"
-
-    run_dump_test "vfp1"
-
-    run_errors_test "vfp-bad" "-mfpu=vfp" "VFP errors"
-
-    run_dump_test "xscale"
-
-    run_dump_test "adrl"
-
-    run_dump_test "maverick"
-    
-    if {[istarget *-*-elf*] || [istarget *-*-linux*]} then {
-       run_dump_test "pic"
-    }
-}
-
-# 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"
+if {[istarget *arm*-*-*] || [istarget *xscale*-*-*]} {
+    run_dump_tests [lsort [glob -nocomplain $srcdir/$subdir/*.d]]
 }