testsuite/

[deliverable/binutils-gdb.git] / gdb / testsuite / lib / cell.exp

diff --git a/gdb/testsuite/lib/cell.exp b/gdb/testsuite/lib/cell.exp
index 18291c7a2b6996633a0f9ff748c8b5f2910889e4..0d63dde4b39f07e11f0bb2b969eb766d06250b6f 100644 (file)
--- a/gdb/testsuite/lib/cell.exp
+++ b/gdb/testsuite/lib/cell.exp
@@ -106,23 +106,28 @@ proc skip_cell_tests {} {
     verbose "$me:  compiling testfile $src" 2
     set compile_flags {debug nowarnings quiet}
 
+    set skip 0
     if { [gdb_compile_cell_spu $src_spu $exe_spu executable $compile_flags] != "" } {
         verbose "$me:  compiling spu binary failed, returning 1" 2
-        return [set skip_cell_tests_saved 1]
+       set skip 1
     }
-    if { [gdb_cell_embedspu $exe_spu $exe_spu-embed.o $compile_flags]  != "" } {
+    if { ! $skip && [gdb_cell_embedspu $exe_spu $exe_spu-embed.o $compile_flags]  != "" } {
         verbose "$me:  embedding spu binary failed, returning 1" 2
-        return [set skip_cell_tests_saved 1]
+       set skip 1
     }
-    if { [gdb_compile_cell_ppu [list $src $exe_spu-embed.o] $exe executable $compile_flags] != "" } {
+    if { ! $skip && [gdb_compile_cell_ppu [list $src $exe_spu-embed.o] $exe executable $compile_flags] != "" } {
         verbose "$me:  compiling ppu binary failed, returning 1" 2
-        return [set skip_cell_tests_saved 1]
+       set skip 1
     }
     file delete $src
     file delete $src_spu
     file delete $exe_spu
     file delete $exe_spu-embed.o
 
+    if { $skip } {
+        return [set skip_cell_tests_saved 1]
+    }
+
     # Compilation succeeded so now run it via gdb.
 
     gdb_exit