From 81bb3443544bff4a3cc386acc5d4f1a6339967da Mon Sep 17 00:00:00 2001
From: Randolph Chung <tausq@debian.org>
Date: Tue, 25 May 2004 04:07:05 +0000
Subject: [PATCH] 2004-05-24  Randolph Chung  <tausq@debian.org>

	* gdb.asm/asm-source.exp: Enable test for hppa-linux target.
	* gdb.asm/pa.inc: New file.
---
 gdb/testsuite/ChangeLog              |  5 ++++
 gdb/testsuite/gdb.asm/asm-source.exp |  4 +++
 gdb/testsuite/gdb.asm/pa.inc         | 44 ++++++++++++++++++++++++++++
 3 files changed, 53 insertions(+)
 create mode 100644 gdb/testsuite/gdb.asm/pa.inc

diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog
index ad68efad7e..29ee7a7cbd 100644
--- a/gdb/testsuite/ChangeLog
+++ b/gdb/testsuite/ChangeLog
@@ -1,3 +1,8 @@
+2004-05-24  Randolph Chung  <tausq@debian.org>
+
+	* gdb.asm/asm-source.exp: Enable test for hppa-linux target.
+	* gdb.asm/pa.inc: New file.
+
 2004-05-22  Mark Kettenis  <kettenis@gnu.org>
 
 	* gdb.base/signull.c: Use sigjmp_buf instead of jmp_buf.
diff --git a/gdb/testsuite/gdb.asm/asm-source.exp b/gdb/testsuite/gdb.asm/asm-source.exp
index 75e64b484e..8839349522 100644
--- a/gdb/testsuite/gdb.asm/asm-source.exp
+++ b/gdb/testsuite/gdb.asm/asm-source.exp
@@ -112,6 +112,10 @@ switch -glob -- [istarget] {
         set asm-arch ia64
         set asm-flags "-gdwarf2 -I${srcdir}/${subdir} -I${objdir}/${subdir}"
     }
+    "hppa*-linux-*" {
+        set asm-arch pa
+        set asm-flags "-gdwarf2 -I${srcdir}/${subdir} -I${objdir}/${subdir}"
+    }
 }
 
 if { "${asm-arch}" == "" } {
diff --git a/gdb/testsuite/gdb.asm/pa.inc b/gdb/testsuite/gdb.asm/pa.inc
new file mode 100644
index 0000000000..d53336e316
--- /dev/null
+++ b/gdb/testsuite/gdb.asm/pa.inc
@@ -0,0 +1,44 @@
+	comment "subroutine prologue"
+	.macro gdbasm_enter
+	stw %rp, -20(%sp)
+	copy %r3, %r1
+	copy %sp, %r3
+	stwm %r1, 64(%sp)
+	.endm
+
+	comment "subroutine epilogue"
+	.macro gdbasm_leave
+	ldw -20(%r3), %rp
+	bv %r0(%rp)
+	ldwm -64(%sp), %r3
+	.endm
+
+	.macro gdbasm_call subr
+	bl	\subr , %rp
+	nop
+	.endm
+
+	.macro gdbasm_several_nops
+	nop
+	nop
+	nop
+	nop
+	.endm
+
+	comment "exit (0)"
+	.macro gdbasm_exit0
+	comment "Don't know how to exit, but this will certainly halt..."
+	ldw	0(%r0), %r1
+	.endm
+
+	comment "crt0 startup"
+	.macro gdbasm_startup
+	.align 4
+	.endm
+
+	comment "Declare a data variable"
+	.macro gdbasm_datavar name value
+	.data
+\name:
+	.long	\value
+	.endm