summaryrefslogtreecommitdiff
path: root/gas/testsuite/gas/sparc-solaris/addend.exp
blob: 27838c7b14f8a4201089e51935d0682e6b80b3d7 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
#
# Solaris on SPARC tests
#

if [istarget sparc*-*-solaris2*] then {
    set x1 0
    set x2 0
    set x3 0
    set x4 0
    set x5 0
    set x6 0
    set testname "addends (part 2)"
    if [gas_test_old "addend.s" "" "addends (part 1)"] then {
	objdump_start_no_subdir "a.out" "-r"
	while 1 {
	    # These are what we get using the Solaris assembler.
	    expect {
		-re "08 R_SPARC_WDISP22 +foo1\[+\]+0x0+04\[^\n\]*\n"	{ incr x1 }
		-re "0c R_SPARC_WDISP22 +foo1\[+\]+0x0+04\[^\n\]*\n"	{ incr x2 }
		-re "10 R_SPARC_WDISP22 +foo1\[^\n\]*\n"		{ incr x3 }
		-re "14 R_SPARC_WDISP22 +foo1\[^\n\]*\n"		{ incr x4 }
		-re "1c R_SPARC_32 +foo1\[^\n\]*\n"			{ incr x5 }
		-re "20 R_SPARC_32 +foo1\[+\]+0x0+04\[^\n\]*\n"		{ incr x6 }
		-re "\[^\n\]*\n"					{ }
		timeout				{ perror "timeout\n"; break }
		eof				{ break }
	    }
	}
	objdump_finish
	if [all_ones $x1 $x2 $x3 $x4 $x5 $x6] then {
	    pass $testname
	} else {
	    fail $testname
	}
    }
}