* gdb.asm/asm-source.exp: Add "spu*-*-*" target.

* gdb.asm/spu.inc: New file.
	* gdb.base/term.exp: Disable if [target_info exists noargs].
	* gdb.gdb/complaints.exp: Disable if ![isnative].
	* gdb.gdb/selftest.exp: Likewise.
	* gdb.gdb/observer.exp: Likewise.
	* gdb.gdb/xfullpath.exp: Likewise.
	* gdb.base/attach.exp: Disable on SPU target.
	* gdb.cp/bs145503.exp: Likewise.
	* gdb.cp/exception.exp: Likewise.
	* gdb.cp/userdef.exp: Likewise.

gdb/testsuite/ChangeLog

@@ -1,3 +1,17 @@
+2006-11-22  Ulrich Weigand  <Ulrich.Weigand@de.ibm.com>
+
+	* gdb.asm/asm-source.exp: Add "spu*-*-*" target.
+	* gdb.asm/spu.inc: New file.
+	* gdb.base/term.exp: Disable if [target_info exists noargs].
+	* gdb.gdb/complaints.exp: Disable if ![isnative].
+	* gdb.gdb/selftest.exp: Likewise.
+	* gdb.gdb/observer.exp: Likewise.
+	* gdb.gdb/xfullpath.exp: Likewise.
+	* gdb.base/attach.exp: Disable on SPU target.
+	* gdb.cp/bs145503.exp: Likewise.
+	* gdb.cp/exception.exp: Likewise.
+	* gdb.cp/userdef.exp: Likewise.
+
 2006-11-22  Daniel Jacobowitz  <dan@codesourcery.com>
 
 	* gdb.stabs/weird.exp (print_weird_var): Don't send extra \n.

gdb/testsuite/gdb.asm/asm-source.exp

@@ -120,6 +120,11 @@ switch -glob -- [istarget] {
         set asm-flags "-xarch=v9 -I${srcdir}/${subdir} -I${objdir}/${subdir}"
 	set debug-flags "-gdwarf-2"
     }
+    "spu*-*-*" {
+       set asm-arch spu
+       set asm-flags "-I${srcdir}/${subdir} -I${objdir}/${subdir} --no-warn"
+       set debug-flags "-gdwarf-2"
+    }
     "xstormy16-*-*" {
         set asm-arch xstormy16
 	set debug-flags "-gdwarf-2"

gdb/testsuite/gdb.asm/spu.inc

@@ -0,0 +1,42 @@
+	comment "subroutine prologue"
+	.macro gdbasm_enter
+	stqd    $lr, 16($sp)
+	stqd    $sp, -32($sp)
+	ai      $sp, $sp, -32
+	.endm
+
+	comment "subroutine epilogue"
+	.macro gdbasm_leave
+	ai	$sp, $sp, 32
+	lqd     $lr, 16($sp)
+	bi	$lr	
+	.endm
+
+	.macro gdbasm_call subr
+	brsl	$lr, \subr
+	.endm
+
+	.macro gdbasm_several_nops
+	nop
+	nop
+	nop
+	nop
+	.endm
+
+	comment "exit (0)"
+	.macro gdbasm_exit0
+	stop	0x2000
+	stop 
+	stop 
+	stop 
+	.endm
+
+	comment "startup"
+	.macro gdbasm_startup
+	il	$0, 0
+	ila	$sp, 16368
+	stqd	$0, 0($sp)
+	stqd	$sp, -32($sp)
+	ai	$sp, $sp, -32
+	stqd	$0, 16($sp)
+	.endm

gdb/testsuite/gdb.base/attach.exp

@@ -32,6 +32,11 @@ if { [istarget "hppa*-*-hpux*"] } {
     return 0
 }
 
+# On SPU, this test currently fails because "sleep" is not supported.
+if { [istarget "spu*-*-*"] } {
+	return 0
+}
+
 # are we on a target board
 if [is_remote target] then {
     return 0

gdb/testsuite/gdb.base/term.exp

@@ -29,6 +29,11 @@ if [is_remote target] then {
     continue
 }
 
+if [target_info exists noargs] then {
+    verbose "Skipping term.exp because of noargs."
+    return
+}
+
 gdb_start
 
 #

gdb/testsuite/gdb.cp/bs15503.exp

@@ -24,6 +24,11 @@ if $tracelevel {
 
 if { [skip_cplus_tests] } { continue }
 
+# On SPU this test fails because the executable exceeds local storage size.
+if { [istarget "spu*-*-*"] } {
+        return 0
+}
+
 set testfile "bs15503"
 set srcfile ${testfile}.cc
 set binfile ${objdir}/${subdir}/${testfile}

gdb/testsuite/gdb.cp/exception.exp

@@ -44,6 +44,11 @@ if $tracelevel then {
 
 if { [skip_cplus_tests] } { continue }
 
+# On SPU this test fails because the executable exceeds local storage size.
+if { [istarget "spu*-*-*"] } {
+        return 0
+}
+
 set testfile "exception"
 set srcfile ${testfile}.cc
 set binfile ${objdir}/${subdir}/${testfile}

gdb/testsuite/gdb.cp/userdef.exp

@@ -27,6 +27,11 @@ if $tracelevel then {
 
 if { [skip_cplus_tests] } { continue }
 
+# On SPU this test fails because the executable exceeds local storage size.
+if { [istarget "spu*-*-*"] } {
+        return 0
+}
+
 set testfile "userdef"
 set srcfile ${testfile}.cc
 set binfile ${objdir}/${subdir}/${testfile}

gdb/testsuite/gdb.gdb/complaints.exp

@@ -27,7 +27,7 @@ set prms_id 0
 set bug_id 0
 
 # are we on a target board
-if [is_remote target] {
+if { [is_remote target] || ![isnative] } then {
     return
 }
 

gdb/testsuite/gdb.gdb/observer.exp

@@ -25,7 +25,7 @@ set prms_id 0
 set bug_id 0
 
 # are we on a target board
-if [is_remote target] {
+if { [is_remote target] || ![isnative] } then {
     return
 }
 

gdb/testsuite/gdb.gdb/selftest.exp

@@ -25,7 +25,7 @@ set prms_id 0
 set bug_id 0
 
 # are we on a target board
-if [is_remote target] {
+if { [is_remote target] || ![isnative] } then {
     return
 }
 

gdb/testsuite/gdb.gdb/xfullpath.exp

@@ -26,7 +26,7 @@ set prms_id 0
 set bug_id 0
 
 # are we on a target board
-if [is_remote target] {
+if { [is_remote target] || ![isnative] } then {
     return
 }