* 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.

diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog
index 4cf0816..68b7c95 100644 (file)
--- a/gdb/testsuite/ChangeLog
+++ b/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.

diff --git a/gdb/testsuite/gdb.asm/asm-source.exp b/gdb/testsuite/gdb.asm/asm-source.exp
index 2de43c9..3e6a4c7 100644 (file)
--- a/gdb/testsuite/gdb.asm/asm-source.exp
+++ b/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"

diff --git a/gdb/testsuite/gdb.asm/spu.inc b/gdb/testsuite/gdb.asm/spu.inc
new file mode 100644 (file)
index 0000000..aabceb8
--- /dev/null
+++ b/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

diff --git a/gdb/testsuite/gdb.base/attach.exp b/gdb/testsuite/gdb.base/attach.exp
index 8599727..8d8d0a8 100644 (file)
--- a/gdb/testsuite/gdb.base/attach.exp
+++ b/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

diff --git a/gdb/testsuite/gdb.base/term.exp b/gdb/testsuite/gdb.base/term.exp
index 0fd1cc0..5a85a35 100644 (file)
--- a/gdb/testsuite/gdb.base/term.exp
+++ b/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
 
 #

diff --git a/gdb/testsuite/gdb.cp/bs15503.exp b/gdb/testsuite/gdb.cp/bs15503.exp
index aa11ada..fe68f91 100644 (file)
--- a/gdb/testsuite/gdb.cp/bs15503.exp
+++ b/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}

diff --git a/gdb/testsuite/gdb.cp/exception.exp b/gdb/testsuite/gdb.cp/exception.exp
index 655d390..a56c8fa 100644 (file)
--- a/gdb/testsuite/gdb.cp/exception.exp
+++ b/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}

diff --git a/gdb/testsuite/gdb.cp/userdef.exp b/gdb/testsuite/gdb.cp/userdef.exp
index 782045e..d406661 100644 (file)
--- a/gdb/testsuite/gdb.cp/userdef.exp
+++ b/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}

diff --git a/gdb/testsuite/gdb.gdb/complaints.exp b/gdb/testsuite/gdb.gdb/complaints.exp
index 2dd1508..2cf142a 100644 (file)
--- a/gdb/testsuite/gdb.gdb/complaints.exp
+++ b/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
 }
 

diff --git a/gdb/testsuite/gdb.gdb/observer.exp b/gdb/testsuite/gdb.gdb/observer.exp
index b6d43b5..5b3a798 100644 (file)
--- a/gdb/testsuite/gdb.gdb/observer.exp
+++ b/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
 }
 

diff --git a/gdb/testsuite/gdb.gdb/selftest.exp b/gdb/testsuite/gdb.gdb/selftest.exp
index 4a1ef0d..201bd38 100644 (file)
--- a/gdb/testsuite/gdb.gdb/selftest.exp
+++ b/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
 }
 

diff --git a/gdb/testsuite/gdb.gdb/xfullpath.exp b/gdb/testsuite/gdb.gdb/xfullpath.exp
index 570b311..971a05e 100644 (file)
--- a/gdb/testsuite/gdb.gdb/xfullpath.exp
+++ b/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
 }