From: Andreas Schwab <schwab@linux-m68k.org>
Date: Mon, 7 Jul 2003 14:48:50 +0000 (+0000)
Subject: 	* gdb.asm/m68k.inc: New file.
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=2705e97210f696dc3ac667f7796644abad7d21e1;p=binutils-gdb.git

	* gdb.asm/m68k.inc: New file.
	* gdb.asm/asm-source.exp: Use it for m68k-*-*.
---

diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog
index 7894a2bddee..5e229cfbc6c 100644
--- a/gdb/testsuite/ChangeLog
+++ b/gdb/testsuite/ChangeLog
@@ -1,5 +1,8 @@
 2003-07-07  Andreas Schwab  <schwab@suse.de>
 
+	* gdb.asm/m68k.inc: New file.
+	* gdb.asm/asm-source.exp: Use it for m68k-*-*.
+
 	* gdb.objc/basicclass.exp ("Call an Objective-C method with no
 	arguments"): Also match negative number.
 
diff --git a/gdb/testsuite/gdb.asm/asm-source.exp b/gdb/testsuite/gdb.asm/asm-source.exp
index 8c3f00325ad..e482dd100d0 100644
--- a/gdb/testsuite/gdb.asm/asm-source.exp
+++ b/gdb/testsuite/gdb.asm/asm-source.exp
@@ -99,6 +99,9 @@ switch -glob -- [istarget] {
         set asm-arch v850
         set gdb_wrapper_initialized 1
     }
+    "m68k-*-*" {
+        set asm-arch m68k
+    }
 }
 
 if { "${asm-arch}" == "" } {
diff --git a/gdb/testsuite/gdb.asm/m68k.inc b/gdb/testsuite/gdb.asm/m68k.inc
new file mode 100644
index 00000000000..fadf54be544
--- /dev/null
+++ b/gdb/testsuite/gdb.asm/m68k.inc
@@ -0,0 +1,38 @@
+	comment "subroutine prologue"
+	.macro gdbasm_enter
+	link	%a6,#0
+	.endm
+
+	comment "subroutine epilogue"
+	.macro gdbasm_leave
+	unlk	%a6
+	rts
+	.endm
+
+	.macro gdbasm_call subr
+	jbsr	\subr
+	.endm
+
+	.macro gdbasm_several_nops
+	nop
+	nop
+	nop
+	nop
+	.endm
+
+	comment "exit (0)"
+	.macro gdbasm_exit0
+	illegal
+	.endm
+
+	comment "crt0 startup"
+	.macro gdbasm_startup
+	lea	0,%a6
+	.endm
+
+	comment "Declare a data variable"
+	.macro gdbasm_datavar name value
+	.data
+\name:
+	.long	\value
+	.endm