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
*-*-linux
*aout
*]
23 && ![istarget
*-*-linux
*oldld
*] } then {
25 if {[istarget
"ia64-*"]} then {
29 if {[istarget
"hppa*64*-*-*"]} then {
33 # not supported by D30V
34 if {[istarget
"d30v-*-*"]} {
38 # not yet supported by i960
39 if {[istarget
"i960-*-*"]} {
43 run_dump_test
"symver0"
44 run_dump_test
"symver1"
45 run_error_test
"symver2" ""
46 run_error_test
"symver3" ""
47 # We have to comment out symver4 and symver5
, which check the
48 # missing version
name, since some tests in
ld/testsuite
/ld-elfvers
49 # have no version names. We cannot flag an error
for the missing
51 # run_error_test
"symver4" ""
52 # run_error_test
"symver5" ""
53 run_error_test
"symver6" ""