4 proc run_error_test { name opts } {
6 set testname "symver $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 # symver is only supported by ELF targets.
18 if { ([istarget "*-*-elf*"]
19 || [istarget "m6811-*"]
20 || [istarget "m6812-*"]
21 || [istarget "*-*-linux*"]
22 || [istarget "*-*-gnu*"])
23 && ![istarget *-*-linux*aout*]
24 && ![istarget *-*-linux*oldld*] } then {
26 if {[istarget "ia64-*"]} then {
30 if {[istarget "hppa*64*-*-*"]} then {
34 # not supported by D30V
35 if {[istarget "d30v-*-*"]} {
39 # not yet supported by i960
40 if {[istarget "i960-*-*"]} {
44 run_dump_test "symver0"
45 run_dump_test "symver1"
46 run_error_test "symver2" ""
47 run_error_test "symver3" ""
48 # We have to comment out symver4 and symver5, which check the
49 # missing version name, since some tests in ld/testsuite/ld-elfvers
50 # have no version names. We cannot flag an error for the missing
52 # run_error_test "symver4" ""
53 # run_error_test "symver5" ""
54 run_error_test "symver6" ""