From 7d159115bf3af5aebfc6573c3d3a0547a19dd66e Mon Sep 17 00:00:00 2001
From: Corinna Vinschen <corinna@vinschen.de>
Date: Thu, 20 Dec 2001 22:12:20 +0000
Subject: [PATCH] 	* gdb.asm/arm.inc: New file. 	*
 gdb.asm/asm-source.exp: Add arm targets. 	* gdb.asm/configure.in: Ditto.
 	* gdb.asm/configure: Recreated from configure.in.

---
 gdb/testsuite/ChangeLog              |  7 ++++++
 gdb/testsuite/gdb.asm/arm.inc        | 34 ++++++++++++++++++++++++++++
 gdb/testsuite/gdb.asm/asm-source.exp |  6 +++++
 gdb/testsuite/gdb.asm/configure      |  2 ++
 gdb/testsuite/gdb.asm/configure.in   |  2 ++
 5 files changed, 51 insertions(+)
 create mode 100644 gdb/testsuite/gdb.asm/arm.inc

diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog
index 02d4ac1b1e..f797a3d249 100644
--- a/gdb/testsuite/ChangeLog
+++ b/gdb/testsuite/ChangeLog
@@ -1,3 +1,10 @@
+2001-12-20  Corinna Vinschen  <vinschen@redhat.com>
+
+	* gdb.asm/arm.inc: New file.
+	* gdb.asm/asm-source.exp: Add arm targets.
+	* gdb.asm/configure.in: Ditto.
+	* gdb.asm/configure: Recreated from configure.in.
+
 Thu Dec 20 09:54:36 2001  Jeffrey A Law  (law@redhat.com)
 
 	* gdb.c++/templates.exp: Use "hppa64-*-*", not "hppa2.0w-*-*"
diff --git a/gdb/testsuite/gdb.asm/arm.inc b/gdb/testsuite/gdb.asm/arm.inc
new file mode 100644
index 0000000000..701ecbf56b
--- /dev/null
+++ b/gdb/testsuite/gdb.asm/arm.inc
@@ -0,0 +1,34 @@
+	comment "subroutine prologue"
+	.macro gdbasm_enter
+	mov ip, sp
+	stmdb sp!, {fp, ip, lr, pc}
+	sub fp, ip, #4
+	.endm
+
+	comment "subroutine epilogue"
+	.macro gdbasm_leave
+	ldmea fp, {fp, sp, pc}
+	.endm
+
+	.macro gdbasm_call subr
+	bl \subr
+	.endm
+
+	.macro gdbasm_several_nops
+	nop
+	nop
+	nop
+	nop
+	.endm
+
+	comment "exit (0)"
+	.macro gdbasm_exit0
+	mov r0, #0
+	swi 0x00123456
+	.endm
+
+	comment "crt0 startup"
+	.macro gdbasm_startup
+	mov sp, #0
+	.endm
+
diff --git a/gdb/testsuite/gdb.asm/asm-source.exp b/gdb/testsuite/gdb.asm/asm-source.exp
index 1af22a496d..b240969cee 100644
--- a/gdb/testsuite/gdb.asm/asm-source.exp
+++ b/gdb/testsuite/gdb.asm/asm-source.exp
@@ -35,6 +35,12 @@ set asm-arch ""
 set asm-flags ""
 set link-flags ""
 
+if [istarget "*arm-*-*"] then {
+    set asm-arch arm
+}
+if [istarget "xscale-*-*"] then {
+    set asm-arch arm
+}
 if [istarget "d10v-*-*"] then {
     set asm-arch d10v
 }
diff --git a/gdb/testsuite/gdb.asm/configure b/gdb/testsuite/gdb.asm/configure
index eb0ac6fe9c..72945d2627 100755
--- a/gdb/testsuite/gdb.asm/configure
+++ b/gdb/testsuite/gdb.asm/configure
@@ -635,6 +635,8 @@ test "$host_alias" != "$target_alias" &&
 
 archinc=common.inc
 case ${target} in
+*arm-*-*) archinc=arm.inc ;;
+xscale-*-*) archinc=arm.inc ;;
 d10v-*-*) archinc=d10v.inc ;;
 s390-*-*) archinc=s390.inc ;;
 i[3456]86*) archinc=i386.inc ;;
diff --git a/gdb/testsuite/gdb.asm/configure.in b/gdb/testsuite/gdb.asm/configure.in
index 9b268f2335..6e3b2c5733 100644
--- a/gdb/testsuite/gdb.asm/configure.in
+++ b/gdb/testsuite/gdb.asm/configure.in
@@ -15,6 +15,8 @@ AC_CANONICAL_SYSTEM
 dnl In default case we need to link with some file so use common.inc.
 archinc=common.inc
 case ${target} in
+*arm-*-*) archinc=arm.inc ;;
+xscale-*-*) archinc=arm.inc ;;
 d10v-*-*) archinc=d10v.inc ;;
 s390-*-*) archinc=s390.inc ;;
 i[[3456]]86*) archinc=i386.inc ;;