* gas/hppa/reloc/funcrelocbug.s: New test.

        * gas/hppa/reloc/reloc.exp: Run it.

3 files changed, 197 insertions, 0 deletions

diff --git a/gas/testsuite/ChangeLog b/gas/testsuite/ChangeLog
index 8f056d1..2d30312 100644
--- a/gas/testsuite/ChangeLog
+++ b/gas/testsuite/ChangeLog
@@ -1,3 +1,13 @@
+Sun Mar 27 14:05:33 1994  Jeffrey A. Law  (law@snake.cs.utah.edu)
+
+	* gas/hppa/reloc/funcrelocbug.s: New test.
+	* gas/hppa/reloc/reloc.exp: Run it.
+
+Thu Mar 17 13:38:04 1994  Jeffrey A. Law  (law@snake.cs.utah.edu)
+
+	* gas/hppa/unsorted/importbug.s: New test.
+	* gas/hppa/unsorted/unsorted.exp: Run it.
+
 Wed Mar 16 11:57:07 1994  Jeffrey A. Law  (law@snake.cs.utah.edu)
 
 	* gas/hppa/more.parse/regpopbug.s: Add trivial .equ test.
diff --git a/gas/testsuite/gas/hppa/reloc/.Sanitize b/gas/testsuite/gas/hppa/reloc/.Sanitize
index dc2b081..363861a 100644
--- a/gas/testsuite/gas/hppa/reloc/.Sanitize
+++ b/gas/testsuite/gas/hppa/reloc/.Sanitize
@@ -30,6 +30,7 @@ blebug.s
 blebug2.s
 exitbug.s
 fixupbug.s
+funcrelocbug.s
 labelopbug.s
 plabelbug.s
 reloc.exp
diff --git a/gas/testsuite/gas/hppa/reloc/funcrelocbug.s b/gas/testsuite/gas/hppa/reloc/funcrelocbug.s
new file mode 100644
index 0000000..87c3a66
--- /dev/null
+++ b/gas/testsuite/gas/hppa/reloc/funcrelocbug.s
@@ -0,0 +1,186 @@
+	.SPACE $PRIVATE$
+	.SUBSPA $DATA$,QUAD=1,ALIGN=8,ACCESS=31
+	.SUBSPA $BSS$,QUAD=1,ALIGN=8,ACCESS=31,ZERO,SORT=82
+	.SPACE $TEXT$
+	.SUBSPA $LIT$,QUAD=0,ALIGN=8,ACCESS=44
+	.SUBSPA $CODE$,QUAD=0,ALIGN=8,ACCESS=44,CODE_ONLY
+	.IMPORT $global$,DATA
+	.IMPORT $$dyncall,MILLICODE
+; gcc_compiled.:
+	.SPACE $TEXT$
+	.SUBSPA $CODE$
+
+	.align 4
+	.EXPORT g,CODE
+	.EXPORT g,ENTRY,PRIV_LEV=3,ARGW0=GR,ARGW1=GR,ARGW2=GR,RTNVAL=GR
+g
+	.PROC
+	.CALLINFO FRAME=128,CALLS,SAVE_RP,SAVE_SP,ENTRY_GR=3
+	.ENTRY
+	stw %r2,-20(0,%r30)
+	copy %r3,%r1
+	copy %r30,%r3
+	stwm %r1,128(0,%r30)
+	stw %r26,-36(0,%r3)
+	stw %r25,-40(0,%r3)
+	stw %r24,-44(0,%r3)
+	ldw -36(0,%r3),%r26
+	ldw -40(0,%r3),%r25
+	ldw -44(0,%r3),%r19
+	copy %r19,%r22
+	.CALL	ARGW0=GR
+	bl $$dyncall,%r31
+	copy %r31,%r2
+	copy %r28,%r19
+	comiclr,<> 0,%r19,0
+	bl,n L$0002,0
+	ldw -36(0,%r3),%r28
+	bl,n L$0001,0
+	bl,n L$0003,0
+L$0002
+	ldw -40(0,%r3),%r28
+	bl,n L$0001,0
+L$0003
+L$0001
+	ldw -20(0,%r3),%r2
+	ldo 64(%r3),%r30
+	ldwm -64(0,%r30),%r3
+	bv,n 0(%r2)
+	.EXIT
+	.PROCEND
+	.align 4
+f2___4
+	.PROC
+	.CALLINFO FRAME=64,NO_CALLS,SAVE_SP,ENTRY_GR=3
+	.ENTRY
+	copy %r3,%r1
+	copy %r30,%r3
+	stwm %r1,64(0,%r30)
+	stw %r29,8(0,%r3)
+	stw %r26,-36(0,%r3)
+	stw %r25,-40(0,%r3)
+	ldw -36(0,%r3),%r19
+	ldw -40(0,%r3),%r20
+	comclr,>= %r20,%r19,%r19
+	ldi 1,%r19
+	copy %r19,%r28
+	bl,n L$0005,0
+L$0005
+	ldo 64(%r3),%r30
+	ldwm -64(0,%r30),%r3
+	bv,n 0(%r2)
+	.EXIT
+	.PROCEND
+	.IMPORT abort,CODE
+	.SPACE $TEXT$
+	.SUBSPA $LIT$
+
+	.align 4
+L$TRAMP0000
+	ldw	36(0,%r22),%r21
+	bb,>=,n	%r21,30,.+16
+	depi	0,31,2,%r21
+	ldw	4(0,%r21),%r19
+	ldw	0(0,%r21),%r21
+	ldsid	(0,%r21),%r1
+	mtsp	%r1,%sr0
+	be	0(%sr0,%r21)
+	ldw	40(0,%r22),%r29
+	.word	0
+	.word	0
+	.SPACE $TEXT$
+	.SUBSPA $CODE$
+
+	.align 4
+	.EXPORT f,CODE
+	.EXPORT f,ENTRY,PRIV_LEV=3,RTNVAL=GR
+f
+	.PROC
+	.CALLINFO FRAME=192,CALLS,SAVE_RP,SAVE_SP,ENTRY_GR=3
+	.ENTRY
+	stw %r2,-20(0,%r30)
+	copy %r3,%r1
+	copy %r30,%r3
+	stwm %r1,192(0,%r30)
+	ldo 16(%r3),%r19
+	addil L'L$TRAMP0000-$global$,%r27
+	ldo R'L$TRAMP0000-$global$(%r1),%r22
+	ldo 40(0),%r20
+	ldws,ma 4(0,%r22),%r21
+	addib,>= -4,%r20,.-4
+	stws,ma %r21,4(0,%r19)
+	ldil L'f2___4,%r20
+	ldo R'f2___4(%r20),%r19
+	stw %r19,52(0,%r3)
+	ldo 8(%r3),%r19
+	stw %r19,56(0,%r3)
+	ldo 16(%r3),%r19
+	ldo 48(%r3),%r20
+	fdc 0(0,%r19)
+	fdc 0(0,%r20)
+	sync
+	ldo 32(%r19),%r22
+	mfsp %sr0,%r21
+	ldsid (0,%r19),%r20
+	mtsp %r20,%sr0
+	fic 0(%sr0,%r19)
+	fic 0(%sr0,%r22)
+	sync
+	mtsp %r21,%sr0
+	nop
+	nop
+	nop
+	nop
+	nop
+	nop
+	ldo 16(%r3),%r19
+	ldi 1,%r26
+	ldi 2,%r25
+	copy %r19,%r24
+	.CALL ARGW0=NO,ARGW1=NO,ARGW2=NO,ARGW3=NO
+	bl g,%r2
+	nop
+	copy %r28,%r19
+	comiclr,<> 2,%r19,0
+	bl,n L$0006,0
+	.CALL ARGW0=NO,ARGW1=NO,ARGW2=NO,ARGW3=NO
+	bl abort,%r2
+	nop
+L$0006
+L$0004
+	ldw -20(0,%r3),%r2
+	ldo 64(%r3),%r30
+	ldwm -64(0,%r30),%r3
+	bv,n 0(%r2)
+	.EXIT
+	.PROCEND
+	.IMPORT __main,CODE
+	.IMPORT exit,CODE
+	.align 4
+	.EXPORT main,CODE
+	.EXPORT main,ENTRY,PRIV_LEV=3,RTNVAL=GR
+main
+	.PROC
+	.CALLINFO FRAME=128,CALLS,SAVE_RP,SAVE_SP,ENTRY_GR=3
+	.ENTRY
+	stw %r2,-20(0,%r30)
+	copy %r3,%r1
+	copy %r30,%r3
+	stwm %r1,128(0,%r30)
+	.CALL ARGW0=NO,ARGW1=NO,ARGW2=NO,ARGW3=NO
+	bl __main,%r2
+	nop
+	.CALL ARGW0=NO,ARGW1=NO,ARGW2=NO,ARGW3=NO
+	bl f,%r2
+	nop
+	copy 0,%r26
+	.CALL ARGW0=NO,ARGW1=NO,ARGW2=NO,ARGW3=NO
+	bl exit,%r2
+	nop
+L$0007
+	ldw -20(0,%r3),%r2
+	ldo 64(%r3),%r30
+	ldwm -64(0,%r30),%r3
+	bv,n 0(%r2)
+	.EXIT
+	.PROCEND