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" ""