From: Jeff Law <law@redhat.com>
Date: Thu, 17 Mar 1994 21:40:06 +0000 (+0000)
Subject:         * gas/hppa/unsorted/importbug.s: New test.
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=80b849167a970f4b0204db2e400dd692c36bfc8c;p=binutils-gdb.git

    * gas/hppa/unsorted/importbug.s: New test.
        * gas/hppa/unsorted/unsorted.exp: Run it.
---

diff --git a/gas/testsuite/gas/hppa/unsorted/.Sanitize b/gas/testsuite/gas/hppa/unsorted/.Sanitize
index 49e95ea8ff3..916cf542e0c 100644
--- a/gas/testsuite/gas/hppa/unsorted/.Sanitize
+++ b/gas/testsuite/gas/hppa/unsorted/.Sanitize
@@ -29,6 +29,7 @@ Things-to-keep:
 align3.s
 fragbug.s
 globalbug.s
+importbug.s
 labeldiffs.s
 locallabel.s
 ss_align.s
diff --git a/gas/testsuite/gas/hppa/unsorted/importbug.s b/gas/testsuite/gas/hppa/unsorted/importbug.s
new file mode 100644
index 00000000000..05eb6d2719a
--- /dev/null
+++ b/gas/testsuite/gas/hppa/unsorted/importbug.s
@@ -0,0 +1,42 @@
+	.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.:
+	.EXPORT foo,DATA
+	.SPACE $PRIVATE$
+	.SUBSPA $DATA$
+
+	.align 4
+foo:
+	.word 0
+	.IMPORT __main,CODE
+	.SPACE $TEXT$
+	.SUBSPA $CODE$
+
+	.align 4
+	.EXPORT main,CODE
+	.EXPORT main,ENTRY,PRIV_LEV=3,RTNVAL=GR
+main:
+	.PROC
+	.CALLINFO FRAME=64,CALLS,SAVE_RP,SAVE_SP,ENTRY_GR=3
+	.ENTRY
+	.import foo
+	stw %r2,-20(0,%r30)
+	copy %r3,%r1
+	copy %r30,%r3
+	stwm %r1,64(0,%r30)
+	.CALL 
+	bl __main,%r2
+	nop
+L$0001:
+	ldw -20(0,%r3),%r2
+	ldo 64(%r3),%r30
+	ldwm -64(0,%r30),%r3
+	bv,n 0(%r2)
+	.EXIT
+	.PROCEND