darkkirb/old-cross-binutils
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

* gas/hppa/reloc/reloc.exp (labelopbug.s): Change test to suit

Browse source 
hppa_fix_adjustable change.
This commit is contained in:
Alan Modra 2002-02-12 11:09:41 +00:00
parent 3dcfe21d78
commit 5c1e36e18c
2 changed files with 36 additions and 12 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
gas/testsuite/ChangeLog
View file

@ -1,3 +1,8 @@
2002-02-12 John David Anglin <dave@hiauly1.hia.nrc.ca>
* gas/hppa/reloc/reloc.exp (labelopbug.s): Change test to suit
hppa_fix_adjustable change.
2002-02-09 Richard Henderson <rth@redhat.com>
* gas/alpha/elf-reloc-5.s, gas/alpha/elf-reloc-5.d: New.

43
gas/testsuite/gas/hppa/reloc/reloc.exp
View file

@ -296,18 +296,37 @@ proc do_local_label_as_operand_test {} {
if [gas_test_old "labelopbug.s" "" "Local label as operand (part 1)"] {
objdump_start_no_subdir "a.out" "-r"
# Check to make sure we handle difference of local lables as an operand
# to a non-branching instruction correctly.
while 1 {
expect {
-re "^0+2c\[^\n\]*0x0+24\[^\n\]*\n"
{ set x [expr $x+1] }
-re "^0+30\[^\n\]*0x0+24\[^\n\]*\n"
{ set x [expr $x+1] }
-re "\[^\n\]*\n" { }
timeout { perror "timeout\n"; break }
eof { break }
}
# Check to make sure we handle difference of local labels as an operand
# to a non-branching instruction correctly. On hppa elf targets, the
# R_PARISC_DIR21 and R_PARISC_DIR14R relocations are done with LR and
# RR selectors, respectively. As a result, we can't reduce these to
# section offsets without risking incorrect rounding. So, we just
# check to see if the label hasn't been reduced.
if {[istarget hppa*64*-*-*]
|| [istarget hppa*-*-*elf*] || [istarget hppa*-*-linux*]} then {
while 1 {
expect {
-re "^0+2c\[^\n\]*L.0002\[^\n\]*\n"
{ set x [expr $x+1] }
-re "^0+30\[^\n\]*L.0002\[^\n\]*\n"
{ set x [expr $x+1] }
-re "\[^\n\]*\n" { }
timeout { perror "timeout\n"; break }
eof { break }
}
}
} else {
while 1 {
expect {
-re "^0+2c\[^\n\]*0x0+24\[^\n\]*\n"
{ set x [expr $x+1] }
-re "^0+30\[^\n\]*0x0+24\[^\n\]*\n"
{ set x [expr $x+1] }
-re "\[^\n\]*\n" { }
timeout { perror "timeout\n"; break }
eof { break }
}
}
}
# This was intended to do any cleanup necessary. It kinda looks like it