From 109babdf4967bca199424a999d93f8e369614258 Mon Sep 17 00:00:00 2001
From: Jeff Law <law@redhat.com>
Date: Thu, 7 Jul 1994 17:59:58 +0000
Subject: [PATCH] 	* gas/hppa/reloc/relocreduce2.s: More relocation
 reduction tests. 	* gas/hppa/reloc/reloc.exp: Run them.

---
 gas/testsuite/gas/hppa/reloc/.Sanitize      |  1 +
 gas/testsuite/gas/hppa/reloc/reduce2.s      | 80 +++++++++++++++++++++
 gas/testsuite/gas/hppa/reloc/relocreduce2.s | 80 +++++++++++++++++++++
 3 files changed, 161 insertions(+)
 create mode 100644 gas/testsuite/gas/hppa/reloc/reduce2.s
 create mode 100644 gas/testsuite/gas/hppa/reloc/relocreduce2.s

diff --git a/gas/testsuite/gas/hppa/reloc/.Sanitize b/gas/testsuite/gas/hppa/reloc/.Sanitize
index 363861ad17..f9d1479a21 100644
--- a/gas/testsuite/gas/hppa/reloc/.Sanitize
+++ b/gas/testsuite/gas/hppa/reloc/.Sanitize
@@ -35,6 +35,7 @@ labelopbug.s
 plabelbug.s
 reloc.exp
 relocreduce.s
+relocreduce2.s
 roundmode.s
 selectorbug.s
 
diff --git a/gas/testsuite/gas/hppa/reloc/reduce2.s b/gas/testsuite/gas/hppa/reloc/reduce2.s
new file mode 100644
index 0000000000..2828036e0f
--- /dev/null
+++ b/gas/testsuite/gas/hppa/reloc/reduce2.s
@@ -0,0 +1,80 @@
+	.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 $LIT$
+
+	.align 8
+L$P0000
+	.word 0x12345678
+	.word 0x0
+
+	.align 8
+L$C0000
+	.word 0x3ff00000
+	.word 0x0
+	.SPACE $TEXT$
+	.SUBSPA $CODE$
+
+	.align 4
+	.EXPORT g,ENTRY,PRIV_LEV=3,RTNVAL=FR
+g
+	.PROC
+	.CALLINFO FRAME=0,NO_CALLS
+	.ENTRY
+	stw %r19,-32(0,%r30)
+	ldw T'L$C0000(%r19),%r20
+	bv 0(%r2)
+	fldds 0(0,%r20),%fr4
+	.EXIT
+	.PROCEND
+	.IMPORT abort,CODE
+	.IMPORT exit,CODE
+	.SPACE $TEXT$
+	.SUBSPA $LIT$
+
+	.align 8
+L$C0001
+	.word 0x3ff00000
+	.word 0x0
+	.SPACE $TEXT$
+	.SUBSPA $CODE$
+
+	.align 4
+	.EXPORT main,ENTRY,PRIV_LEV=3,RTNVAL=GR
+main
+	.PROC
+	.CALLINFO FRAME=128,CALLS,SAVE_RP,ENTRY_GR=3
+	.ENTRY
+	stw %r2,-20(0,%r30)
+	ldo 128(%r30),%r30
+	stw %r19,-32(0,%r30)
+	stw %r4,-128(0,%r30)
+
+	copy %r19,%r4
+	.CALL 
+	bl g,%r2
+	copy %r4,%r19
+	copy %r4,%r19
+	ldw T'L$C0001(%r19),%r20
+	fldds 0(0,%r20),%fr8
+	fcmp,dbl,= %fr4,%fr8
+	ftest
+	add,tr 0,0,0
+	bl,n L$0003,0
+	.CALL 
+	bl abort,%r2
+	nop
+L$0003
+	.CALL ARGW0=GR
+	bl exit,%r2
+	ldi 0,%r26
+	nop
+	.EXIT
+	.PROCEND
diff --git a/gas/testsuite/gas/hppa/reloc/relocreduce2.s b/gas/testsuite/gas/hppa/reloc/relocreduce2.s
new file mode 100644
index 0000000000..2828036e0f
--- /dev/null
+++ b/gas/testsuite/gas/hppa/reloc/relocreduce2.s
@@ -0,0 +1,80 @@
+	.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 $LIT$
+
+	.align 8
+L$P0000
+	.word 0x12345678
+	.word 0x0
+
+	.align 8
+L$C0000
+	.word 0x3ff00000
+	.word 0x0
+	.SPACE $TEXT$
+	.SUBSPA $CODE$
+
+	.align 4
+	.EXPORT g,ENTRY,PRIV_LEV=3,RTNVAL=FR
+g
+	.PROC
+	.CALLINFO FRAME=0,NO_CALLS
+	.ENTRY
+	stw %r19,-32(0,%r30)
+	ldw T'L$C0000(%r19),%r20
+	bv 0(%r2)
+	fldds 0(0,%r20),%fr4
+	.EXIT
+	.PROCEND
+	.IMPORT abort,CODE
+	.IMPORT exit,CODE
+	.SPACE $TEXT$
+	.SUBSPA $LIT$
+
+	.align 8
+L$C0001
+	.word 0x3ff00000
+	.word 0x0
+	.SPACE $TEXT$
+	.SUBSPA $CODE$
+
+	.align 4
+	.EXPORT main,ENTRY,PRIV_LEV=3,RTNVAL=GR
+main
+	.PROC
+	.CALLINFO FRAME=128,CALLS,SAVE_RP,ENTRY_GR=3
+	.ENTRY
+	stw %r2,-20(0,%r30)
+	ldo 128(%r30),%r30
+	stw %r19,-32(0,%r30)
+	stw %r4,-128(0,%r30)
+
+	copy %r19,%r4
+	.CALL 
+	bl g,%r2
+	copy %r4,%r19
+	copy %r4,%r19
+	ldw T'L$C0001(%r19),%r20
+	fldds 0(0,%r20),%fr8
+	fcmp,dbl,= %fr4,%fr8
+	ftest
+	add,tr 0,0,0
+	bl,n L$0003,0
+	.CALL 
+	bl abort,%r2
+	nop
+L$0003
+	.CALL ARGW0=GR
+	bl exit,%r2
+	ldi 0,%r26
+	nop
+	.EXIT
+	.PROCEND