Yet more hppa testuite tweaks for hppa-linux.

This commit is contained in:
Alan Modra 2000-07-10 15:21:05 +00:00
parent 46b85d4287
commit 4b6341e9d2
15 changed files with 78 additions and 56 deletions

View File

@ -1,3 +1,20 @@
2000-07-10 Alan Modra <alan@linuxcare.com.au>
* gas/vtable/vtable.exp: Disable test for hppa.
* gas/hppa/reloc/reloc.exp (do_relocation_reduction_tests): Don't
run test for any elf target.
(applybug): Don't run test for linux.
* gas/hppa/unsorted/unsorted.exp (do_common_text): Likewise.
* gas/hppa/parse/parse.exp (linesepbug): Remove xfail
(labelbug): xfail for hppa-linux.
* gas/hppa/basic/{coprmem.s, fmemLRbug.s}: Add colons to labels.
* gas/hppa/parse/{callinfobug.s, regpopbug.s}: Likewise.
* gas/hppa/reloc/{applybug.s, funcrelocbug.s, longcall.s,
r_no_reloc.s, reduce3.s}: Likewise.
* gas/hppa/unsorted/common.s: Likewise.
2000-07-05 Nick Clifton <nickc@cygnus.com>
* gas/d30v/inst.d: Fix expected results to match current assembler
@ -5,7 +22,7 @@
* gas/d30v/bittest.l: Fix expected warning messages to match
current assembler output.
2000-06-29 Kazu Hirata <kazu@hxi.com>=0A=
2000-06-29 Kazu Hirata <kazu@hxi.com>
* gas/h8300/h8300.exp (do_h8300s_mac): Change the registers used
in ldmac and stmac.
@ -2821,4 +2838,3 @@ Tue Mar 30 11:45:27 1993 Ken Raeburn (raeburn@cambridge.cygnus.com)
Mon Mar 29 00:00:00 1993 Ken Raeburn (raeburn@kr-pc.cygnus.com)
* Test suite created.

View File

@ -7,7 +7,7 @@
; immediate fields. We should also check the assorted field
; selectors to make sure they're handled correctly.
;
copr_indexing_load
copr_indexing_load:
cldwx,4 %r5(%sr0,%r4),%r26
cldwx,4,s %r5(%sr0,%r4),%r26
@ -18,7 +18,7 @@ copr_indexing_load
clddx,4,m %r5(%sr0,%r4),%r26
clddx,4,sm %r5(%sr0,%r4),%r26
copr_indexing_store
copr_indexing_store:
cstwx,4 %r26,%r5(%sr0,%r4)
cstwx,4,s %r26,%r5(%sr0,%r4)
cstwx,4,m %r26,%r5(%sr0,%r4)
@ -28,7 +28,7 @@ copr_indexing_store
cstdx,4,m %r26,%r5(%sr0,%r4)
cstdx,4,sm %r26,%r5(%sr0,%r4)
copr_short_memory
copr_short_memory:
cldws,4 0(%sr0,%r4),%r26
cldws,4,mb 0(%sr0,%r4),%r26
cldws,4,ma 0(%sr0,%r4),%r26

View File

@ -1,6 +1,6 @@
.code
.export f
f
f:
.proc
.callinfo frame=0,no_calls
.entry

View File

@ -3,5 +3,5 @@
.export divu,millicode
.proc
.callinfo millicode
divu
divu:
.procend

View File

@ -120,7 +120,6 @@ proc do_valid_align_tests {} {
if [istarget hppa*-*-*] then {
# GAS-2.0 does not always parse ! as a line separator when it should.
setup_xfail hppa*-*-*
gas_test "linesepbug.s" "" "" "line separator bug"
# Make sure GAS accepts syntax for accessing static data.
@ -200,6 +199,7 @@ if [istarget hppa*-*-*] then {
gas_test "stdreg.s" "" "" "Test standard predefined registers"
# Make sure GAS will accept a label without a colon.
setup_xfail "hppa*-*-linux*"
gas_test "labelbug.s" "" "" "Test label without colon"
# Make sure we grok # line directives.

View File

@ -1,9 +1,9 @@
.code
r0 .reg %r0
shift .reg %sar
fpreg10 .reg %fr10
shift2 .reg shift
r0: .reg %r0
shift: .reg %sar
fpreg10: .reg %fr10
shift2: .reg shift
; Make sure we didn't botch .equ...
yabba .equ r0 + shift
yabba: .equ r0 + shift

View File

@ -4,7 +4,7 @@
.data
.align 4
tab___2
tab___2:
.word L$0002
.word L$0003
.word L$0004
@ -13,7 +13,7 @@ tab___2
.align 4
.EXPORT execute,CODE
.EXPORT execute,ENTRY,PRIV_LEV=3,ARGW0=GR,RTNVAL=GR
execute
execute:
.PROC
.CALLINFO FRAME=0,NO_CALLS
.ENTRY
@ -27,7 +27,7 @@ execute
ldo R'tab___2-$global$(%r1),%r23
addil L'optab-$global$,%r27
ldo R'optab-$global$(%r1),%r20
L$0009
L$0009:
sh2add %r21,%r23,%r19
ldh 2(%r19),%r19
ldo 1(%r21),%r21
@ -35,19 +35,19 @@ L$0009
comib,>= 2,%r21,L$0009
sths,ma %r19,2(%r20)
bv,n %r0(%r2)
L$0002
L$0002:
ldi 120,%r19
stbs,ma %r19,1(%r20)
ldhs,ma 2(%r26),%r19
add %r22,%r19,%r19
bv,n %r0(%r19)
L$0003
L$0003:
ldi 121,%r19
stbs,ma %r19,1(%r20)
ldhs,ma 2(%r26),%r19
add %r22,%r19,%r19
bv,n %r0(%r19)
L$0004
L$0004:
ldi 122,%r19
stb %r19,0(%r20)
bv %r0(%r2)
@ -58,7 +58,7 @@ L$0004
.IMPORT strcmp,CODE
.align 4
L$C0000
L$C0000:
.STRING "xyxyz\x00"
.IMPORT abort,CODE
.IMPORT exit,CODE
@ -67,7 +67,7 @@ L$C0000
.align 4
.EXPORT main,CODE
.EXPORT main,ENTRY,PRIV_LEV=3,RTNVAL=GR
main
main:
.PROC
.CALLINFO FRAME=128,CALLS,SAVE_RP
.ENTRY
@ -104,7 +104,7 @@ main
.CALL
bl abort,%r2
nop
L$0011
L$0011:
.CALL ARGW0=GR
bl exit,%r2
copy %r0,%r26
@ -113,6 +113,6 @@ L$0011
.PROCEND
.data
optab .comm 10
buf .comm 10
p .comm 10
optab: .comm 10
buf: .comm 10
p: .comm 10

View File

@ -2,7 +2,7 @@
.align 4
.EXPORT g,CODE
.EXPORT g,ENTRY,PRIV_LEV=3,ARGW0=GR,ARGW1=GR,ARGW2=GR,RTNVAL=GR
g
g:
.PROC
.CALLINFO FRAME=128,CALLS,SAVE_RP,SAVE_SP,ENTRY_GR=3
.ENTRY
@ -26,11 +26,11 @@ g
ldw -36(%r3),%r28
bl,n L$0001,%r0
bl,n L$0003,%r0
L$0002
L$0002:
ldw -40(%r3),%r28
bl,n L$0001,%r0
L$0003
L$0001
L$0003:
L$0001:
ldw -20(%r3),%r2
ldo 64(%r3),%r30
ldwm -64(%r30),%r3
@ -38,7 +38,7 @@ L$0001
.EXIT
.PROCEND
.align 4
f2___4
f2___4:
.PROC
.CALLINFO FRAME=64,NO_CALLS,SAVE_SP,ENTRY_GR=3
.ENTRY
@ -54,7 +54,7 @@ f2___4
ldi 1,%r19
copy %r19,%r28
bl,n L$0005,%r0
L$0005
L$0005:
ldo 64(%r3),%r30
ldwm -64(%r30),%r3
bv,n %r0(%r2)
@ -64,7 +64,7 @@ L$0005
.data
.align 4
L$TRAMP0000
L$TRAMP0000:
ldw 36(%r22),%r21
bb,>=,n %r21,30,.+16
depi 0,31,2,%r21
@ -81,7 +81,7 @@ L$TRAMP0000
.align 4
.EXPORT f,CODE
.EXPORT f,ENTRY,PRIV_LEV=3,RTNVAL=GR
f
f:
.PROC
.CALLINFO FRAME=192,CALLS,SAVE_RP,SAVE_SP,ENTRY_GR=3
.ENTRY
@ -133,8 +133,8 @@ f
.CALL ARGW0=NO,ARGW1=NO,ARGW2=NO,ARGW3=NO
bl abort,%r2
nop
L$0006
L$0004
L$0006:
L$0004:
ldw -20(%r3),%r2
ldo 64(%r3),%r30
ldwm -64(%r30),%r3
@ -146,7 +146,7 @@ L$0004
.align 4
.EXPORT main,CODE
.EXPORT main,ENTRY,PRIV_LEV=3,RTNVAL=GR
main
main:
.PROC
.CALLINFO FRAME=128,CALLS,SAVE_RP,SAVE_SP,ENTRY_GR=3
.ENTRY
@ -164,7 +164,7 @@ main
.CALL ARGW0=NO,ARGW1=NO,ARGW2=NO,ARGW3=NO
bl exit,%r2
nop
L$0007
L$0007:
ldw -20(%r3),%r2
ldo 64(%r3),%r30
ldwm -64(%r30),%r3

View File

@ -2,7 +2,7 @@
.align 4
.EXPORT foo,CODE
.EXPORT foo,ENTRY,PRIV_LEV=3,RTNVAL=GR
foo
foo:
.PROC
.CALLINFO FRAME=64,CALLS,SAVE_RP
.ENTRY
@ -19,7 +19,7 @@ foo
.align 4
.EXPORT bar,CODE
.EXPORT bar,ENTRY,PRIV_LEV=3,RTNVAL=GR
bar
bar:
.PROC
.CALLINFO FRAME=0,NO_CALLS
.ENTRY

View File

@ -3,17 +3,17 @@
.data
.ALIGN 8
$L00DATA
$L00DATA:
.ALIGN 8
.EXPORT s
s
s:
.WORD 0x0
.BLOCKZ 786425
.BLOCKZ 7
.code
L$001.3
g .PROC
L$001.3:
g: .PROC
.CALLINFO FRAME=0,NO_CALLS
.ENTRY
;ldo 120(%r0),%r28 --> to delay slot
@ -26,10 +26,9 @@ g .PROC
.data
.ALIGN 4
.EXPORT l
l
l:
.WORD P'g
.IMPORT common,DATA ; common section, size=0
.IMPORT $global$,DATA
.EXPORT g,ENTRY,PRIV_LEV=3,RTNVAL=GR
.END

View File

@ -1,25 +1,25 @@
.data
.align 8
blah
blah:
; .double 0e+00
.word 0 ; = 0x0
.word 0 ; = 0x0
.EXPORT foo,DATA
.align 8
foo
foo:
; .double 0e+00
.word 0 ; = 0x0
.word 0 ; = 0x0
.EXPORT yabba,DATA
.align 4
yabba
yabba:
.word 1
.code
.align 4
.EXPORT bar,CODE
.EXPORT bar,ENTRY,PRIV_LEV=3,RTNVAL=GR
bar
bar:
.PROC
.CALLINFO FRAME=64,NO_CALLS,SAVE_SP,ENTRY_GR=3
.ENTRY
@ -30,7 +30,7 @@ bar
ldo R'yabba-$global$(%r1),%r19
ldi 2,%r20
stw %r20,0(%r19)
L$0001
L$0001:
ldo 64(%r3),%r30
ldwm -64(%r30),%r3
bv,n %r0(%r2)

View File

@ -65,7 +65,8 @@ proc do_relocation_reduction_tests {} {
set testname "reduce.s: Test relocation reductions (part 2)"
set x 0
if [istarget hppa*w-*-*] then {
if {[istarget hppa*w-*-*]
|| [istarget hppa*-*-*elf*] || [istarget hppa*-*-linux*]} then {
return;
}
@ -98,8 +99,6 @@ proc do_relocation_reduction_tests {} {
set testname "reduce2.s: More relocation reduction tests (part 2)"
set x 0
if {![istarget hppa*-*-*elf*] && ![istarget hppa*-*-linux*]} then {
if [gas_test_old "reduce2.s" "" "More relocation reductions (part1)"] then {
objdump_start_no_subdir "a.out" "-r"
@ -128,7 +127,6 @@ proc do_relocation_reduction_tests {} {
# Did we find what we were looking for? If not, flunk it.
if [expr $x==2] then { pass $testname } else { fail $testname }
}
set testname "reduce3.s: Test even more relocation reductions (part 2)"
set x 0
@ -615,7 +613,7 @@ proc do_apply_test {} {
set x 0
# ELF (osf) doesn't really handle extra sections too well...
if [istarget hppa*-*-*elf*] then {
if {[istarget hppa*-*-*elf*] || [istarget hppa*-*-linux*]} then {
return;
}

View File

@ -5,4 +5,4 @@ text_symbol:
.data
data_symbol:
.long 2
common_symbol .comm 4
common_symbol: .comm 4

View File

@ -192,6 +192,11 @@ proc do_import_test {} {
}
proc do_common_test {} {
# linux has a different .comm syntax
if [istarget hppa*-*-linux*] then {
return;
}
set testname "common.s: Test for bug in .comm handling (part2)"
set x 0

View File

@ -24,6 +24,10 @@ if { ([istarget "*-*-elf*"]
return
}
if {[istarget "hppa*-*-*"]} then {
return
}
# not supported by D30V
if {[istarget "d30v-*-*"]} {
return