[RFA] gdb.asm/alpha.inc

[RFA] gdb.asm/alpha.inc

[Richard Henderson]

I assume this is ok, but I'll go ahead and wait for explicit permission.


r~


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

Index: testsuite/gdb.asm/alpha.inc
===================================================================
RCS file: testsuite/gdb.asm/alpha.inc
diff -N testsuite/gdb.asm/alpha.inc
*** /dev/null	1 Jan 1970 00:00:00 -0000
--- testsuite/gdb.asm/alpha.inc	29 May 2003 23:41:33 -0000
***************
*** 0 ****
--- 1,58 ----
+ 	comment "subroutine declare"
+ 	.macro gdbasm_declare name
+ 	.ent	\name
+ \name:
+ 	.endm
+ 
+ 	comment "subroutine prologue"
+ 	.macro gdbasm_enter
+ 	.frame	$sp, 16, $ra, 0
+ 	.mask	0x04000000, -16
+ 	ldgp	$gp, 0($27)
+ 	subq	$sp, 16, $sp
+ 	stq	$26, 0($sp)
+ 	.prologue 1
+ 	.endm
+ 
+ 	comment "subroutine epilogue"
+ 	.macro gdbasm_leave
+ 	ldq	$26, 0($sp)
+ 	addq	$sp, 16, $sp
+ 	ret
+ 	.endm
+ 
+ 	comment "subroutine end"
+ 	.macro gdbasm_end name
+ 	.end	\name
+ 	.endm
+ 
+ 	.macro gdbasm_call subr
+ 	jsr	$26, \subr
+ 	ldgp	$gp, 0($26)
+ 	.endm
+ 
+ 	.macro gdbasm_several_nops
+ 	nop
+ 	nop
+ 	nop
+ 	nop
+ 	.endm
+ 
+ 	comment "exit (0)"
+ 	.macro gdbasm_exit0
+ 	lda	$16, 0($31)
+ 	lda	$0, 1($31)
+ 	callsys
+ 	.endm
+ 
+ 	comment "crt0 startup"
+ 	.macro gdbasm_startup
+ 	ldgp	$gp, 0($27)
+ 	.endm
+ 
+ 	comment "Declare a data variable"
+ 	.macro gdbasm_datavar name value
+ 	.data
+ \name:
+ 	.long	\value
+ 	.endm
Index: testsuite/gdb.asm/asm-source.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.asm/asm-source.exp,v
retrieving revision 1.33
diff -c -p -d -r1.33 asm-source.exp
*** testsuite/gdb.asm/asm-source.exp	7 May 2003 21:52:53 -0000	1.33
--- testsuite/gdb.asm/asm-source.exp	29 May 2003 23:41:33 -0000
*************** set asm-flags ""
*** 36,41 ****
--- 36,47 ----
  set link-flags ""
  
  switch -glob -- [istarget] {
+     "alpha*-*-*" {
+         set asm-arch alpha
+ 	# ??? Won't work with ecoff systems like Tru64, but then we also
+ 	# don't have any other -g flag that creates mdebug output.
+         set asm-flags "-gdwarf2 -I${srcdir}/${subdir} -I${objdir}/${subdir}"
+     }
      "*arm-*-*" {
          set asm-arch arm
      }

Re: [RFA] gdb.asm/alpha.inc

[Daniel Jacobowitz]

On Thu, May 29, 2003 at 04:44:42PM -0700, Richard Henderson wrote:
> I assume this is ok, but I'll go ahead and wait for explicit permission.

It looks right to me too, so please go ahead.

> r~
> 
> 
> 	* gdb.asm/alpha.inc: New file.
> 	* gdb.asm/asm-source.exp: Use it.
> 
> Index: testsuite/gdb.asm/alpha.inc
> ===================================================================
> RCS file: testsuite/gdb.asm/alpha.inc
> diff -N testsuite/gdb.asm/alpha.inc
> *** /dev/null	1 Jan 1970 00:00:00 -0000
> --- testsuite/gdb.asm/alpha.inc	29 May 2003 23:41:33 -0000
> ***************
> *** 0 ****
> --- 1,58 ----
> + 	comment "subroutine declare"
> + 	.macro gdbasm_declare name
> + 	.ent	\name
> + \name:
> + 	.endm
> + 
> + 	comment "subroutine prologue"
> + 	.macro gdbasm_enter
> + 	.frame	$sp, 16, $ra, 0
> + 	.mask	0x04000000, -16
> + 	ldgp	$gp, 0($27)
> + 	subq	$sp, 16, $sp
> + 	stq	$26, 0($sp)
> + 	.prologue 1
> + 	.endm
> + 
> + 	comment "subroutine epilogue"
> + 	.macro gdbasm_leave
> + 	ldq	$26, 0($sp)
> + 	addq	$sp, 16, $sp
> + 	ret
> + 	.endm
> + 
> + 	comment "subroutine end"
> + 	.macro gdbasm_end name
> + 	.end	\name
> + 	.endm
> + 
> + 	.macro gdbasm_call subr
> + 	jsr	$26, \subr
> + 	ldgp	$gp, 0($26)
> + 	.endm
> + 
> + 	.macro gdbasm_several_nops
> + 	nop
> + 	nop
> + 	nop
> + 	nop
> + 	.endm
> + 
> + 	comment "exit (0)"
> + 	.macro gdbasm_exit0
> + 	lda	$16, 0($31)
> + 	lda	$0, 1($31)
> + 	callsys
> + 	.endm
> + 
> + 	comment "crt0 startup"
> + 	.macro gdbasm_startup
> + 	ldgp	$gp, 0($27)
> + 	.endm
> + 
> + 	comment "Declare a data variable"
> + 	.macro gdbasm_datavar name value
> + 	.data
> + \name:
> + 	.long	\value
> + 	.endm
> Index: testsuite/gdb.asm/asm-source.exp
> ===================================================================
> RCS file: /cvs/src/src/gdb/testsuite/gdb.asm/asm-source.exp,v
> retrieving revision 1.33
> diff -c -p -d -r1.33 asm-source.exp
> *** testsuite/gdb.asm/asm-source.exp	7 May 2003 21:52:53 -0000	1.33
> --- testsuite/gdb.asm/asm-source.exp	29 May 2003 23:41:33 -0000
> *************** set asm-flags ""
> *** 36,41 ****
> --- 36,47 ----
>   set link-flags ""
>   
>   switch -glob -- [istarget] {
> +     "alpha*-*-*" {
> +         set asm-arch alpha
> + 	# ??? Won't work with ecoff systems like Tru64, but then we also
> + 	# don't have any other -g flag that creates mdebug output.
> +         set asm-flags "-gdwarf2 -I${srcdir}/${subdir} -I${objdir}/${subdir}"
> +     }
>       "*arm-*-*" {
>           set asm-arch arm
>       }
> 

-- 
Daniel Jacobowitz
MontaVista Software                         Debian GNU/Linux Developer