* gdb.asm/asm-source.exp: Set asm-arch for m6811 and m6812.

	* gdb.asm/m68hc11.inc: New file for HC11/HC12 macros.

diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog
index 05cc1804e5badf3074b92c54a829f686c72f05a0..433708822bfdf3d39fef834271b1d6772d048861 100644 (file)
--- a/gdb/testsuite/ChangeLog
+++ b/gdb/testsuite/ChangeLog
@@ -1,3 +1,8 @@
+2003-03-21  Stephane Carrez  <stcarrez@nerim.fr>
+
+       * gdb.asm/asm-source.exp: Set asm-arch for m6811 and m6812.
+       * gdb.asm/m68hc11.inc: New file for HC11/HC12 macros.
+
 2003-03-20  Corinna Vinschen  <vinschen@redhat.com>
 
        * gdb.base/default.exp: Fix regular expression.

diff --git a/gdb/testsuite/gdb.asm/asm-source.exp b/gdb/testsuite/gdb.asm/asm-source.exp
index 74c9cecc047081b4ed0fee2c381642b5a4a2a262..ac1bcd28fe05e250135518d0d36b25d14aa30b32 100644 (file)
--- a/gdb/testsuite/gdb.asm/asm-source.exp
+++ b/gdb/testsuite/gdb.asm/asm-source.exp
@@ -60,6 +60,14 @@ if [istarget "i\[3456\]86-*-*"] then {
 if [istarget "m32r*-*"] then {
     set asm-arch m32r
 }
+if [istarget "m6811-*-*"] then {
+    set asm-arch m68hc11
+    set asm-flags "-mshort-double -m68hc11 -gdwarf2 --no-warn -I${srcdir}/${subdir} -I${objdir}/${subdir}"
+}
+if [istarget "m6812-*-*"] then {
+    set asm-arch m68hc11
+    set asm-flags "-mshort-double -m68hc12 -gdwarf2 --no-warn -I${srcdir}/${subdir} -I${objdir}/${subdir}"
+}
 if [istarget "mips*-*"] then {
     set asm-arch mips
 }

diff --git a/gdb/testsuite/gdb.asm/m68hc11.inc b/gdb/testsuite/gdb.asm/m68hc11.inc
new file mode 100644 (file)
index 0000000..90795e3
--- /dev/null
+++ b/gdb/testsuite/gdb.asm/m68hc11.inc
@@ -0,0 +1,49 @@
+       comment "subroutine prologue"
+       .macro gdbasm_enter
+        ldx     _.frame
+       pshx
+       sts     _.frame
+       .endm
+
+       comment "subroutine epilogue"
+       .macro gdbasm_leave
+        pulx
+        stx     _.frame
+       rts
+       .endm
+
+       .macro gdbasm_call subr
+       jsr     \subr
+       .endm
+
+       .macro gdbasm_several_nops
+       nop
+       nop
+       nop
+       nop
+       .endm
+
+       comment "exit (0)"
+       .macro gdbasm_exit0
+        clra
+        clrb
+        wai
+       .endm
+
+       comment "crt0 startup"
+       .macro gdbasm_startup
+        .sect .data
+        .globl _.frame
+_.frame: .word 0
+        .previous
+        lds     #0x2000
+        clr     _.frame
+        clr     _.frame+1
+       .endm
+
+       comment "Declare a data variable"
+       .macro gdbasm_datavar name value
+       .data
+\name:
+       .long   \value
+       .endm