Index: gdb.arch/altivec-abi.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.arch/altivec-abi.exp,v
retrieving revision 1.8
diff -u -p -r1.8 altivec-abi.exp
--- gdb.arch/altivec-abi.exp	7 Mar 2006 15:23:31 -0000	1.8
+++ gdb.arch/altivec-abi.exp	21 Jul 2006 00:07:13 -0000
@@ -58,7 +58,8 @@ if [test_compiler_info gcc*] {
 }
 
 if  { [gdb_compile ${srcdir}/${subdir}/${srcfile} ${binfile} executable $compile_flags] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested altivec-abi.exp
+     return -1
 }
 
 gdb_start
Index: gdb.arch/altivec-regs.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.arch/altivec-regs.exp,v
retrieving revision 1.10
diff -u -p -r1.10 altivec-regs.exp
--- gdb.arch/altivec-regs.exp	7 Mar 2006 15:23:32 -0000	1.10
+++ gdb.arch/altivec-regs.exp	21 Jul 2006 00:07:14 -0000
@@ -58,7 +58,8 @@ if [test_compiler_info gcc*] {
 }
 
 if  { [gdb_compile ${srcdir}/${subdir}/${srcfile} ${binfile} executable $compile_flags] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested altivec-regs.exp
+     return -1
 }
 
 gdb_start
Index: gdb.arch/e500-abi.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.arch/e500-abi.exp,v
retrieving revision 1.2
diff -u -p -r1.2 e500-abi.exp
--- gdb.arch/e500-abi.exp	7 Mar 2006 15:23:32 -0000	1.2
+++ gdb.arch/e500-abi.exp	21 Jul 2006 00:07:14 -0000
@@ -43,7 +43,8 @@ set binfile ${objdir}/${subdir}/${testfi
 set src1 ${srcdir}/${subdir}/${testfile}.c
 
 if  { [gdb_compile ${src1} ${binfile} executable {debug nowarnings}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested e500-abi.exp
+     return -1
 }
 
 gdb_start
Index: gdb.arch/e500-regs.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.arch/e500-regs.exp,v
retrieving revision 1.5
diff -u -p -r1.5 e500-regs.exp
--- gdb.arch/e500-regs.exp	7 Mar 2006 15:23:32 -0000	1.5
+++ gdb.arch/e500-regs.exp	21 Jul 2006 00:07:14 -0000
@@ -42,7 +42,8 @@ set binfile ${objdir}/${subdir}/${testfi
 set src1 ${srcdir}/${subdir}/${testfile}.c
 
 if  { [gdb_compile ${src1} ${binfile} executable {debug nowarnings}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested e500-regs.exp
+     return -1
 }
 
 gdb_start
Index: gdb.arch/gdb1291.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.arch/gdb1291.exp,v
retrieving revision 1.2
diff -u -p -r1.2 gdb1291.exp
--- gdb.arch/gdb1291.exp	16 Feb 2004 19:04:52 -0000	1.2
+++ gdb.arch/gdb1291.exp	21 Jul 2006 00:07:14 -0000
@@ -40,7 +40,8 @@ set testfile "gdb1291"
 set srcfile ${testfile}.s
 set binfile ${objdir}/${subdir}/${testfile}
 if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable ""] != "" } {
-    gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+    untested gdb1291.exp
+    return -1
 }
 
 gdb_exit
Index: gdb.arch/gdb1431.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.arch/gdb1431.exp,v
retrieving revision 1.2
diff -u -p -r1.2 gdb1431.exp
--- gdb.arch/gdb1431.exp	26 Feb 2004 22:19:18 -0000	1.2
+++ gdb.arch/gdb1431.exp	21 Jul 2006 00:07:14 -0000
@@ -42,7 +42,8 @@ set testfile "gdb1431"
 set srcfile ${testfile}.s
 set binfile ${objdir}/${subdir}/${testfile}
 if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable ""] != "" } {
-    gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+    untested gdb1431.exp
+    return -1
 }
 
 gdb_exit
Index: gdb.arch/gdb1558.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.arch/gdb1558.exp,v
retrieving revision 1.1
diff -u -p -r1.1 gdb1558.exp
--- gdb.arch/gdb1558.exp	19 Feb 2004 22:55:50 -0000	1.1
+++ gdb.arch/gdb1558.exp	21 Jul 2006 00:07:14 -0000
@@ -39,7 +39,8 @@ set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 # Note we have to compile WITH optimization and WITHOUT debugging information to expose the bug.
 if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {"additional_flags=-O2"}] != "" } {
-    gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+    untested gdb1558.exp
+    return -1
 }
 
 gdb_exit
Index: gdb.arch/i386-prologue.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.arch/i386-prologue.exp,v
retrieving revision 1.11
diff -u -p -r1.11 i386-prologue.exp
--- gdb.arch/i386-prologue.exp	13 Feb 2006 22:33:26 -0000	1.11
+++ gdb.arch/i386-prologue.exp	21 Jul 2006 00:07:14 -0000
@@ -47,7 +47,8 @@ if [istarget "i?86-*-cygwin*"] then {
 # Don't use "debug", so that we don't have line information for the assembly
 # fragments.
 if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable [list $additional_flags]] != "" } {
-    gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+    untested i386-prologue.exp
+    return -1
 }
 
 
Index: gdb.arch/i386-unwind.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.arch/i386-unwind.exp,v
retrieving revision 1.4
diff -u -p -r1.4 i386-unwind.exp
--- gdb.arch/i386-unwind.exp	29 Jun 2004 17:52:49 -0000	1.4
+++ gdb.arch/i386-unwind.exp	21 Jul 2006 00:07:14 -0000
@@ -45,7 +45,8 @@ if [istarget "i?86-*-cygwin*"] then {
 }
 
 if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable [list debug $additional_flags]] != "" } {
-    gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+    untested i386-unwind.exp
+    return -1
 }
 
 gdb_exit
Index: gdb.asm/asm-source.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.asm/asm-source.exp,v
retrieving revision 1.63
diff -u -p -r1.63 asm-source.exp
--- gdb.asm/asm-source.exp	1 May 2006 22:21:35 -0000	1.63
+++ gdb.asm/asm-source.exp	21 Jul 2006 00:07:15 -0000
@@ -157,7 +157,8 @@ switch -glob -- [istarget] {
 }
 
 if { "${asm-arch}" == "" } {
-    gdb_suppress_entire_file "Assembly source test -- not implemented for this target."
+    untested asm-source.exp
+    return -1
 }
 
 # On NetBSD/ELF we need a special NetBSD-identifying note section.
@@ -185,7 +186,8 @@ set dest [target_info name]
 if [board_info $dest exists multilib_flags] {
 	set multilib_flags [board_info $dest multilib_flags]
 	if { "${multilib_flags}" != "" } {
-	   gdb_suppress_entire_file "Assembly source test -- multilibs not supported by this test."
+	   untested asm-source.exp
+	   return -1
 	   return;
 	 }
 }
@@ -234,10 +236,12 @@ regsub "--" "-gstabs\[+\]" "${debug-flag
 regsub "--" "-g\[0-9\]" "${debug-flags}" "" debug-flags
 
 if {[target_assemble ${srcdir}/${subdir}/${srcfile1} asmsrc1.o "${asm-flags} ${debug-flags}"] != ""} then {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested asm-source.exp
+     return -1
 }
 if {[target_assemble ${srcdir}/${subdir}/${srcfile2} asmsrc2.o "${asm-flags} ${debug-flags}"] != ""} then {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested asm-source.exp
+     return -1
 }
 
 # We deliberately don't use gdb_compile here to link together the
@@ -247,7 +251,8 @@ if {[target_assemble ${srcdir}/${subdir}
 # also avoids a lot of problems on many systems, most notably on
 # *-*-*bsd* and *-*-solaris2*.
 if {[target_link "asmsrc1.o asmsrc2.o" "${binfile}" ${link-flags}] != "" } then {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested asm-source.exp
+     return -1
 }
 
 # Restore the target board linker script for HC11/HC12.
Index: gdb.base/a2-run.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/a2-run.exp,v
retrieving revision 1.6
diff -u -p -r1.6 a2-run.exp
--- gdb.base/a2-run.exp	18 May 2006 19:34:01 -0000	1.6
+++ gdb.base/a2-run.exp	21 Jul 2006 00:07:16 -0000
@@ -39,7 +39,8 @@ set testfile "run"
 set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug}] != "" } {
-    gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+    untested a2-run.exp
+    return -1
 }
 
 gdb_exit
Index: gdb.base/advance.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/advance.exp,v
retrieving revision 1.3
diff -u -p -r1.3 advance.exp
--- gdb.base/advance.exp	3 Feb 2003 16:04:18 -0000	1.3
+++ gdb.base/advance.exp	21 Jul 2006 00:07:16 -0000
@@ -29,7 +29,8 @@ set binfile ${objdir}/${subdir}/${testfi
 
 remote_exec build "rm -f ${binfile}"
 if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug}] != "" } {
-    gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+    untested advance.exp
+    return -1
 }
 
 gdb_exit
Index: gdb.base/all-bin.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/all-bin.exp,v
retrieving revision 1.5
diff -u -p -r1.5 all-bin.exp
--- gdb.base/all-bin.exp	7 Mar 2006 15:23:32 -0000	1.5
+++ gdb.base/all-bin.exp	21 Jul 2006 00:07:16 -0000
@@ -42,7 +42,8 @@ set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug nowarnings}] != "" } {
-    gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+    untested all-bin.exp
+    return -1
     }
 
 if [get_compiler_info ${binfile}] {
Index: gdb.base/annota1.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/annota1.exp,v
retrieving revision 1.18
diff -u -p -r1.18 annota1.exp
--- gdb.base/annota1.exp	7 Mar 2006 15:23:32 -0000	1.18
+++ gdb.base/annota1.exp	21 Jul 2006 00:07:16 -0000
@@ -43,7 +43,8 @@ set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug nowarnings}] != "" } {
-    gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+    untested annota1.exp
+    return -1
 }
 
 
Index: gdb.base/annota3.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/annota3.exp,v
retrieving revision 1.8
diff -u -p -r1.8 annota3.exp
--- gdb.base/annota3.exp	17 Jul 2006 07:29:19 -0000	1.8
+++ gdb.base/annota3.exp	21 Jul 2006 00:07:16 -0000
@@ -42,7 +42,8 @@ set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug nowarnings}] != "" } {
-    gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+    untested annota3.exp
+    return -1
 }
 
 
Index: gdb.base/args.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/args.exp,v
retrieving revision 1.7
diff -u -p -r1.7 args.exp
--- gdb.base/args.exp	7 Mar 2006 15:23:32 -0000	1.7
+++ gdb.base/args.exp	21 Jul 2006 00:07:18 -0000
@@ -45,7 +45,8 @@ set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug nowarnings}] != "" } {
-    gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+    untested args.exp
+    return -1
 }
 
 #
Index: gdb.base/arithmet.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/arithmet.exp,v
retrieving revision 1.5
diff -u -p -r1.5 arithmet.exp
--- gdb.base/arithmet.exp	7 Mar 2006 15:23:32 -0000	1.5
+++ gdb.base/arithmet.exp	21 Jul 2006 00:07:18 -0000
@@ -41,7 +41,8 @@ set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug nowarnings}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested arithmet.exp
+     return -1
     }
 
 gdb_exit
Index: gdb.base/assign.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/assign.exp,v
retrieving revision 1.4
diff -u -p -r1.4 assign.exp
--- gdb.base/assign.exp	7 Mar 2006 21:40:50 -0000	1.4
+++ gdb.base/assign.exp	21 Jul 2006 00:07:18 -0000
@@ -40,7 +40,8 @@ set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug nowarnings}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested assign.exp
+     return -1
     }
 
 
Index: gdb.base/async.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/async.exp,v
retrieving revision 1.3
diff -u -p -r1.3 async.exp
--- gdb.base/async.exp	7 Mar 2006 15:23:32 -0000	1.3
+++ gdb.base/async.exp	21 Jul 2006 00:07:18 -0000
@@ -34,7 +34,8 @@ set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug nowarnings}] != "" } {
-    gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+    untested async.exp
+    return -1
 }
 
 if [get_compiler_info ${binfile}] {
Index: gdb.base/attach.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/attach.exp,v
retrieving revision 1.17
diff -u -p -r1.17 attach.exp
--- gdb.base/attach.exp	13 Jul 2004 11:19:22 -0000	1.17
+++ gdb.base/attach.exp	21 Jul 2006 00:07:18 -0000
@@ -53,13 +53,15 @@ remote_exec build "rm -f ${binfile} ${bi
 # build the first test case
 #
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug}] != "" } {
-    gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+    untested attach.exp
+    return -1
 }
 
 # Build the in-system-call test
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile2}" "${binfile2}" executable {debug}] != "" } {
-    gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+    untested attach.exp
+    return -1
 }
 
 if [get_compiler_info ${binfile}] {
Index: gdb.base/bang.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/bang.exp,v
retrieving revision 1.4
diff -u -p -r1.4 bang.exp
--- gdb.base/bang.exp	11 May 2006 13:09:58 -0000	1.4
+++ gdb.base/bang.exp	21 Jul 2006 00:07:18 -0000
@@ -26,7 +26,8 @@ set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/bang!
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug nowarnings}] != "" } {
-    gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+    untested bang.exp
+    return -1
 }
 
 gdb_exit
Index: gdb.base/bigcore.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/bigcore.exp,v
retrieving revision 1.11
diff -u -p -r1.11 bigcore.exp
--- gdb.base/bigcore.exp	13 Jun 2005 18:11:01 -0000	1.11
+++ gdb.base/bigcore.exp	21 Jul 2006 00:07:18 -0000
@@ -62,7 +62,8 @@ set binfile ${objdir}/${subdir}/${testfi
 set corefile ${objdir}/${subdir}/${testfile}.corefile
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested bigcore.exp
+     return -1
 }
 
 # Run GDB on the bigcore program up-to where it will dump core.
Index: gdb.base/bitfields.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/bitfields.exp,v
retrieving revision 1.2
diff -u -p -r1.2 bitfields.exp
--- gdb.base/bitfields.exp	6 Mar 2001 08:21:50 -0000	1.2
+++ gdb.base/bitfields.exp	21 Jul 2006 00:07:18 -0000
@@ -30,7 +30,8 @@ set testfile "bitfields"
 set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug}] != "" } {
-    gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+    untested bitfields.exp
+    return -1
 }
 
 #
Index: gdb.base/bitfields2.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/bitfields2.exp,v
retrieving revision 1.1
diff -u -p -r1.1 bitfields2.exp
--- gdb.base/bitfields2.exp	29 Nov 2004 09:11:20 -0000	1.1
+++ gdb.base/bitfields2.exp	21 Jul 2006 00:07:18 -0000
@@ -34,7 +34,8 @@ set testfile "bitfields2"
 set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug}] != "" } {
-    gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+    untested bitfields2.exp
+    return -1
 }
 
 set has_signed_bitfields 1
Index: gdb.base/break.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/break.exp,v
retrieving revision 1.23
diff -u -p -r1.23 break.exp
--- gdb.base/break.exp	13 Jun 2006 08:46:17 -0000	1.23
+++ gdb.base/break.exp	21 Jul 2006 00:07:19 -0000
@@ -38,15 +38,18 @@ set srcfile1 ${testfile}1.c
 set binfile ${objdir}/${subdir}/${testfile}
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}0.o" object {debug nowarnings}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested break.exp
+     return -1
 }
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile1}" "${binfile}1.o" object {debug nowarnings}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested break.exp
+     return -1
 }
 
 if  { [gdb_compile "${binfile}0.o ${binfile}1.o" "${binfile}" executable {debug nowarnings}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested break.exp
+     return -1
 }
 
 if [get_compiler_info ${binfile}] {
@@ -870,15 +873,18 @@ test_next_with_recursion
 set binfileo2 ${objdir}/${subdir}/${testfile}o2
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}O0.o" object {debug nowarnings optimize=-O2}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested break.exp
+     return -1
 }
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile1}" "${binfile}O1.o" object {debug nowarnings optimize=-O2}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested break.exp
+     return -1
 }
 
 if  { [gdb_compile "${binfile}O0.o ${binfile}O1.o" "${binfileo2}" executable {debug nowarnings}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested break.exp
+     return -1
 }
 
 if [get_compiler_info ${binfileo2}] {
Index: gdb.base/call-sc.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/call-sc.exp,v
retrieving revision 1.6
diff -u -p -r1.6 call-sc.exp
--- gdb.base/call-sc.exp	26 Aug 2004 18:02:59 -0000	1.6
+++ gdb.base/call-sc.exp	21 Jul 2006 00:07:21 -0000
@@ -85,7 +85,8 @@ proc start_scalars_test { type } {
 	# built the second test case since we can't use prototypes
 	warning "Prototypes not supported, rebuilding with -DNO_PROTOTYPES"
 	if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable "${flags} additional_flags=-DNO_PROTOTYPES"] != "" } {
-	    gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+	    untested call-sc.exp
+	    return -1
 	}
     }
 
Index: gdb.base/call-strs.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/call-strs.exp,v
retrieving revision 1.6
diff -u -p -r1.6 call-strs.exp
--- gdb.base/call-strs.exp	13 Sep 2002 00:43:09 -0000	1.6
+++ gdb.base/call-strs.exp	21 Jul 2006 00:07:21 -0000
@@ -43,7 +43,8 @@ if { [istarget "sparclet-*-*"] } {
 }
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug}] != "" } {
-    gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+    untested call-strs.exp
+    return -1
 }
 
 
Index: gdb.base/callfuncs.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/callfuncs.exp,v
retrieving revision 1.16
diff -u -p -r1.16 callfuncs.exp
--- gdb.base/callfuncs.exp	19 Jan 2005 16:57:48 -0000	1.16
+++ gdb.base/callfuncs.exp	21 Jul 2006 00:07:22 -0000
@@ -33,7 +33,8 @@ set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested callfuncs.exp
+     return -1
 }
 
 # Create and source the file that provides information about the compiler
Index: gdb.base/checkpoint.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/checkpoint.exp,v
retrieving revision 1.2
diff -u -p -r1.2 checkpoint.exp
--- gdb.base/checkpoint.exp	4 Jan 2006 19:29:26 -0000	1.2
+++ gdb.base/checkpoint.exp	21 Jul 2006 00:07:22 -0000
@@ -40,7 +40,8 @@ set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested checkpoint.exp
+     return -1
 }
 
 # Start with a fresh gdb
Index: gdb.base/chng-syms.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/chng-syms.exp,v
retrieving revision 1.4
diff -u -p -r1.4 chng-syms.exp
--- gdb.base/chng-syms.exp	29 Feb 2004 02:55:21 -0000	1.4
+++ gdb.base/chng-syms.exp	21 Jul 2006 00:07:22 -0000
@@ -40,7 +40,8 @@ set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug additional_flags=-DVARIABLE=var1}] != "" } {
-    gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+    untested chng-syms.exp
+    return -1
 }
 
 set oldtimeout $timeout
Index: gdb.base/code-expr.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/code-expr.exp,v
retrieving revision 1.1
diff -u -p -r1.1 code-expr.exp
--- gdb.base/code-expr.exp	21 Nov 2001 00:12:01 -0000	1.1
+++ gdb.base/code-expr.exp	21 Jul 2006 00:07:23 -0000
@@ -37,7 +37,8 @@ set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested code-expr.exp
+     return -1
 }
 
 gdb_exit
Index: gdb.base/commands.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/commands.exp,v
retrieving revision 1.16
diff -u -p -r1.16 commands.exp
--- gdb.base/commands.exp	7 Apr 2006 13:31:15 -0000	1.16
+++ gdb.base/commands.exp	21 Jul 2006 00:07:23 -0000
@@ -32,7 +32,8 @@ set testfile "run"
 set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/commands
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug additional_flags=-DFAKEARGV}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested commands.exp
+     return -1
 }
 
 gdb_exit
Index: gdb.base/completion.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/completion.exp,v
retrieving revision 1.22
diff -u -p -r1.22 completion.exp
--- gdb.base/completion.exp	7 Mar 2006 15:23:32 -0000	1.22
+++ gdb.base/completion.exp	21 Jul 2006 00:07:23 -0000
@@ -68,15 +68,18 @@ set srcfile1 ${testfile}1.c
 set binfile ${objdir}/${subdir}/${testfile}
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}0.o" object {debug nowarnings}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested completion.exp
+     return -1
 }
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile1}" "${binfile}1.o" object {debug nowarnings}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested completion.exp
+     return -1
 }
 
 if  { [gdb_compile "${binfile}0.o ${binfile}1.o" "${binfile}" executable {debug nowarnings}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested completion.exp
+     return -1
 }
 
 if [get_compiler_info ${binfile}] {
Index: gdb.base/cond-expr.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/cond-expr.exp,v
retrieving revision 1.3
diff -u -p -r1.3 cond-expr.exp
--- gdb.base/cond-expr.exp	7 Mar 2006 15:23:32 -0000	1.3
+++ gdb.base/cond-expr.exp	21 Jul 2006 00:07:23 -0000
@@ -43,7 +43,8 @@ set testfile "int-type"
 set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug nowarnings}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested cond-expr.exp
+     return -1
     }
 
 
Index: gdb.base/condbreak.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/condbreak.exp,v
retrieving revision 1.5
diff -u -p -r1.5 condbreak.exp
--- gdb.base/condbreak.exp	7 Mar 2006 15:23:32 -0000	1.5
+++ gdb.base/condbreak.exp	21 Jul 2006 00:07:23 -0000
@@ -39,15 +39,18 @@ set srcfile1 ${testfile}1.c
 set binfile ${objdir}/${subdir}/${testfile}
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}0.o" object {debug nowarnings}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested condbreak.exp
+     return -1
 }
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile1}" "${binfile}1.o" object {debug nowarnings}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested condbreak.exp
+     return -1
 }
 
 if  { [gdb_compile "${binfile}0.o ${binfile}1.o" "${binfile}" executable {debug nowarnings}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested condbreak.exp
+     return -1
 }
 
 if [get_compiler_info ${binfile}] {
Index: gdb.base/consecutive.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/consecutive.exp,v
retrieving revision 1.2
diff -u -p -r1.2 consecutive.exp
--- gdb.base/consecutive.exp	7 Mar 2006 15:23:32 -0000	1.2
+++ gdb.base/consecutive.exp	21 Jul 2006 00:07:24 -0000
@@ -36,7 +36,8 @@ set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug nowarnings}] != "" } {
-    gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+    untested consecutive.exp
+    return -1
 }
 
 if [get_compiler_info ${binfile}] {
Index: gdb.base/constvars.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/constvars.exp,v
retrieving revision 1.13
diff -u -p -r1.13 constvars.exp
--- gdb.base/constvars.exp	23 Sep 2004 18:18:58 -0000	1.13
+++ gdb.base/constvars.exp	21 Jul 2006 00:07:24 -0000
@@ -46,7 +46,8 @@ if [get_compiler_info ${binfile}] {
 }
 
 if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable debug ] != "" } {
-    gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+    untested constvars.exp
+    return -1
 }
 
 gdb_exit
Index: gdb.base/corefile.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/corefile.exp,v
retrieving revision 1.9
diff -u -p -r1.9 corefile.exp
--- gdb.base/corefile.exp	24 Feb 2004 22:58:05 -0000	1.9
+++ gdb.base/corefile.exp	21 Jul 2006 00:07:24 -0000
@@ -36,7 +36,8 @@ set testfile "coremaker"
 set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested corefile.exp
+     return -1
 }
 
 # Create and source the file that provides information about the compiler
Index: gdb.base/cvexpr.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/cvexpr.exp,v
retrieving revision 1.1
diff -u -p -r1.1 cvexpr.exp
--- gdb.base/cvexpr.exp	15 Nov 2001 02:16:59 -0000	1.1
+++ gdb.base/cvexpr.exp	21 Jul 2006 00:07:24 -0000
@@ -37,7 +37,8 @@ set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested cvexpr.exp
+     return -1
 }
 
 gdb_exit
Index: gdb.base/dbx.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/dbx.exp,v
retrieving revision 1.4
diff -u -p -r1.4 dbx.exp
--- gdb.base/dbx.exp	30 Mar 2002 23:47:18 -0000	1.4
+++ gdb.base/dbx.exp	21 Jul 2006 00:07:25 -0000
@@ -32,15 +32,18 @@ set binfile ${objdir}/${subdir}/${testfi
 
 
 if  { [gdb_compile "${srcdir}/${subdir}/average.c" "${binfile1}.o" object {debug}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested dbx.exp
+     return -1
 }
 
 if  { [gdb_compile "${srcdir}/${subdir}/sum.c" "${binfile2}.o" object {debug}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested dbx.exp
+     return -1
 }
 
 if  { [gdb_compile "${binfile1}.o ${binfile2}.o" ${binfile} executable {debug}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested dbx.exp
+     return -1
 }
 
 #
Index: gdb.base/define.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/define.exp,v
retrieving revision 1.6
diff -u -p -r1.6 define.exp
--- gdb.base/define.exp	7 Mar 2006 15:23:32 -0000	1.6
+++ gdb.base/define.exp	21 Jul 2006 00:07:26 -0000
@@ -38,15 +38,18 @@ set srcfile1 ${testfile}1.c
 set binfile ${objdir}/${subdir}/${testfile}
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}0.o" object {debug nowarnings}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested define.exp
+     return -1
 }
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile1}" "${binfile}1.o" object {debug nowarnings}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested define.exp
+     return -1
 }
 
 if  { [gdb_compile "${binfile}0.o ${binfile}1.o" "${binfile}" executable {debug nowarnings}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested define.exp
+     return -1
 }
 
 gdb_exit
Index: gdb.base/detach.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/detach.exp,v
retrieving revision 1.2
diff -u -p -r1.2 detach.exp
--- gdb.base/detach.exp	7 Aug 2003 17:55:41 -0000	1.2
+++ gdb.base/detach.exp	21 Jul 2006 00:07:26 -0000
@@ -43,7 +43,8 @@ set binfile  ${objdir}/${subdir}/${testf
 set escapedbinfile  [string_to_regexp ${objdir}/${subdir}/${testfile}]
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested detach.exp
+     return -1
 }
 
 proc do_detach_tests {} {
Index: gdb.base/display.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/display.exp,v
retrieving revision 1.7
diff -u -p -r1.7 display.exp
--- gdb.base/display.exp	7 Mar 2006 15:23:32 -0000	1.7
+++ gdb.base/display.exp	21 Jul 2006 00:07:26 -0000
@@ -32,7 +32,8 @@ set binfile  ${objdir}/${subdir}/${testf
 
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug nowarnings}] != "" } {
-    gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+    untested display.exp
+    return -1
 }
 if [target_info exists gdb_stub] {
     gdb_step_for_stub;
Index: gdb.base/dump.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/dump.exp,v
retrieving revision 1.8
diff -u -p -r1.8 dump.exp
--- gdb.base/dump.exp	9 Dec 2005 10:55:09 -0000	1.8
+++ gdb.base/dump.exp	21 Jul 2006 00:07:26 -0000
@@ -46,7 +46,8 @@ if {[istarget "ia64*-*-*"] || [istarget 
 }
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable ${options}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested dump.exp
+     return -1
 }
 
 # Start with a fresh gdb.
@@ -65,7 +66,8 @@ remote_exec build "rm -f intarr1.bin int
 # Run target program until data structs are initialized.
 
 if { ! [ runto checkpoint1 ] } then {
-    gdb_suppress_entire_file "Program failed to run, so all tests in this file will automatically fail."
+    untested dump.exp
+    return -1
 }
 
 # Now generate some dump files.
@@ -276,7 +278,8 @@ gdb_load ${binfile}
 
 # Run to main.
 if { ! [ runto_main ] } then {
-    gdb_suppress_entire_file "Program failed to run, so remaining tests in this file will automatically fail."
+    untested dump.exp
+    return -1
 }
 
 if { ![string compare $array_val \
Index: gdb.base/ena-dis-br.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/ena-dis-br.exp,v
retrieving revision 1.6
diff -u -p -r1.6 ena-dis-br.exp
--- gdb.base/ena-dis-br.exp	7 Mar 2006 15:23:32 -0000	1.6
+++ gdb.base/ena-dis-br.exp	21 Jul 2006 00:07:26 -0000
@@ -35,15 +35,18 @@ set srcfile1 ${testfile}1.c
 set binfile ${objdir}/${subdir}/${testfile}
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}0.o" object {debug nowarnings}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested ena-dis-br.exp
+     return -1
 }
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile1}" "${binfile}1.o" object {debug nowarnings}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested ena-dis-br.exp
+     return -1
 }
 
 if  { [gdb_compile "${binfile}0.o ${binfile}1.o" "${binfile}" executable {debug nowarnings}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested ena-dis-br.exp
+     return -1
 }
 
 gdb_exit
Index: gdb.base/ending-run.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/ending-run.exp,v
retrieving revision 1.23
diff -u -p -r1.23 ending-run.exp
--- gdb.base/ending-run.exp	15 Jun 2004 00:16:41 -0000	1.23
+++ gdb.base/ending-run.exp	21 Jul 2006 00:07:27 -0000
@@ -36,7 +36,8 @@ remote_exec build "rm -f core"
 
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested ending-run.exp
+     return -1
 }
 
 
Index: gdb.base/environ.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/environ.exp,v
retrieving revision 1.4
diff -u -p -r1.4 environ.exp
--- gdb.base/environ.exp	7 Mar 2006 15:23:32 -0000	1.4
+++ gdb.base/environ.exp	21 Jul 2006 00:07:27 -0000
@@ -42,15 +42,18 @@ set srcfile1 ${testfile}1.c
 set binfile ${objdir}/${subdir}/${testfile}
 
 if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}0.o" object {debug nowarnings}] != "" } {
-    gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+    untested environ.exp
+    return -1
 }
 
 if { [gdb_compile "${srcdir}/${subdir}/${srcfile1}" "${binfile}1.o" object {debug nowarnings}] != "" } {
-    gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+    untested environ.exp
+    return -1
 }
 
 if { [gdb_compile "${binfile}0.o ${binfile}1.o" "${binfile}" executable {debug nowarnings}] != "" } {
-    gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+    untested environ.exp
+    return -1
 }
 
 gdb_exit
Index: gdb.base/eval-skip.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/eval-skip.exp,v
retrieving revision 1.3
diff -u -p -r1.3 eval-skip.exp
--- gdb.base/eval-skip.exp	7 Mar 2006 15:23:32 -0000	1.3
+++ gdb.base/eval-skip.exp	21 Jul 2006 00:07:27 -0000
@@ -45,7 +45,8 @@ set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug nowarnings}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested eval-skip.exp
+     return -1
     }
 
 if [get_compiler_info $binfile] {
Index: gdb.base/exprs.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/exprs.exp,v
retrieving revision 1.7
diff -u -p -r1.7 exprs.exp
--- gdb.base/exprs.exp	15 Feb 2003 18:32:45 -0000	1.7
+++ gdb.base/exprs.exp	21 Jul 2006 00:07:27 -0000
@@ -34,7 +34,8 @@ set testfile "exprs"
 set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested exprs.exp
+     return -1
 }
 
 if [get_compiler_info ${binfile}] {
Index: gdb.base/fileio.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/fileio.exp,v
retrieving revision 1.9
diff -u -p -r1.9 fileio.exp
--- gdb.base/fileio.exp	13 Jun 2006 08:55:22 -0000	1.9
+++ gdb.base/fileio.exp	21 Jul 2006 00:07:28 -0000
@@ -37,7 +37,8 @@ set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug}] != "" } {
-    gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+    untested fileio.exp
+    return -1
 }
 
 # Create and source the file that provides information about the compiler
Index: gdb.base/finish.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/finish.exp,v
retrieving revision 1.6
diff -u -p -r1.6 finish.exp
--- gdb.base/finish.exp	2 Feb 2004 05:15:27 -0000	1.6
+++ gdb.base/finish.exp	21 Jul 2006 00:07:28 -0000
@@ -31,7 +31,8 @@ set testfile "return2"
 set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested finish.exp
+     return -1
 }
 
 proc finish_1 { type } {
@@ -101,7 +102,8 @@ proc finish_tests { } {
     global gdb_prompt
 
     if { ! [ runto_main ] } then {
-	gdb_suppress_entire_file "Run to main failed, so all tests in this file will automatically fail."
+	untested finish.exp
+	return -1
     }
 
     finish_void
Index: gdb.base/float.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/float.exp,v
retrieving revision 1.11
diff -u -p -r1.11 float.exp
--- gdb.base/float.exp	4 Apr 2006 23:17:41 -0000	1.11
+++ gdb.base/float.exp	21 Jul 2006 00:07:28 -0000
@@ -34,7 +34,8 @@ set testfile "run"
 set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug}] != "" } {
-    gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+    untested float.exp
+    return -1
 }
 
 gdb_exit
Index: gdb.base/foll-exec.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/foll-exec.exp,v
retrieving revision 1.2
diff -u -p -r1.2 foll-exec.exp
--- gdb.base/foll-exec.exp	6 Mar 2001 08:21:50 -0000	1.2
+++ gdb.base/foll-exec.exp	21 Jul 2006 00:07:28 -0000
@@ -37,11 +37,13 @@ set binfile2 ${objdir}/${subdir}/${testf
 
 # build the first test case
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile2}" "${binfile2}" executable {debug}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested foll-exec.exp
+     return -1
 }
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested foll-exec.exp
+     return -1
 }
 
 
Index: gdb.base/foll-fork.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/foll-fork.exp,v
retrieving revision 1.3
diff -u -p -r1.3 foll-fork.exp
--- gdb.base/foll-fork.exp	4 Apr 2004 20:28:20 -0000	1.3
+++ gdb.base/foll-fork.exp	21 Jul 2006 00:07:28 -0000
@@ -33,7 +33,8 @@ set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested foll-fork.exp
+     return -1
 }
 
 
Index: gdb.base/foll-vfork.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/foll-vfork.exp,v
retrieving revision 1.3
diff -u -p -r1.3 foll-vfork.exp
--- gdb.base/foll-vfork.exp	11 Dec 2002 02:04:45 -0000	1.3
+++ gdb.base/foll-vfork.exp	21 Jul 2006 00:07:28 -0000
@@ -44,11 +44,13 @@ set binfile ${objdir}/${subdir}/${testfi
 set binfile2 ${objdir}/${subdir}/${testfile2}
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested foll-vfork.exp
+     return -1
 }
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile2}" "${binfile2}" executable {debug}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested foll-vfork.exp
+     return -1
 }
 
 
Index: gdb.base/freebpcmd.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/freebpcmd.exp,v
retrieving revision 1.3
diff -u -p -r1.3 freebpcmd.exp
--- gdb.base/freebpcmd.exp	26 Dec 2005 14:44:38 -0000	1.3
+++ gdb.base/freebpcmd.exp	21 Jul 2006 00:07:29 -0000
@@ -53,7 +53,8 @@ set srcfile1 ${testfile}1.c
 set binfile ${objdir}/${subdir}/${testfile}
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested freebpcmd.exp
+     return -1
 }
 
 gdb_exit
Index: gdb.base/funcargs.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/funcargs.exp,v
retrieving revision 1.8
diff -u -p -r1.8 funcargs.exp
--- gdb.base/funcargs.exp	8 Jan 2004 07:26:50 -0000	1.8
+++ gdb.base/funcargs.exp	21 Jul 2006 00:07:30 -0000
@@ -31,7 +31,8 @@ set testfile "funcargs"
 set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested funcargs.exp
+     return -1
 }
 
 # Create and source the file that provides information about the compiler
Index: gdb.base/gcore.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/gcore.exp,v
retrieving revision 1.7
diff -u -p -r1.7 gcore.exp
--- gdb.base/gcore.exp	15 Jun 2004 00:16:42 -0000	1.7
+++ gdb.base/gcore.exp	21 Jul 2006 00:07:30 -0000
@@ -32,7 +32,8 @@ set srcfile  ${testfile}.c
 set binfile  ${objdir}/${subdir}/${testfile}
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested gcore.exp
+     return -1
 }
 
 # Start with a fresh gdb.
@@ -62,7 +63,8 @@ gdb_expect {
 }
 
 if { ! [ runto_main ] } then {
-    gdb_suppress_entire_file "Run to main failed, so all tests in this file will automatically fail."
+    untested gcore.exp
+    return -1
 }
 
 proc capture_command_output { command prefix } {
Index: gdb.base/gdb1090.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/gdb1090.exp,v
retrieving revision 1.1
diff -u -p -r1.1 gdb1090.exp
--- gdb.base/gdb1090.exp	27 Mar 2003 21:29:49 -0000	1.1
+++ gdb.base/gdb1090.exp	21 Jul 2006 00:07:30 -0000
@@ -34,7 +34,8 @@ set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested gdb1090.exp
+     return -1
 }
 
 gdb_exit
Index: gdb.base/gdb1250.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/gdb1250.exp,v
retrieving revision 1.2
diff -u -p -r1.2 gdb1250.exp
--- gdb.base/gdb1250.exp	24 Mar 2004 18:41:49 -0000	1.2
+++ gdb.base/gdb1250.exp	21 Jul 2006 00:07:30 -0000
@@ -34,7 +34,8 @@ set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested gdb1250.exp
+     return -1
 }
 
 gdb_exit
Index: gdb.base/huge.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/huge.exp,v
retrieving revision 1.3
diff -u -p -r1.3 huge.exp
--- gdb.base/huge.exp	4 Jul 2006 09:40:28 -0000	1.3
+++ gdb.base/huge.exp	21 Jul 2006 00:07:32 -0000
@@ -43,7 +43,8 @@ for { set size [expr 2 * 1024 * 1024] } 
       == "" } break
 }
 if { $size < 10 } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested huge.exp
+     return -1
 }
 
 # Start with a fresh gdb.
@@ -56,7 +57,8 @@ gdb_load ${binfile}
 set timeout 30
 
 if { ! [ runto_main ] } then {
-    gdb_suppress_entire_file "Run to main failed, so all tests in this file will automatically fail."
+    untested huge.exp
+    return -1
 }
 
 gdb_test "print a" ".1 = .0 .repeats \[0123456789\]+ times.." "print a very large data object"
Index: gdb.base/info-proc.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/info-proc.exp,v
retrieving revision 1.4
diff -u -p -r1.4 info-proc.exp
--- gdb.base/info-proc.exp	7 Mar 2006 15:23:32 -0000	1.4
+++ gdb.base/info-proc.exp	21 Jul 2006 00:07:32 -0000
@@ -35,15 +35,18 @@ set srcfile1 ${testfile}1.c
 set binfile ${objdir}/${subdir}/${testfile}
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}0.o" object {debug nowarnings}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested info-proc.exp
+     return -1
 }
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile1}" "${binfile}1.o" object {debug nowarnings}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested info-proc.exp
+     return -1
 }
 
 if  { [gdb_compile "${binfile}0.o ${binfile}1.o" "${binfile}" executable {debug nowarnings}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested info-proc.exp
+     return -1
 }
 
 # Start with a fresh gdb.
@@ -75,7 +78,8 @@ gdb_expect {
 gdb_test "info proc" "No current process.*" "info proc without a process"
 
 if { ! [ runto_main ] } then {
-    gdb_suppress_entire_file "Run to main failed, so all tests in this file will automatically fail."
+    untested info-proc.exp
+    return -1
 }
 
 gdb_test "info proc" "process ${decimal}.*" "info proc with process"
Index: gdb.base/interrupt.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/interrupt.exp,v
retrieving revision 1.7
diff -u -p -r1.7 interrupt.exp
--- gdb.base/interrupt.exp	29 Aug 2003 11:42:28 -0000	1.7
+++ gdb.base/interrupt.exp	21 Jul 2006 00:07:32 -0000
@@ -39,7 +39,8 @@ set testfile interrupt
 set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested interrupt.exp
+     return -1
 }
 
 gdb_start
Index: gdb.base/jump.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/jump.exp,v
retrieving revision 1.4
diff -u -p -r1.4 jump.exp
--- gdb.base/jump.exp	7 Mar 2006 15:23:32 -0000	1.4
+++ gdb.base/jump.exp	21 Jul 2006 00:07:32 -0000
@@ -32,7 +32,8 @@ set binfile ${objdir}/${subdir}/${testfi
 
 # Build the test case
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug nowarnings}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested jump.exp
+     return -1
     }
 
 
Index: gdb.base/langs.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/langs.exp,v
retrieving revision 1.4
diff -u -p -r1.4 langs.exp
--- gdb.base/langs.exp	26 Feb 2004 19:36:16 -0000	1.4
+++ gdb.base/langs.exp	21 Jul 2006 00:07:32 -0000
@@ -34,19 +34,23 @@ if [is_remote host] {
 
 
 if  { [gdb_compile "${srcdir}/${subdir}/langs0.c" "${binfile}0.o" object {debug}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested langs.exp
+     return -1
 }
 
 if  { [gdb_compile "${srcdir}/${subdir}/langs1.c" "${binfile}1.o" object {debug}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested langs.exp
+     return -1
 }
 
 if  { [gdb_compile "${srcdir}/${subdir}/langs2.c" "${binfile}2.o" object {debug}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested langs.exp
+     return -1
 }
 
 if  { [gdb_compile "${binfile}0.o ${binfile}1.o ${binfile}2.o" ${binfile} executable {debug}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested langs.exp
+     return -1
 }
 
 set oldtimeout $timeout
Index: gdb.base/lineinc.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/lineinc.exp,v
retrieving revision 1.1
diff -u -p -r1.1 lineinc.exp
--- gdb.base/lineinc.exp	7 May 2004 09:16:29 -0000	1.1
+++ gdb.base/lineinc.exp	21 Jul 2006 00:07:32 -0000
@@ -93,7 +93,8 @@ set binfile ${objdir}/${subdir}/${testfi
 
 
 if {[gdb_compile "${srcdir}/${subdir}/${testfile}.c" ${binfile} executable {debug}] != ""} {
-    gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+    untested lineinc.exp
+    return -1
 }
 
 gdb_exit
Index: gdb.base/list.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/list.exp,v
retrieving revision 1.11
diff -u -p -r1.11 list.exp
--- gdb.base/list.exp	19 Jan 2005 16:57:48 -0000	1.11
+++ gdb.base/list.exp	21 Jul 2006 00:07:32 -0000
@@ -35,15 +35,18 @@ remote_download host ${srcdir}/${subdir}
 
 
 if  { [gdb_compile "${srcdir}/${subdir}/list0.c" "${binfile}0.o" object {debug}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested list.exp
+     return -1
 }
 
 if  { [gdb_compile "${srcdir}/${subdir}/list1.c" "${binfile}1.o" object {debug}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested list.exp
+     return -1
 }
 
 if  { [gdb_compile "${binfile}0.o ${binfile}1.o" ${binfile} executable {debug}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested list.exp
+     return -1
 }
 
 
Index: gdb.base/logical.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/logical.exp,v
retrieving revision 1.4
diff -u -p -r1.4 logical.exp
--- gdb.base/logical.exp	7 Mar 2006 15:23:32 -0000	1.4
+++ gdb.base/logical.exp	21 Jul 2006 00:07:33 -0000
@@ -37,7 +37,8 @@ set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug nowarnings}] != "" } {
-    gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+    untested logical.exp
+    return -1
 }
 
 if [get_compiler_info ${binfile}] {
Index: gdb.base/long_long.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/long_long.exp,v
retrieving revision 1.18
diff -u -p -r1.18 long_long.exp
--- gdb.base/long_long.exp	17 Jul 2006 22:10:03 -0000	1.18
+++ gdb.base/long_long.exp	21 Jul 2006 00:07:33 -0000
@@ -45,7 +45,8 @@ if {$hp_cc_compiler} {
 }
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable [concat debug additional_flags=$flag nowarnings]] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested long_long.exp
+     return -1
 }
 
 # use this to debug:
Index: gdb.base/macscp.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/macscp.exp,v
retrieving revision 1.1
diff -u -p -r1.1 macscp.exp
--- gdb.base/macscp.exp	11 Jun 2002 20:27:50 -0000	1.1
+++ gdb.base/macscp.exp	21 Jul 2006 00:07:33 -0000
@@ -29,7 +29,8 @@ set testfile "macscp"
 set binfile ${objdir}/${subdir}/${testfile}
 
 if  {[gdb_compile "${srcdir}/${subdir}/macscp1.c" "${binfile}" executable {debug}] != "" } {
-    gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+    untested macscp.exp
+    return -1
 }
 
 gdb_exit
Index: gdb.base/maint.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/maint.exp,v
retrieving revision 1.25
diff -u -p -r1.25 maint.exp
--- gdb.base/maint.exp	7 Mar 2006 15:23:32 -0000	1.25
+++ gdb.base/maint.exp	21 Jul 2006 00:07:34 -0000
@@ -69,15 +69,18 @@ set srcfile1 ${testfile}1.c
 set binfile ${objdir}/${subdir}/${testfile}
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}0.o" object {debug nowarnings}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested maint.exp
+     return -1
 }
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile1}" "${binfile}1.o" object {debug nowarnings}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested maint.exp
+     return -1
 }
 
 if  { [gdb_compile "${binfile}0.o ${binfile}1.o" "${binfile}" executable {debug nowarnings}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested maint.exp
+     return -1
 }
 
 
Index: gdb.base/mips_pro.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/mips_pro.exp,v
retrieving revision 1.5
diff -u -p -r1.5 mips_pro.exp
--- gdb.base/mips_pro.exp	2 Dec 2003 17:53:58 -0000	1.5
+++ gdb.base/mips_pro.exp	21 Jul 2006 00:07:34 -0000
@@ -39,11 +39,13 @@ if [get_compiler_info ${binfile}] {
 
 if { [test_compiler_info gcc-*-*] } then {
     if  { [gdb_compile "${srcdir}/$subdir/${srcfile}" "${binfile}" executable {debug additional_flags=-O2}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested mips_pro.exp
+     return -1
     }
 } else {
     if  { [gdb_compile "${srcdir}/$subdir/${srcfile}" "${binfile}" executable {debug}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested mips_pro.exp
+     return -1
     }
 }
 
Index: gdb.base/miscexprs.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/miscexprs.exp,v
retrieving revision 1.7
diff -u -p -r1.7 miscexprs.exp
--- gdb.base/miscexprs.exp	7 Mar 2006 15:23:32 -0000	1.7
+++ gdb.base/miscexprs.exp	21 Jul 2006 00:07:34 -0000
@@ -52,7 +52,8 @@ set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable [list debug ${additional_flags} nowarnings]] != "" } {
-    gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+    untested miscexprs.exp
+    return -1
 }
 
 if [get_compiler_info ${binfile}] {
Index: gdb.base/multi-forks.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/multi-forks.exp,v
retrieving revision 1.4
diff -u -p -r1.4 multi-forks.exp
--- gdb.base/multi-forks.exp	27 Apr 2006 23:03:42 -0000	1.4
+++ gdb.base/multi-forks.exp	21 Jul 2006 00:07:34 -0000
@@ -37,7 +37,8 @@ set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested multi-forks.exp
+     return -1
 }
 
 # Start with a fresh gdb
Index: gdb.base/opaque.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/opaque.exp,v
retrieving revision 1.4
diff -u -p -r1.4 opaque.exp
--- gdb.base/opaque.exp	4 May 2002 15:18:21 -0000	1.4
+++ gdb.base/opaque.exp	21 Jul 2006 00:07:34 -0000
@@ -35,15 +35,18 @@ set binfile ${objdir}/${subdir}/opaque
 #}
 
 if  { [gdb_compile "${srcdir}/${subdir}/opaque0.c" "${binfile}0.o" object {debug}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested opaque.exp
+     return -1
 }
 
 if  { [gdb_compile "${srcdir}/${subdir}/opaque1.c" "${binfile}1.o" object {debug}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested opaque.exp
+     return -1
 }
 
 if  { [gdb_compile "${binfile}0.o ${binfile}1.o" ${binfile} executable {debug}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested opaque.exp
+     return -1
 }
 
 
Index: gdb.base/overlays.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/overlays.exp,v
retrieving revision 1.7
diff -u -p -r1.7 overlays.exp
--- gdb.base/overlays.exp	8 Oct 2004 18:19:18 -0000	1.7
+++ gdb.base/overlays.exp	21 Jul 2006 00:07:35 -0000
@@ -49,26 +49,33 @@ set binfile ${objdir}/${subdir}/${testfi
 set srcfile ${testfile}.c
 
 if {[gdb_compile "${srcdir}/${subdir}/${srcfile}" "${testfile}.o" object {debug}] != ""} then {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested overlays.exp
+     return -1
 }
 if {[gdb_compile "${srcdir}/${subdir}/ovlymgr.c" ovlymgr.o object {debug}] != ""} then {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested overlays.exp
+     return -1
 }
 if {[gdb_compile "${srcdir}/${subdir}/foo.c" foo.o object {debug} ] != ""} then {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested overlays.exp
+     return -1
 }
 
 if {[gdb_compile "${srcdir}/${subdir}/bar.c" bar.o object {debug}] != ""} then {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested overlays.exp
+     return -1
 }
 if {[gdb_compile "${srcdir}/${subdir}/baz.c" baz.o object {debug}] != ""} then {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested overlays.exp
+     return -1
 }
 if {[gdb_compile "${srcdir}/${subdir}/grbx.c" grbx.o object {debug}] != ""} then {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested overlays.exp
+     return -1
 }
 if  {[gdb_compile "${testfile}.o ovlymgr.o foo.o bar.o baz.o grbx.o" ${binfile} executable "ldscript=-Wl,-T$linker_script"] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested overlays.exp
+     return -1
 }
 
 remote_exec build "mv ${testfile}.o foo.o bar.o baz.o grbx.o ovlymgr.o ${objdir}/${subdir}"
Index: gdb.base/pc-fp.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/pc-fp.exp,v
retrieving revision 1.4
diff -u -p -r1.4 pc-fp.exp
--- gdb.base/pc-fp.exp	7 Mar 2006 15:23:32 -0000	1.4
+++ gdb.base/pc-fp.exp	21 Jul 2006 00:07:35 -0000
@@ -39,7 +39,8 @@ set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug nowarnings}] != "" } {
-    gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+    untested pc-fp.exp
+    return -1
 }
 
 if [get_compiler_info ${binfile}] {
Index: gdb.base/pointers.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/pointers.exp,v
retrieving revision 1.7
diff -u -p -r1.7 pointers.exp
--- gdb.base/pointers.exp	7 Mar 2006 15:23:32 -0000	1.7
+++ gdb.base/pointers.exp	21 Jul 2006 00:07:37 -0000
@@ -40,7 +40,8 @@ set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug nowarnings}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested pointers.exp
+     return -1
     }
 
 if [get_compiler_info ${binfile}] {
Index: gdb.base/printcmds.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/printcmds.exp,v
retrieving revision 1.12
diff -u -p -r1.12 printcmds.exp
--- gdb.base/printcmds.exp	26 Feb 2004 17:23:23 -0000	1.12
+++ gdb.base/printcmds.exp	21 Jul 2006 00:07:38 -0000
@@ -33,7 +33,8 @@ set testfile "printcmds"
 set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested printcmds.exp
+     return -1
 }
 
 # Set the current language to C.  This counts as a test.  If it
Index: gdb.base/psymtab.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/psymtab.exp,v
retrieving revision 1.1
diff -u -p -r1.1 psymtab.exp
--- gdb.base/psymtab.exp	3 Jan 2003 20:55:46 -0000	1.1
+++ gdb.base/psymtab.exp	21 Jul 2006 00:07:38 -0000
@@ -40,15 +40,18 @@ set testfile "psymtab"
 set binfile ${objdir}/${subdir}/${testfile}
 
 if  { [gdb_compile "${srcdir}/${subdir}/${testfile}1.c" "${testfile}1.o" object {debug}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested psymtab.exp
+     return -1
 }
 
 if  { [gdb_compile "${srcdir}/${subdir}/${testfile}2.c" "${testfile}2.o" object {debug}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested psymtab.exp
+     return -1
 }
 
 if  { [gdb_compile "${testfile}1.o ${testfile}2.o" ${binfile} executable {debug}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested psymtab.exp
+     return -1
 }
 
 # Create and source the file that provides information about the compiler
Index: gdb.base/ptype.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/ptype.exp,v
retrieving revision 1.8
diff -u -p -r1.8 ptype.exp
--- gdb.base/ptype.exp	4 Jan 2006 14:46:17 -0000	1.8
+++ gdb.base/ptype.exp	21 Jul 2006 00:07:38 -0000
@@ -36,13 +36,16 @@ set srcfile1 ${testfile}1.c
 set binfile ${objdir}/${subdir}/${testfile}
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile0}" "${binfile}0.o" object {debug}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested ptype.exp
+     return -1
 }
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile1}" "${binfile}1.o" object {debug}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested ptype.exp
+     return -1
 }
 if  { [gdb_compile "${binfile}0.o ${binfile}1.o" "${binfile}" executable {debug}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested ptype.exp
+     return -1
 }
 
 # Create and source the file that provides information about the compiler
Index: gdb.base/recurse.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/recurse.exp,v
retrieving revision 1.5
diff -u -p -r1.5 recurse.exp
--- gdb.base/recurse.exp	19 Sep 2001 08:21:17 -0000	1.5
+++ gdb.base/recurse.exp	21 Jul 2006 00:07:39 -0000
@@ -31,7 +31,8 @@ set testfile "recurse"
 set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested recurse.exp
+     return -1
 }
 
 # Start with a fresh gdb.
Index: gdb.base/relational.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/relational.exp,v
retrieving revision 1.3
diff -u -p -r1.3 relational.exp
--- gdb.base/relational.exp	7 Mar 2006 15:23:32 -0000	1.3
+++ gdb.base/relational.exp	21 Jul 2006 00:07:39 -0000
@@ -39,7 +39,8 @@ set testfile "int-type"
 set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug nowarnings}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested relational.exp
+     return -1
     }
 
 if [get_compiler_info ${binfile}] {
Index: gdb.base/relocate.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/relocate.exp,v
retrieving revision 1.6
diff -u -p -r1.6 relocate.exp
--- gdb.base/relocate.exp	17 May 2006 23:59:40 -0000	1.6
+++ gdb.base/relocate.exp	21 Jul 2006 00:07:39 -0000
@@ -30,7 +30,8 @@ set binfile ${objdir}/${subdir}/${testfi
 
 remote_exec build "rm -f ${binfile}"
 if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" object {debug}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested relocate.exp
+     return -1
 }
 
 proc get_var_address { var } {
Index: gdb.base/remote.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/remote.exp,v
retrieving revision 1.6
diff -u -p -r1.6 remote.exp
--- gdb.base/remote.exp	4 Jul 2006 09:40:28 -0000	1.6
+++ gdb.base/remote.exp	21 Jul 2006 00:07:44 -0000
@@ -38,7 +38,8 @@ gdb_start
 
 set result [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug}]
 if {$result != "" } then {
-    gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+    untested remote.exp
+    return -1
 }
 
 
Index: gdb.base/reread.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/reread.exp,v
retrieving revision 1.7
diff -u -p -r1.7 reread.exp
--- gdb.base/reread.exp	7 Mar 2006 15:23:32 -0000	1.7
+++ gdb.base/reread.exp	21 Jul 2006 00:07:44 -0000
@@ -34,7 +34,8 @@ set srcfile1 ${testfile1}.c
 set binfile1 ${objdir}/${subdir}/${testfile1}$EXEEXT
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile1}" "${binfile1}" executable {debug nowarnings}] != "" } {
-    gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+    untested reread.exp
+    return -1
 }
 
 # build the second test case
@@ -44,7 +45,8 @@ set srcfile2 ${testfile2}.c
 set binfile2 ${objdir}/${subdir}/${testfile2}$EXEEXT
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile2}" "${binfile2}" executable {debug nowarnings}] != "" } {
-    gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+    untested reread.exp
+    return -1
 }
 
 # Start with a fresh gdb.
Index: gdb.base/restore.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/restore.exp,v
retrieving revision 1.7
diff -u -p -r1.7 restore.exp
--- gdb.base/restore.exp	16 Jul 2004 22:21:52 -0000	1.7
+++ gdb.base/restore.exp	21 Jul 2006 00:07:44 -0000
@@ -34,7 +34,8 @@ set testfile "restore"
 set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug}] != "" } {
-    gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+    untested restore.exp
+    return -1
 }
 
 proc restore_tests { } {
Index: gdb.base/return.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/return.exp,v
retrieving revision 1.3
diff -u -p -r1.3 return.exp
--- gdb.base/return.exp	17 Aug 2002 10:22:01 -0000	1.3
+++ gdb.base/return.exp	21 Jul 2006 00:07:44 -0000
@@ -30,7 +30,8 @@ set testfile "return"
 set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested return.exp
+     return -1
 }
 
 proc return_tests { } {
Index: gdb.base/return2.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/return2.exp,v
retrieving revision 1.5
diff -u -p -r1.5 return2.exp
--- gdb.base/return2.exp	2 Feb 2004 05:15:27 -0000	1.5
+++ gdb.base/return2.exp	21 Jul 2006 00:07:44 -0000
@@ -30,7 +30,8 @@ set testfile "return2"
 set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested return2.exp
+     return -1
 }
 
 proc return_1 { type } {
@@ -101,7 +102,8 @@ proc return2_tests { } {
     global gdb_prompt
 
     if { ! [ runto_main ] } then {
-	gdb_suppress_entire_file "Run to main failed, so all tests in this file will automatically fail."
+	untested return2.exp
+	return -1
     }
 
     return_void
Index: gdb.base/scope.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/scope.exp,v
retrieving revision 1.11
diff -u -p -r1.11 scope.exp
--- gdb.base/scope.exp	13 Feb 2006 18:11:38 -0000	1.11
+++ gdb.base/scope.exp	21 Jul 2006 00:07:45 -0000
@@ -32,15 +32,18 @@ set binfile ${objdir}/${subdir}/${testfi
 
 
 if  { [gdb_compile "${srcdir}/${subdir}/scope0.c" "${binfile}0.o" object {debug}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested scope.exp
+     return -1
 }
 
 if  { [gdb_compile "${srcdir}/${subdir}/scope1.c" "${binfile}1.o" object {debug}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested scope.exp
+     return -1
 }
 
 if  { [gdb_compile "${binfile}0.o ${binfile}1.o" ${binfile} executable {debug}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested scope.exp
+     return -1
 }
 
 # Create and source the file that provides information about the compiler
Index: gdb.base/sect-cmd.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/sect-cmd.exp,v
retrieving revision 1.4
diff -u -p -r1.4 sect-cmd.exp
--- gdb.base/sect-cmd.exp	7 Mar 2006 15:23:32 -0000	1.4
+++ gdb.base/sect-cmd.exp	21 Jul 2006 00:07:45 -0000
@@ -44,15 +44,18 @@ set srcfile1 ${testfile}1.c
 set binfile ${objdir}/${subdir}/${testfile}
 
 if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}0.o" object {debug nowarnings}] != "" } {
-    gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+    untested sect-cmd.exp
+    return -1
 }
 
 if { [gdb_compile "${srcdir}/${subdir}/${srcfile1}" "${binfile}1.o" object {debug nowarnings}] != "" } {
-    gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+    untested sect-cmd.exp
+    return -1
 }
 
 if { [gdb_compile "${binfile}0.o ${binfile}1.o" "${binfile}" executable {debug nowarnings}] != "" } {
-    gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+    untested sect-cmd.exp
+    return -1
 }
 
 gdb_exit
Index: gdb.base/sep.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/sep.exp,v
retrieving revision 1.4
diff -u -p -r1.4 sep.exp
--- gdb.base/sep.exp	7 Mar 2006 15:23:32 -0000	1.4
+++ gdb.base/sep.exp	21 Jul 2006 00:07:45 -0000
@@ -26,7 +26,8 @@ set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug nowarnings}] != "" } {
-    gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+    untested sep.exp
+    return -1
 }
 
 gdb_exit
Index: gdb.base/sepdebug.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/sepdebug.exp,v
retrieving revision 1.3
diff -u -p -r1.3 sepdebug.exp
--- gdb.base/sepdebug.exp	7 Mar 2006 15:23:32 -0000	1.3
+++ gdb.base/sepdebug.exp	21 Jul 2006 00:07:45 -0000
@@ -43,7 +43,8 @@ set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug nowarnings}] != "" } {
-    gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+    untested sepdebug.exp
+    return -1
 }
 
 # FIXME: this is nasty. We need to check for the stabs debug format.
Index: gdb.base/setshow.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/setshow.exp,v
retrieving revision 1.3
diff -u -p -r1.3 setshow.exp
--- gdb.base/setshow.exp	20 Jan 2003 15:40:07 -0000	1.3
+++ gdb.base/setshow.exp	21 Jul 2006 00:07:46 -0000
@@ -31,7 +31,8 @@ set testfile "setshow"
 set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 if { [gdb_compile ${srcdir}/${subdir}/${srcfile} ${binfile} executable {debug}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested setshow.exp
+     return -1
 }
 
 # Start with a fresh gdb
Index: gdb.base/setvar.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/setvar.exp,v
retrieving revision 1.8
diff -u -p -r1.8 setvar.exp
--- gdb.base/setvar.exp	26 Feb 2004 17:23:23 -0000	1.8
+++ gdb.base/setvar.exp	21 Jul 2006 00:07:46 -0000
@@ -36,7 +36,8 @@ set testfile "setvar"
 set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested setvar.exp
+     return -1
 }
 
 # Create and source the file that provides information about the compiler
Index: gdb.base/sigall.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/sigall.exp,v
retrieving revision 1.2
diff -u -p -r1.2 sigall.exp
--- gdb.base/sigall.exp	6 Mar 2001 08:21:51 -0000	1.2
+++ gdb.base/sigall.exp	21 Jul 2006 00:07:47 -0000
@@ -34,7 +34,8 @@ set testfile sigall
 set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested sigall.exp
+     return -1
 }
 
 # Make the first signal SIGABRT because it is always supported.
Index: gdb.base/sigbpt.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/sigbpt.exp,v
retrieving revision 1.6
diff -u -p -r1.6 sigbpt.exp
--- gdb.base/sigbpt.exp	1 May 2006 16:39:36 -0000	1.6
+++ gdb.base/sigbpt.exp	21 Jul 2006 00:07:47 -0000
@@ -45,7 +45,8 @@ set testfile "sigbpt"
 set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug}] != "" } {
-    gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+    untested sigbpt.exp
+    return -1
 }
 
 gdb_exit
Index: gdb.base/signals.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/signals.exp,v
retrieving revision 1.10
diff -u -p -r1.10 signals.exp
--- gdb.base/signals.exp	8 Sep 2004 22:00:47 -0000	1.10
+++ gdb.base/signals.exp	21 Jul 2006 00:07:47 -0000
@@ -30,7 +30,8 @@ set testfile signals
 set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug}] != "" } {
-    gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+    untested signals.exp
+    return -1
 }
 
 # Create and source the file that provides information about the compiler
Index: gdb.base/signull.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/signull.exp,v
retrieving revision 1.5
diff -u -p -r1.5 signull.exp
--- gdb.base/signull.exp	27 Apr 2005 16:35:14 -0000	1.5
+++ gdb.base/signull.exp	21 Jul 2006 00:07:47 -0000
@@ -44,7 +44,8 @@ set testfile "signull"
 set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug}] != "" } {
-    gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+    untested signull.exp
+    return -1
 }
 
 gdb_exit
Index: gdb.base/sizeof.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/sizeof.exp,v
retrieving revision 1.8
diff -u -p -r1.8 sizeof.exp
--- gdb.base/sizeof.exp	27 Sep 2005 22:38:59 -0000	1.8
+++ gdb.base/sizeof.exp	21 Jul 2006 00:07:48 -0000
@@ -35,7 +35,8 @@ set testfile "sizeof"
 set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested sizeof.exp
+     return -1
 }
 
 if [get_compiler_info ${binfile}] {
Index: gdb.base/solib.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/solib.exp,v
retrieving revision 1.2
diff -u -p -r1.2 solib.exp
--- gdb.base/solib.exp	6 Mar 2001 08:21:51 -0000	1.2
+++ gdb.base/solib.exp	21 Jul 2006 00:07:48 -0000
@@ -45,7 +45,8 @@ set binfile ${objdir}/${subdir}/${testfi
 
 # build the first test case
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested solib.exp
+     return -1
 }
 
 if [get_compiler_info ${binfile}] {
@@ -105,7 +106,8 @@ if { [istarget "hppa*-*-hpux*"] } {
 if { [istarget "hppa*-*-hpux*"] } {
     set additional_flags "-Wl,-u,main"
     if { [gdb_compile "${binfile}_sl.sl" "${binfile}_sl" executable [list debug $additional_flags]] != "" } {
-        gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+        untested solib.exp
+        return -1
     }
 } else {
     # FIXME: need to fill this part in for non-HP build
Index: gdb.base/step-line.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/step-line.exp,v
retrieving revision 1.4
diff -u -p -r1.4 step-line.exp
--- gdb.base/step-line.exp	20 Jan 2003 15:40:07 -0000	1.4
+++ gdb.base/step-line.exp	21 Jul 2006 00:07:48 -0000
@@ -33,7 +33,8 @@ set binfile ${objdir}/${subdir}/${testfi
 
 remote_exec build "rm -f ${binfile}"
 if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested step-line.exp
+     return -1
 }
 
 gdb_exit
Index: gdb.base/step-test.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/step-test.exp,v
retrieving revision 1.8
diff -u -p -r1.8 step-test.exp
--- gdb.base/step-test.exp	13 Jul 2004 16:25:46 -0000	1.8
+++ gdb.base/step-test.exp	21 Jul 2006 00:07:48 -0000
@@ -28,7 +28,8 @@ set binfile ${objdir}/${subdir}/${testfi
 
 remote_exec build "rm -f ${binfile}"
 if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested step-test.exp
+     return -1
 }
 
 gdb_exit
Index: gdb.base/structs.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/structs.exp,v
retrieving revision 1.22
diff -u -p -r1.22 structs.exp
--- gdb.base/structs.exp	12 Oct 2005 17:56:41 -0000	1.22
+++ gdb.base/structs.exp	21 Jul 2006 00:07:49 -0000
@@ -76,7 +76,8 @@ proc start_structs_test { types } {
 	# built the second test case since we can't use prototypes
 	warning "Prototypes not supported, rebuilding with -DNO_PROTOTYPES"
 	if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable "${flags} additional_flags=-DNO_PROTOTYPES"] != "" } {
-	    gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+	    untested structs.exp
+	    return -1
 	}
     }
 
Index: gdb.base/structs2.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/structs2.exp,v
retrieving revision 1.4
diff -u -p -r1.4 structs2.exp
--- gdb.base/structs2.exp	9 Nov 2005 15:45:55 -0000	1.4
+++ gdb.base/structs2.exp	21 Jul 2006 00:07:49 -0000
@@ -40,7 +40,8 @@ if  { [gdb_compile "${srcdir}/${subdir}/
     # built the second test case since we can't use prototypes
     warning "Prototypes not supported, rebuilding with -DNO_PROTOTYPES"
     if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug additional_flags=-DNO_PROTOTYPES}] != "" } {
-	gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+	untested structs2.exp
+	return -1
     }
     set prototypes 0
 }
Index: gdb.base/term.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/term.exp,v
retrieving revision 1.3
diff -u -p -r1.3 term.exp
--- gdb.base/term.exp	14 Feb 2002 06:25:18 -0000	1.3
+++ gdb.base/term.exp	21 Jul 2006 00:07:49 -0000
@@ -41,7 +41,8 @@ set testfile "run"
 set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested term.exp
+     return -1
 }
 
 gdb_exit
Index: gdb.base/twice.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/twice.exp,v
retrieving revision 1.2
diff -u -p -r1.2 twice.exp
--- gdb.base/twice.exp	6 Mar 2001 08:21:51 -0000	1.2
+++ gdb.base/twice.exp	21 Jul 2006 00:07:49 -0000
@@ -37,7 +37,8 @@ close $fileid;
 remote_download host ${srcdir}/${subdir}/twice.c twice.c
 
 if  { [gdb_compile "${objdir}/${subdir}/${srcfile}" "${binfile}" executable $options] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested twice.exp
+     return -1
 }
 
 # Start with a fresh gdb.
Index: gdb.base/until.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/until.exp,v
retrieving revision 1.5
diff -u -p -r1.5 until.exp
--- gdb.base/until.exp	7 Mar 2006 15:23:32 -0000	1.5
+++ gdb.base/until.exp	21 Jul 2006 00:07:49 -0000
@@ -29,15 +29,18 @@ set srcfile1 ${testfile}1.c
 set binfile ${objdir}/${subdir}/${testfile}
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}0.o" object {debug nowarnings}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested until.exp
+     return -1
 }
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile1}" "${binfile}1.o" object {debug nowarnings}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested until.exp
+     return -1
 }
 
 if  { [gdb_compile "${binfile}0.o ${binfile}1.o" "${binfile}" executable {debug nowarnings}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested until.exp
+     return -1
 }
 
 gdb_exit
Index: gdb.base/varargs.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/varargs.exp,v
retrieving revision 1.3
diff -u -p -r1.3 varargs.exp
--- gdb.base/varargs.exp	6 Mar 2001 08:21:51 -0000	1.3
+++ gdb.base/varargs.exp	21 Jul 2006 00:07:50 -0000
@@ -56,7 +56,8 @@ if {$hp_cc_compiler} {
 
 # build the first test case
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug ${additional_flags}}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested varargs.exp
+     return -1
 }
 
 # Start with a fresh gdb.
Index: gdb.base/volatile.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/volatile.exp,v
retrieving revision 1.10
diff -u -p -r1.10 volatile.exp
--- gdb.base/volatile.exp	23 Sep 2004 18:18:58 -0000	1.10
+++ gdb.base/volatile.exp	21 Jul 2006 00:07:50 -0000
@@ -53,7 +53,8 @@ if [get_compiler_info ${binfile}] {
 }
 
 if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable debug ] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested volatile.exp
+     return -1
 }
 
 gdb_exit
Index: gdb.base/watchpoint.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/watchpoint.exp,v
retrieving revision 1.11
diff -u -p -r1.11 watchpoint.exp
--- gdb.base/watchpoint.exp	22 Mar 2004 14:24:18 -0000	1.11
+++ gdb.base/watchpoint.exp	21 Jul 2006 00:07:50 -0000
@@ -38,7 +38,8 @@ if [get_compiler_info ${binfile}] {
 }
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested watchpoint.exp
+     return -1
 }
 
 # Prepare for watchpoint tests by setting up two breakpoints and one
Index: gdb.base/whatis-exp.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/whatis-exp.exp,v
retrieving revision 1.3
diff -u -p -r1.3 whatis-exp.exp
--- gdb.base/whatis-exp.exp	7 Mar 2006 15:23:32 -0000	1.3
+++ gdb.base/whatis-exp.exp	21 Jul 2006 00:07:50 -0000
@@ -43,7 +43,8 @@ set testfile "int-type"
 set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug nowarnings}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested whatis-exp.exp
+     return -1
     }
 
 
Index: gdb.base/whatis.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/whatis.exp,v
retrieving revision 1.7
diff -u -p -r1.7 whatis.exp
--- gdb.base/whatis.exp	18 Feb 2006 20:01:17 -0000	1.7
+++ gdb.base/whatis.exp	21 Jul 2006 00:07:51 -0000
@@ -31,7 +31,8 @@ set testfile whatis
 set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested whatis.exp
+     return -1
 }
 
 # Create and source the file that provides information about the compiler
Index: gdb.cp/ambiguous.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.cp/ambiguous.exp,v
retrieving revision 1.3
diff -u -p -r1.3 ambiguous.exp
--- gdb.cp/ambiguous.exp	11 Feb 2004 14:01:25 -0000	1.3
+++ gdb.cp/ambiguous.exp	21 Jul 2006 00:07:51 -0000
@@ -45,7 +45,8 @@ if [get_compiler_info ${binfile} "c++"] 
 if { [test_compiler_info gcc-*] } then { continue }
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug c++}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested ambiguous.exp
+     return -1
 }
 
 
Index: gdb.cp/annota2.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.cp/annota2.exp,v
retrieving revision 1.4
diff -u -p -r1.4 annota2.exp
--- gdb.cp/annota2.exp	7 Mar 2006 15:23:32 -0000	1.4
+++ gdb.cp/annota2.exp	21 Jul 2006 00:07:51 -0000
@@ -35,7 +35,8 @@ set srcfile ${testfile}.cc
 set binfile ${objdir}/${subdir}/${testfile}
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug c++ nowarnings}] != "" } {
-    gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+    untested annota2.exp
+    return -1
 }
 
 # are we on a target board? If so, don't run these tests.
Index: gdb.cp/annota3.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.cp/annota3.exp,v
retrieving revision 1.6
diff -u -p -r1.6 annota3.exp
--- gdb.cp/annota3.exp	17 Jul 2006 07:29:47 -0000	1.6
+++ gdb.cp/annota3.exp	21 Jul 2006 00:07:52 -0000
@@ -34,7 +34,8 @@ set srcfile ${testfile}.cc
 set binfile ${objdir}/${subdir}/${testfile}
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug c++ nowarnings}] != "" } {
-    gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+    untested annota3.exp
+    return -1
 }
 
 # are we on a target board? If so, don't run these tests.
Index: gdb.cp/bool.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.cp/bool.exp,v
retrieving revision 1.1
diff -u -p -r1.1 bool.exp
--- gdb.cp/bool.exp	29 Jan 2006 21:30:17 -0000	1.1
+++ gdb.cp/bool.exp	21 Jul 2006 00:07:52 -0000
@@ -35,7 +35,8 @@ set srcfile ${testfile}.cc
 set binfile ${objdir}/${subdir}/${testfile}
 
 if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug c++}] != "" } {
-    gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+    untested bool.exp
+    return -1
 }
 
 gdb_exit
Index: gdb.cp/breakpoint.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.cp/breakpoint.exp,v
retrieving revision 1.2
diff -u -p -r1.2 breakpoint.exp
--- gdb.cp/breakpoint.exp	11 Feb 2004 18:04:14 -0000	1.2
+++ gdb.cp/breakpoint.exp	21 Jul 2006 00:07:52 -0000
@@ -35,7 +35,8 @@ set srcfile ${testfile}.cc
 set binfile ${objdir}/${subdir}/${testfile}
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug c++}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested breakpoint.exp
+     return -1
 }
 
 if [get_compiler_info ${binfile} "c++"] {
Index: gdb.cp/casts.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.cp/casts.exp,v
retrieving revision 1.2
diff -u -p -r1.2 casts.exp
--- gdb.cp/casts.exp	11 Feb 2004 14:01:25 -0000	1.2
+++ gdb.cp/casts.exp	21 Jul 2006 00:07:52 -0000
@@ -43,7 +43,8 @@ if [get_compiler_info ${binfile} "c++"] 
 }
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug c++}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested casts.exp
+     return -1
 }
 
 
Index: gdb.cp/class2.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.cp/class2.exp,v
retrieving revision 1.2
diff -u -p -r1.2 class2.exp
--- gdb.cp/class2.exp	26 Feb 2004 20:22:43 -0000	1.2
+++ gdb.cp/class2.exp	21 Jul 2006 00:07:52 -0000
@@ -34,7 +34,8 @@ if [get_compiler_info ${binfile} "c++"] 
 }
 
 if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug c++}] != "" } {
-    gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+    untested class2.exp
+    return -1
 }
 
 gdb_exit
Index: gdb.cp/classes.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.cp/classes.exp,v
retrieving revision 1.13
diff -u -p -r1.13 classes.exp
--- gdb.cp/classes.exp	13 Aug 2004 08:48:46 -0000	1.13
+++ gdb.cp/classes.exp	21 Jul 2006 00:07:52 -0000
@@ -33,7 +33,8 @@ set srcfile ${testfile}.cc
 set binfile ${objdir}/${subdir}/${testfile}
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug c++}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested classes.exp
+     return -1
 }
 
 # Test ptype of class objects.
Index: gdb.cp/cplusfuncs.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.cp/cplusfuncs.exp,v
retrieving revision 1.2
diff -u -p -r1.2 cplusfuncs.exp
--- gdb.cp/cplusfuncs.exp	11 Feb 2004 14:01:25 -0000	1.2
+++ gdb.cp/cplusfuncs.exp	21 Jul 2006 00:07:53 -0000
@@ -33,7 +33,8 @@ if { [get_compiler_info $binfile "c++"] 
 }
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug c++}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested cplusfuncs.exp
+     return -1
 }
 
 #
Index: gdb.cp/ctti.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.cp/ctti.exp,v
retrieving revision 1.7
diff -u -p -r1.7 ctti.exp
--- gdb.cp/ctti.exp	15 Aug 2004 09:17:30 -0000	1.7
+++ gdb.cp/ctti.exp	21 Jul 2006 00:07:53 -0000
@@ -40,23 +40,28 @@ set objfile3 "${testfile}3.o"
 set binfile  "${objdir}/${subdir}/${testfile}"
 
 if { [gdb_compile "$srcdir/$subdir/$srcfile" "$objdir/$subdir/$objfile" object {debug c++}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested ctti.exp
+     return -1
 }
 
 if { [gdb_compile "$srcdir/$subdir/$srcfile1" "$objdir/$subdir/$objfile1" object {debug c++}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested ctti.exp
+     return -1
 }
 
 if { [gdb_compile "$srcdir/$subdir/$srcfile2" "$objdir/$subdir/$objfile2" object {debug c++}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested ctti.exp
+     return -1
 }
 
 if { [gdb_compile "$srcdir/$subdir/$srcfile3" "$objdir/$subdir/$objfile3" object {debug c++}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested ctti.exp
+     return -1
 }
 
 if { [gdb_compile "$objdir/$subdir/$objfile $objdir/$subdir/$objfile1 $objdir/$subdir/$objfile2 $objdir/$subdir/$objfile3" "${binfile}" executable {debug c++}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested ctti.exp
+     return -1
 }
 
 if [get_compiler_info ${binfile} "c++"] {
Index: gdb.cp/derivation.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.cp/derivation.exp,v
retrieving revision 1.8
diff -u -p -r1.8 derivation.exp
--- gdb.cp/derivation.exp	9 Aug 2004 22:47:49 -0000	1.8
+++ gdb.cp/derivation.exp	21 Jul 2006 00:07:54 -0000
@@ -45,7 +45,8 @@ set srcfile ${testfile}.cc
 set binfile ${objdir}/${subdir}/${testfile}
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug c++}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested derivation.exp
+     return -1
 }
 
 gdb_exit
Index: gdb.cp/exception.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.cp/exception.exp,v
retrieving revision 1.7
diff -u -p -r1.7 exception.exp
--- gdb.cp/exception.exp	27 Apr 2005 16:35:15 -0000	1.7
+++ gdb.cp/exception.exp	21 Jul 2006 00:07:55 -0000
@@ -49,7 +49,8 @@ set srcfile ${testfile}.cc
 set binfile ${objdir}/${subdir}/${testfile}
  
 if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug c++}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested exception.exp
+     return -1
 }
 
 # Start with a fresh gdb
Index: gdb.cp/gdb1355.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.cp/gdb1355.exp,v
retrieving revision 1.1
diff -u -p -r1.1 gdb1355.exp
--- gdb.cp/gdb1355.exp	18 Sep 2003 00:04:39 -0000	1.1
+++ gdb.cp/gdb1355.exp	21 Jul 2006 00:07:55 -0000
@@ -39,7 +39,8 @@ set srcfile ${testfile}.cc
 set binfile ${objdir}/${subdir}/${testfile}
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug c++}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested gdb1355.exp
+     return -1
 }
 
 if [get_compiler_info ${binfile} "c++"] {
Index: gdb.cp/hang.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.cp/hang.exp,v
retrieving revision 1.2
diff -u -p -r1.2 hang.exp
--- gdb.cp/hang.exp	11 Feb 2004 14:01:25 -0000	1.2
+++ gdb.cp/hang.exp	21 Jul 2006 00:07:55 -0000
@@ -28,12 +28,14 @@ set binfile ${objdir}/${subdir}/${testfi
 
 foreach file {hang1 hang2 hang3} {
     if {[gdb_compile "${srcdir}/${subdir}/${file}.C" "${file}.o" object {c++ debug}] != ""} {
-        gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+        untested hang.exp
+        return -1
     }
 }
 
 if {[gdb_compile "hang1.o hang2.o hang3.o" ${binfile} executable {c++ debug}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested hang.exp
+     return -1
 }
 
 
Index: gdb.cp/inherit.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.cp/inherit.exp,v
retrieving revision 1.8
diff -u -p -r1.8 inherit.exp
--- gdb.cp/inherit.exp	1 Mar 2006 19:34:46 -0000	1.8
+++ gdb.cp/inherit.exp	21 Jul 2006 00:07:55 -0000
@@ -35,7 +35,8 @@ set srcfile misc.cc
 set binfile ${objdir}/${subdir}/${testfile}
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug c++}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested inherit.exp
+     return -1
 }
 
 # Single inheritance, print type definitions.
Index: gdb.cp/local.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.cp/local.exp,v
retrieving revision 1.6
diff -u -p -r1.6 local.exp
--- gdb.cp/local.exp	12 Mar 2004 17:46:27 -0000	1.6
+++ gdb.cp/local.exp	21 Jul 2006 00:07:55 -0000
@@ -42,7 +42,8 @@ set srcfile ${testfile}.cc
 set binfile ${objdir}/${subdir}/${testfile}
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug c++}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested local.exp
+     return -1
 }
 
 if [get_compiler_info $binfile "c++"] {
Index: gdb.cp/m-data.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.cp/m-data.exp,v
retrieving revision 1.1
diff -u -p -r1.1 m-data.exp
--- gdb.cp/m-data.exp	23 Aug 2003 03:55:59 -0000	1.1
+++ gdb.cp/m-data.exp	21 Jul 2006 00:07:55 -0000
@@ -36,7 +36,8 @@ set srcfile ${testfile}.cc
 set binfile ${objdir}/${subdir}/${testfile}
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug c++}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested m-data.exp
+     return -1
 }
 
 if [get_compiler_info ${binfile} "c++"] {
Index: gdb.cp/m-static.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.cp/m-static.exp,v
retrieving revision 1.3
diff -u -p -r1.3 m-static.exp
--- gdb.cp/m-static.exp	15 Aug 2004 09:17:30 -0000	1.3
+++ gdb.cp/m-static.exp	21 Jul 2006 00:07:56 -0000
@@ -40,15 +40,18 @@ set objfile1 "${testfile}1.o"
 set binfile  "${objdir}/${subdir}/${testfile}"
 
 if  { [gdb_compile "$srcdir/$subdir/$srcfile" "$objdir/$subdir/$objfile" object {debug c++}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested m-static.exp
+     return -1
 }
 
 if  { [gdb_compile "$srcdir/$subdir/$srcfile1" "$objdir/$subdir/$objfile1" object {debug c++}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested m-static.exp
+     return -1
 }
 
 if { [gdb_compile "$objdir/$subdir/$objfile $objdir/$subdir/$objfile1" "${binfile}" executable {debug c++}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested m-static.exp
+     return -1
 }
 
 gdb_exit
Index: gdb.cp/member-ptr.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.cp/member-ptr.exp,v
retrieving revision 1.4
diff -u -p -r1.4 member-ptr.exp
--- gdb.cp/member-ptr.exp	11 Feb 2004 14:01:25 -0000	1.4
+++ gdb.cp/member-ptr.exp	21 Jul 2006 00:07:56 -0000
@@ -42,7 +42,8 @@ if [get_compiler_info ${binfile} "c++"] 
 }
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug c++}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested member-ptr.exp
+     return -1
 }
 
 gdb_exit
Index: gdb.cp/method.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.cp/method.exp,v
retrieving revision 1.4
diff -u -p -r1.4 method.exp
--- gdb.cp/method.exp	11 Feb 2004 14:01:25 -0000	1.4
+++ gdb.cp/method.exp	21 Jul 2006 00:07:56 -0000
@@ -46,7 +46,8 @@ set srcfile ${testfile}.cc
 set binfile ${objdir}/${subdir}/${testfile}
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug c++}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested method.exp
+     return -1
 }
 
 if [get_compiler_info $binfile "c++"] {
Index: gdb.cp/misc.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.cp/misc.exp,v
retrieving revision 1.2
diff -u -p -r1.2 misc.exp
--- gdb.cp/misc.exp	11 Feb 2004 14:01:25 -0000	1.2
+++ gdb.cp/misc.exp	21 Jul 2006 00:07:56 -0000
@@ -27,7 +27,8 @@ set testfile "misc"
 set srcfile ${testfile}.cc
 set binfile ${objdir}/${subdir}/${testfile}
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug c++}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested misc.exp
+     return -1
 }
 
 #
Index: gdb.cp/namespace.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.cp/namespace.exp,v
retrieving revision 1.8
diff -u -p -r1.8 namespace.exp
--- gdb.cp/namespace.exp	1 Aug 2004 01:03:47 -0000	1.8
+++ gdb.cp/namespace.exp	21 Jul 2006 00:07:56 -0000
@@ -47,15 +47,18 @@ if [get_compiler_info ${binfile} c++] {
 }
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${objfile}" object {debug c++}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested namespace.exp
+     return -1
 }
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile1}" "${objfile1}" object {debug c++}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested namespace.exp
+     return -1
 }
 
 if  { [gdb_compile "${objfile} ${objfile1}" "${binfile}" executable {debug c++}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested namespace.exp
+     return -1
 }
 
 gdb_exit
Index: gdb.cp/overload.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.cp/overload.exp,v
retrieving revision 1.6
diff -u -p -r1.6 overload.exp
--- gdb.cp/overload.exp	11 Feb 2004 14:01:25 -0000	1.6
+++ gdb.cp/overload.exp	21 Jul 2006 00:07:57 -0000
@@ -39,7 +39,8 @@ set srcfile ${testfile}.cc
 set binfile ${objdir}/${subdir}/${testfile}
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug c++}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested overload.exp
+     return -1
 }
 
 gdb_exit
Index: gdb.cp/ovldbreak.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.cp/ovldbreak.exp,v
retrieving revision 1.3
diff -u -p -r1.3 ovldbreak.exp
--- gdb.cp/ovldbreak.exp	5 Mar 2005 13:31:26 -0000	1.3
+++ gdb.cp/ovldbreak.exp	21 Jul 2006 00:07:57 -0000
@@ -41,7 +41,8 @@ set srcfile ${testfile}.cc
 set binfile ${objdir}/${subdir}/${testfile}
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug c++}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested ovldbreak.exp
+     return -1
 }
 
 gdb_exit
Index: gdb.cp/pr-1023.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.cp/pr-1023.exp,v
retrieving revision 1.1
diff -u -p -r1.1 pr-1023.exp
--- gdb.cp/pr-1023.exp	23 Aug 2003 03:55:59 -0000	1.1
+++ gdb.cp/pr-1023.exp	21 Jul 2006 00:07:57 -0000
@@ -36,7 +36,8 @@ set srcfile ${testfile}.cc
 set binfile ${objdir}/${subdir}/${testfile}
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug c++}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested pr-1023.exp
+     return -1
 }
 
 if [get_compiler_info ${binfile} "c++"] {
Index: gdb.cp/pr-1210.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.cp/pr-1210.exp,v
retrieving revision 1.1
diff -u -p -r1.1 pr-1210.exp
--- gdb.cp/pr-1210.exp	23 Aug 2003 03:55:59 -0000	1.1
+++ gdb.cp/pr-1210.exp	21 Jul 2006 00:07:57 -0000
@@ -35,7 +35,8 @@ set srcfile ${testfile}.cc
 set binfile ${objdir}/${subdir}/${testfile}
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug c++}] != "" } {
-    gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+    untested pr-1210.exp
+    return -1
 }
 
 if [get_compiler_info ${binfile} "c++"] {
Index: gdb.cp/pr-574.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.cp/pr-574.exp,v
retrieving revision 1.1
diff -u -p -r1.1 pr-574.exp
--- gdb.cp/pr-574.exp	23 Aug 2003 03:55:59 -0000	1.1
+++ gdb.cp/pr-574.exp	21 Jul 2006 00:07:57 -0000
@@ -38,7 +38,8 @@ set srcfile ${testfile}.cc
 set binfile ${objdir}/${subdir}/${testfile}
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug c++}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested pr-574.exp
+     return -1
 }
 
 if [get_compiler_info ${binfile} "c++"] {
Index: gdb.cp/printmethod.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.cp/printmethod.exp,v
retrieving revision 1.2
diff -u -p -r1.2 printmethod.exp
--- gdb.cp/printmethod.exp	7 Dec 2005 23:07:54 -0000	1.2
+++ gdb.cp/printmethod.exp	21 Jul 2006 00:07:57 -0000
@@ -37,7 +37,8 @@ set srcfile ${testfile}.cc
 set binfile ${objdir}/${subdir}/${testfile}
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug c++}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested printmethod.exp
+     return -1
 }
 
 if [get_compiler_info ${binfile} "c++"] {
Index: gdb.cp/psmang.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.cp/psmang.exp,v
retrieving revision 1.2
diff -u -p -r1.2 psmang.exp
--- gdb.cp/psmang.exp	11 Feb 2004 14:01:25 -0000	1.2
+++ gdb.cp/psmang.exp	21 Jul 2006 00:07:58 -0000
@@ -193,15 +193,18 @@ if [get_compiler_info ${binfile} "c++"] 
 }
 
 if  { [gdb_compile "${srcdir}/${subdir}/${testfile}1.cc" "${testfile}1.o" object {debug c++}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested psmang.exp
+     return -1
 }
 
 if  { [gdb_compile "${srcdir}/${subdir}/${testfile}2.cc" "${testfile}2.o" object {debug c++}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested psmang.exp
+     return -1
 }
 
 if  { [gdb_compile "${testfile}1.o ${testfile}2.o" ${binfile} executable {debug c++}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested psmang.exp
+     return -1
 }
 
 
Index: gdb.cp/ref-params.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.cp/ref-params.exp,v
retrieving revision 1.1
diff -u -p -r1.1 ref-params.exp
--- gdb.cp/ref-params.exp	13 Jul 2006 04:31:42 -0000	1.1
+++ gdb.cp/ref-params.exp	21 Jul 2006 00:07:58 -0000
@@ -34,7 +34,8 @@ set srcfile ${testfile}.cc
 set binfile ${objdir}/${subdir}/${testfile}
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug c++}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested ref-params.exp
+     return -1
 }
 
 gdb_exit
Index: gdb.cp/ref-types.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.cp/ref-types.exp,v
retrieving revision 1.3
diff -u -p -r1.3 ref-types.exp
--- gdb.cp/ref-types.exp	11 Feb 2004 14:01:25 -0000	1.3
+++ gdb.cp/ref-types.exp	21 Jul 2006 00:07:58 -0000
@@ -34,7 +34,8 @@ set srcfile ${testfile}.cc
 set binfile ${objdir}/${subdir}/${testfile}
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug c++}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested ref-types.exp
+     return -1
 }
 
 gdb_exit
Index: gdb.cp/rtti.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.cp/rtti.exp,v
retrieving revision 1.6
diff -u -p -r1.6 rtti.exp
--- gdb.cp/rtti.exp	15 Aug 2004 09:17:30 -0000	1.6
+++ gdb.cp/rtti.exp	21 Jul 2006 00:07:58 -0000
@@ -47,15 +47,18 @@ set objfile2 "${testfile}2.o"
 set binfile  "${objdir}/${subdir}/${testfile}"
 
 if  { [gdb_compile "$srcdir/$subdir/$srcfile1" "$objdir/$subdir/$objfile1" object {debug c++}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested rtti.exp
+     return -1
 }
 
 if  { [gdb_compile "$srcdir/$subdir/$srcfile2" "$objdir/$subdir/$objfile2" object {debug c++}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested rtti.exp
+     return -1
 }
 
 if  { [gdb_compile "$objdir/$subdir/$objfile1 $objdir/$subdir/$objfile2" "${binfile}" executable {debug c++}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested rtti.exp
+     return -1
 }
 
 if [get_compiler_info ${binfile} "c++"] {
Index: gdb.cp/templates.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.cp/templates.exp,v
retrieving revision 1.12
diff -u -p -r1.12 templates.exp
--- gdb.cp/templates.exp	9 Aug 2004 13:15:26 -0000	1.12
+++ gdb.cp/templates.exp	21 Jul 2006 00:07:59 -0000
@@ -36,7 +36,8 @@ if [get_compiler_info ${binfile} "c++"] 
 }
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug c++}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested templates.exp
+     return -1
 }
 
 #
Index: gdb.cp/try_catch.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.cp/try_catch.exp,v
retrieving revision 1.1
diff -u -p -r1.1 try_catch.exp
--- gdb.cp/try_catch.exp	23 Aug 2003 03:55:59 -0000	1.1
+++ gdb.cp/try_catch.exp	21 Jul 2006 00:07:59 -0000
@@ -36,7 +36,8 @@ set srcfile ${testfile}.cc
 set binfile ${objdir}/${subdir}/${testfile}
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug c++}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested try_catch.exp
+     return -1
 }
 
 if [get_compiler_info ${binfile} "c++"] {
Index: gdb.cp/userdef.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.cp/userdef.exp,v
retrieving revision 1.4
diff -u -p -r1.4 userdef.exp
--- gdb.cp/userdef.exp	27 Apr 2005 16:35:15 -0000	1.4
+++ gdb.cp/userdef.exp	21 Jul 2006 00:08:00 -0000
@@ -31,7 +31,8 @@ set srcfile ${testfile}.cc
 set binfile ${objdir}/${subdir}/${testfile}
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug c++}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested userdef.exp
+     return -1
 }
 
 
Index: gdb.cp/virtfunc.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.cp/virtfunc.exp,v
retrieving revision 1.11
diff -u -p -r1.11 virtfunc.exp
--- gdb.cp/virtfunc.exp	9 Aug 2004 22:47:49 -0000	1.11
+++ gdb.cp/virtfunc.exp	21 Jul 2006 00:08:00 -0000
@@ -33,7 +33,8 @@ set srcfile ${testfile}.cc
 set binfile ${objdir}/${subdir}/${testfile}
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {c++ debug}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested virtfunc.exp
+     return -1
 }
 
 proc test_ptype_of_classes {} {
Index: gdb.disasm/am33.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.disasm/am33.exp,v
retrieving revision 1.2
diff -u -p -r1.2 am33.exp
--- gdb.disasm/am33.exp	6 Mar 2001 08:21:56 -0000	1.2
+++ gdb.disasm/am33.exp	21 Jul 2006 00:08:00 -0000
@@ -37,7 +37,8 @@ set testfile "am33"
 set srcfile ${srcdir}/${subdir}/${testfile}.s
 set binfile ${objdir}/${subdir}/${testfile}
 if  { [gdb_compile "${srcfile}" "${binfile}" object ""] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested am33.exp
+     return -1
 }
 
 proc call_tests { } {
Index: gdb.disasm/h8300s.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.disasm/h8300s.exp,v
retrieving revision 1.2
diff -u -p -r1.2 h8300s.exp
--- gdb.disasm/h8300s.exp	11 Aug 2003 23:20:05 -0000	1.2
+++ gdb.disasm/h8300s.exp	21 Jul 2006 00:08:00 -0000
@@ -35,7 +35,8 @@ set testfile "h8300s"
 set srcfile ${srcdir}/${subdir}/${testfile}.s
 set binfile ${objdir}/${subdir}/${testfile}
 if  { [gdb_compile "${srcfile}" "${binfile}" executable {debug additional_flags=-ms}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested h8300s.exp
+     return -1
 }
 
 proc all_set_machine_h8300s { } {
Index: gdb.disasm/mn10300.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.disasm/mn10300.exp,v
retrieving revision 1.2
diff -u -p -r1.2 mn10300.exp
--- gdb.disasm/mn10300.exp	6 Mar 2001 08:21:56 -0000	1.2
+++ gdb.disasm/mn10300.exp	21 Jul 2006 00:08:02 -0000
@@ -37,7 +37,8 @@ set testfile "mn10300"
 set srcfile ${srcdir}/${subdir}/${testfile}.s
 set binfile ${objdir}/${subdir}/${testfile}
 if  { [gdb_compile "${srcfile}" "${binfile}" executable ""] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested mn10300.exp
+     return -1
 }
 
 proc add_tests { } {
Index: gdb.disasm/sh3.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.disasm/sh3.exp,v
retrieving revision 1.1.1.1
diff -u -p -r1.1.1.1 sh3.exp
--- gdb.disasm/sh3.exp	16 Apr 1999 01:34:33 -0000	1.1.1.1
+++ gdb.disasm/sh3.exp	21 Jul 2006 00:08:02 -0000
@@ -35,7 +35,8 @@ set testfile "sh3"
 set srcfile ${srcdir}/${subdir}/${testfile}.s
 set binfile ${objdir}/${subdir}/${testfile}
 if  { [gdb_compile "${srcfile}" "${binfile}" executable ""] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested sh3.exp
+     return -1
 }
 
 proc all_fp_move_and_load_tests { } {
Index: gdb.disasm/t01_mov.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.disasm/t01_mov.exp,v
retrieving revision 1.1
diff -u -p -r1.1 t01_mov.exp
--- gdb.disasm/t01_mov.exp	23 Jul 2003 18:46:14 -0000	1.1
+++ gdb.disasm/t01_mov.exp	21 Jul 2006 00:08:03 -0000
@@ -41,11 +41,13 @@ set link-flags "-m h8300sxelf";
 
 
 if {[target_assemble $srcfile $objfile "${asm-flags}"] != ""} then {
-     gdb_suppress_entire_file "Testcase assembly failed, so all tests in this file will automatically fail."
+     untested t01_mov.exp
+     return -1
 }
 
 if {[target_link $objfile $binfile "${link-flags}"] != ""} then {
-     gdb_suppress_entire_file "Testcase link failed, so all tests in this file will automatically fail."
+     untested t01_mov.exp
+     return -1
 }
 
 gdb_start
Index: gdb.disasm/t02_mova.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.disasm/t02_mova.exp,v
retrieving revision 1.1
diff -u -p -r1.1 t02_mova.exp
--- gdb.disasm/t02_mova.exp	23 Jul 2003 18:46:14 -0000	1.1
+++ gdb.disasm/t02_mova.exp	21 Jul 2006 00:08:05 -0000
@@ -41,11 +41,13 @@ set link-flags "-m h8300sxelf";
 
 
 if {[target_assemble $srcfile $objfile "${asm-flags}"] != ""} then {
-     gdb_suppress_entire_file "Testcase assembly failed, so all tests in this file will automatically fail."
+     untested t02_mova.exp
+     return -1
 }
 
 if {[target_link $objfile $binfile "${link-flags}"] != ""} then {
-     gdb_suppress_entire_file "Testcase link failed, so all tests in this file will automatically fail."
+     untested t02_mova.exp
+     return -1
 }
 
 gdb_start
Index: gdb.disasm/t03_add.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.disasm/t03_add.exp,v
retrieving revision 1.1
diff -u -p -r1.1 t03_add.exp
--- gdb.disasm/t03_add.exp	23 Jul 2003 18:46:14 -0000	1.1
+++ gdb.disasm/t03_add.exp	21 Jul 2006 00:08:07 -0000
@@ -41,11 +41,13 @@ set link-flags "-m h8300sxelf";
 
 
 if {[target_assemble $srcfile $objfile "${asm-flags}"] != ""} then {
-     gdb_suppress_entire_file "Testcase assembly failed, so all tests in this file will automatically fail."
+     untested t03_add.exp
+     return -1
 }
 
 if {[target_link $objfile $binfile "${link-flags}"] != ""} then {
-     gdb_suppress_entire_file "Testcase link failed, so all tests in this file will automatically fail."
+     untested t03_add.exp
+     return -1
 }
 
 gdb_start
Index: gdb.disasm/t04_sub.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.disasm/t04_sub.exp,v
retrieving revision 1.1
diff -u -p -r1.1 t04_sub.exp
--- gdb.disasm/t04_sub.exp	23 Jul 2003 18:46:14 -0000	1.1
+++ gdb.disasm/t04_sub.exp	21 Jul 2006 00:08:09 -0000
@@ -41,11 +41,13 @@ set link-flags "-m h8300sxelf";
 
 
 if {[target_assemble $srcfile $objfile "${asm-flags}"] != ""} then {
-     gdb_suppress_entire_file "Testcase assembly failed, so all tests in this file will automatically fail."
+     untested t04_sub.exp
+     return -1
 }
 
 if {[target_link $objfile $binfile "${link-flags}"] != ""} then {
-     gdb_suppress_entire_file "Testcase link failed, so all tests in this file will automatically fail."
+     untested t04_sub.exp
+     return -1
 }
 
 gdb_start
Index: gdb.disasm/t05_cmp.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.disasm/t05_cmp.exp,v
retrieving revision 1.1
diff -u -p -r1.1 t05_cmp.exp
--- gdb.disasm/t05_cmp.exp	23 Jul 2003 18:46:14 -0000	1.1
+++ gdb.disasm/t05_cmp.exp	21 Jul 2006 00:08:12 -0000
@@ -41,11 +41,13 @@ set link-flags "-m h8300sxelf";
 
 
 if {[target_assemble $srcfile $objfile "${asm-flags}"] != ""} then {
-     gdb_suppress_entire_file "Testcase assembly failed, so all tests in this file will automatically fail."
+     untested t05_cmp.exp
+     return -1
 }
 
 if {[target_link $objfile $binfile "${link-flags}"] != ""} then {
-     gdb_suppress_entire_file "Testcase link failed, so all tests in this file will automatically fail."
+     untested t05_cmp.exp
+     return -1
 }
 
 gdb_start
Index: gdb.disasm/t06_ari2.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.disasm/t06_ari2.exp,v
retrieving revision 1.1
diff -u -p -r1.1 t06_ari2.exp
--- gdb.disasm/t06_ari2.exp	23 Jul 2003 18:46:14 -0000	1.1
+++ gdb.disasm/t06_ari2.exp	21 Jul 2006 00:08:13 -0000
@@ -41,11 +41,13 @@ set link-flags "-m h8300sxelf";
 
 
 if {[target_assemble $srcfile $objfile "${asm-flags}"] != ""} then {
-     gdb_suppress_entire_file "Testcase assembly failed, so all tests in this file will automatically fail."
+     untested t06_ari2.exp
+     return -1
 }
 
 if {[target_link $objfile $binfile "${link-flags}"] != ""} then {
-     gdb_suppress_entire_file "Testcase link failed, so all tests in this file will automatically fail."
+     untested t06_ari2.exp
+     return -1
 }
 
 gdb_start
Index: gdb.disasm/t07_ari3.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.disasm/t07_ari3.exp,v
retrieving revision 1.1
diff -u -p -r1.1 t07_ari3.exp
--- gdb.disasm/t07_ari3.exp	23 Jul 2003 18:46:14 -0000	1.1
+++ gdb.disasm/t07_ari3.exp	21 Jul 2006 00:08:13 -0000
@@ -41,11 +41,13 @@ set link-flags "-m h8300sxelf";
 
 
 if {[target_assemble $srcfile $objfile "${asm-flags}"] != ""} then {
-     gdb_suppress_entire_file "Testcase assembly failed, so all tests in this file will automatically fail."
+     untested t07_ari3.exp
+     return -1
 }
 
 if {[target_link $objfile $binfile "${link-flags}"] != ""} then {
-     gdb_suppress_entire_file "Testcase link failed, so all tests in this file will automatically fail."
+     untested t07_ari3.exp
+     return -1
 }
 
 gdb_start
Index: gdb.disasm/t08_or.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.disasm/t08_or.exp,v
retrieving revision 1.1
diff -u -p -r1.1 t08_or.exp
--- gdb.disasm/t08_or.exp	23 Jul 2003 18:46:14 -0000	1.1
+++ gdb.disasm/t08_or.exp	21 Jul 2006 00:08:15 -0000
@@ -41,11 +41,13 @@ set link-flags "-m h8300sxelf";
 
 
 if {[target_assemble $srcfile $objfile "${asm-flags}"] != ""} then {
-     gdb_suppress_entire_file "Testcase assembly failed, so all tests in this file will automatically fail."
+     untested t08_or.exp
+     return -1
 }
 
 if {[target_link $objfile $binfile "${link-flags}"] != ""} then {
-     gdb_suppress_entire_file "Testcase link failed, so all tests in this file will automatically fail."
+     untested t08_or.exp
+     return -1
 }
 
 gdb_start
Index: gdb.disasm/t09_xor.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.disasm/t09_xor.exp,v
retrieving revision 1.1
diff -u -p -r1.1 t09_xor.exp
--- gdb.disasm/t09_xor.exp	23 Jul 2003 18:46:14 -0000	1.1
+++ gdb.disasm/t09_xor.exp	21 Jul 2006 00:08:17 -0000
@@ -41,11 +41,13 @@ set link-flags "-m h8300sxelf";
 
 
 if {[target_assemble $srcfile $objfile "${asm-flags}"] != ""} then {
-     gdb_suppress_entire_file "Testcase assembly failed, so all tests in this file will automatically fail."
+     untested t09_xor.exp
+     return -1
 }
 
 if {[target_link $objfile $binfile "${link-flags}"] != ""} then {
-     gdb_suppress_entire_file "Testcase link failed, so all tests in this file will automatically fail."
+     untested t09_xor.exp
+     return -1
 }
 
 gdb_start
Index: gdb.disasm/t10_and.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.disasm/t10_and.exp,v
retrieving revision 1.1
diff -u -p -r1.1 t10_and.exp
--- gdb.disasm/t10_and.exp	23 Jul 2003 18:46:14 -0000	1.1
+++ gdb.disasm/t10_and.exp	21 Jul 2006 00:08:20 -0000
@@ -41,11 +41,13 @@ set link-flags "-m h8300sxelf";
 
 
 if {[target_assemble $srcfile $objfile "${asm-flags}"] != ""} then {
-     gdb_suppress_entire_file "Testcase assembly failed, so all tests in this file will automatically fail."
+     untested t10_and.exp
+     return -1
 }
 
 if {[target_link $objfile $binfile "${link-flags}"] != ""} then {
-     gdb_suppress_entire_file "Testcase link failed, so all tests in this file will automatically fail."
+     untested t10_and.exp
+     return -1
 }
 
 gdb_start
Index: gdb.disasm/t11_logs.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.disasm/t11_logs.exp,v
retrieving revision 1.1
diff -u -p -r1.1 t11_logs.exp
--- gdb.disasm/t11_logs.exp	23 Jul 2003 18:46:14 -0000	1.1
+++ gdb.disasm/t11_logs.exp	21 Jul 2006 00:08:23 -0000
@@ -41,11 +41,13 @@ set link-flags "-m h8300sxelf";
 
 
 if {[target_assemble $srcfile $objfile "${asm-flags}"] != ""} then {
-     gdb_suppress_entire_file "Testcase assembly failed, so all tests in this file will automatically fail."
+     untested t11_logs.exp
+     return -1
 }
 
 if {[target_link $objfile $binfile "${link-flags}"] != ""} then {
-     gdb_suppress_entire_file "Testcase link failed, so all tests in this file will automatically fail."
+     untested t11_logs.exp
+     return -1
 }
 
 gdb_start
Index: gdb.disasm/t12_bit.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.disasm/t12_bit.exp,v
retrieving revision 1.1
diff -u -p -r1.1 t12_bit.exp
--- gdb.disasm/t12_bit.exp	23 Jul 2003 18:46:14 -0000	1.1
+++ gdb.disasm/t12_bit.exp	21 Jul 2006 00:08:24 -0000
@@ -41,11 +41,13 @@ set link-flags "-m h8300sxelf";
 
 
 if {[target_assemble $srcfile $objfile "${asm-flags}"] != ""} then {
-     gdb_suppress_entire_file "Testcase assembly failed, so all tests in this file will automatically fail."
+     untested t12_bit.exp
+     return -1
 }
 
 if {[target_link $objfile $binfile "${link-flags}"] != ""} then {
-     gdb_suppress_entire_file "Testcase link failed, so all tests in this file will automatically fail."
+     untested t12_bit.exp
+     return -1
 }
 
 gdb_start
Index: gdb.disasm/t13_otr.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.disasm/t13_otr.exp,v
retrieving revision 1.1
diff -u -p -r1.1 t13_otr.exp
--- gdb.disasm/t13_otr.exp	23 Jul 2003 18:46:14 -0000	1.1
+++ gdb.disasm/t13_otr.exp	21 Jul 2006 00:08:24 -0000
@@ -41,11 +41,13 @@ set link-flags "-m h8300sxelf";
 
 
 if {[target_assemble $srcfile $objfile "${asm-flags}"] != ""} then {
-     gdb_suppress_entire_file "Testcase assembly failed, so all tests in this file will automatically fail."
+     untested t13_otr.exp
+     return -1
 }
 
 if {[target_link $objfile $binfile "${link-flags}"] != ""} then {
-     gdb_suppress_entire_file "Testcase link failed, so all tests in this file will automatically fail."
+     untested t13_otr.exp
+     return -1
 }
 
 gdb_start
Index: gdb.hp/gdb.aCC/optimize.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.hp/gdb.aCC/optimize.exp,v
retrieving revision 1.1.1.1
diff -u -p -r1.1.1.1 optimize.exp
--- gdb.hp/gdb.aCC/optimize.exp	16 Aug 1999 19:55:53 -0000	1.1.1.1
+++ gdb.hp/gdb.aCC/optimize.exp	21 Jul 2006 00:08:28 -0000
@@ -49,7 +49,8 @@ if { $gcc_compiled } then { continue }
 # Vanilla -O, which is the same as +O2
 #
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug optimize=+O2}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested optimize.exp
+     return -1
 }
 
 
@@ -113,7 +114,8 @@ gdb_exit
 # +O4, don't use -g
 #
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {optimize=+O4}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested optimize.exp
+     return -1
 }
 
 gdb_start
Index: gdb.hp/gdb.aCC/watch-cmd.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.hp/gdb.aCC/watch-cmd.exp,v
retrieving revision 1.1.1.1
diff -u -p -r1.1.1.1 watch-cmd.exp
--- gdb.hp/gdb.aCC/watch-cmd.exp	16 Aug 1999 19:55:53 -0000	1.1.1.1
+++ gdb.hp/gdb.aCC/watch-cmd.exp	21 Jul 2006 00:08:28 -0000
@@ -33,7 +33,8 @@ set testfile "run"
 set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug additional_flags=-DFAKEARGV}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested watch-cmd.exp
+     return -1
 
 }
 
Index: gdb.hp/gdb.base-hp/callfwmall.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.hp/gdb.base-hp/callfwmall.exp,v
retrieving revision 1.2
diff -u -p -r1.2 callfwmall.exp
--- gdb.hp/gdb.base-hp/callfwmall.exp	19 Jan 2005 16:57:48 -0000	1.2
+++ gdb.hp/gdb.base-hp/callfwmall.exp	21 Jul 2006 00:08:29 -0000
@@ -99,7 +99,8 @@ set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested callfwmall.exp
+     return -1
 }
 
 # Create and source the file that provides information about the compiler
Index: gdb.hp/gdb.base-hp/dollar.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.hp/gdb.base-hp/dollar.exp,v
retrieving revision 1.2
diff -u -p -r1.2 dollar.exp
--- gdb.hp/gdb.base-hp/dollar.exp	20 Dec 2001 23:37:31 -0000	1.2
+++ gdb.hp/gdb.base-hp/dollar.exp	21 Jul 2006 00:08:30 -0000
@@ -45,7 +45,8 @@ set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested dollar.exp
+     return -1
 }
 
 #source ${binfile}.ci
Index: gdb.hp/gdb.base-hp/hwwatchbus.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.hp/gdb.base-hp/hwwatchbus.exp,v
retrieving revision 1.2
diff -u -p -r1.2 hwwatchbus.exp
--- gdb.hp/gdb.base-hp/hwwatchbus.exp	21 Dec 2001 00:08:51 -0000	1.2
+++ gdb.hp/gdb.base-hp/hwwatchbus.exp	21 Jul 2006 00:08:30 -0000
@@ -37,7 +37,8 @@ set binfile ${objdir}/${subdir}/${testfi
 
 # build the first test case
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested hwwatchbus.exp
+     return -1
 }
 
 if [get_compiler_info ${binfile}] {
Index: gdb.hp/gdb.base-hp/pxdb.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.hp/gdb.base-hp/pxdb.exp,v
retrieving revision 1.2
diff -u -p -r1.2 pxdb.exp
--- gdb.hp/gdb.base-hp/pxdb.exp	20 Dec 2001 23:37:31 -0000	1.2
+++ gdb.hp/gdb.base-hp/pxdb.exp	21 Jul 2006 00:08:31 -0000
@@ -52,7 +52,8 @@ if { $gcc_compiled } then { continue }
 #
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${objfile}" object {debug}] != "" } {
-    gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+    untested pxdb.exp
+    return -1
 }
 
 #
Index: gdb.hp/gdb.base-hp/reg-pa64.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.hp/gdb.base-hp/reg-pa64.exp,v
retrieving revision 1.2
diff -u -p -r1.2 reg-pa64.exp
--- gdb.hp/gdb.base-hp/reg-pa64.exp	20 Dec 2001 23:37:31 -0000	1.2
+++ gdb.hp/gdb.base-hp/reg-pa64.exp	21 Jul 2006 00:08:31 -0000
@@ -54,7 +54,8 @@ set binfile ${objdir}/${subdir}/${testfi
 #
 
 if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug}] != "" } {
-    gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+    untested reg-pa64.exp
+    return -1
 }
 
 gdb_exit
Index: gdb.hp/gdb.base-hp/reg.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.hp/gdb.base-hp/reg.exp,v
retrieving revision 1.4
diff -u -p -r1.4 reg.exp
--- gdb.hp/gdb.base-hp/reg.exp	28 Jun 2004 18:19:47 -0000	1.4
+++ gdb.hp/gdb.base-hp/reg.exp	21 Jul 2006 00:08:31 -0000
@@ -55,7 +55,8 @@ set binfile ${objdir}/${subdir}/${testfi
 #
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested reg.exp
+     return -1
 }
 
 gdb_exit
Index: gdb.hp/gdb.base-hp/sized-enum.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.hp/gdb.base-hp/sized-enum.exp,v
retrieving revision 1.1.1.1
diff -u -p -r1.1.1.1 sized-enum.exp
--- gdb.hp/gdb.base-hp/sized-enum.exp	16 Aug 1999 19:55:53 -0000	1.1.1.1
+++ gdb.hp/gdb.base-hp/sized-enum.exp	21 Jul 2006 00:08:31 -0000
@@ -50,7 +50,8 @@ if { $gcc_compiled } then { continue }
 if {$hp_aCC_compiler} {continue}
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested sized-enum.exp
+     return -1
 }
 
 gdb_exit
Index: gdb.hp/gdb.compat/xdb1.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.hp/gdb.compat/xdb1.exp,v
retrieving revision 1.1.1.1
diff -u -p -r1.1.1.1 xdb1.exp
--- gdb.hp/gdb.compat/xdb1.exp	16 Aug 1999 19:55:53 -0000	1.1.1.1
+++ gdb.hp/gdb.compat/xdb1.exp	21 Jul 2006 00:08:32 -0000
@@ -37,7 +37,8 @@ set testfile "xdb"
 set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested xdb1.exp
+     return -1
 }
 
 if [get_compiler_info ${binfile}] {
Index: gdb.hp/gdb.compat/xdb3.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.hp/gdb.compat/xdb3.exp,v
retrieving revision 1.2
diff -u -p -r1.2 xdb3.exp
--- gdb.hp/gdb.compat/xdb3.exp	20 Dec 2001 23:37:31 -0000	1.2
+++ gdb.hp/gdb.compat/xdb3.exp	21 Jul 2006 00:08:33 -0000
@@ -32,15 +32,18 @@ set binfile2 ${objdir}/${subdir}/${testf
 set binfile ${objdir}/${subdir}/${testfile}
 
 if  { [gdb_compile "${srcdir}/${subdir}/average.c" "${binfile1}.o" object {debug}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested xdb3.exp
+     return -1
 }
 
 if  { [gdb_compile "${srcdir}/${subdir}/sum.c" "${binfile2}.o" object {debug}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested xdb3.exp
+     return -1
 }
 
 if  { [gdb_compile "${binfile1}.o ${binfile2}.o" ${binfile} executable {debug}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested xdb3.exp
+     return -1
 }
 
 if [get_compiler_info ${binfile}] {
Index: gdb.hp/gdb.objdbg/objdbg01.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.hp/gdb.objdbg/objdbg01.exp,v
retrieving revision 1.3
diff -u -p -r1.3 objdbg01.exp
--- gdb.hp/gdb.objdbg/objdbg01.exp	21 Dec 2001 00:30:37 -0000	1.3
+++ gdb.hp/gdb.objdbg/objdbg01.exp	21 Jul 2006 00:08:35 -0000
@@ -25,7 +25,8 @@ if {!$hp_aCC_compiler && !$hp_cc_compile
 }
 
 if { [gdb_compile "${toolssubdir}/test-objdbg.cc" "${objdbgdir}/test-objdbg.o" object "debug c++ {additional_flags=-I${toolssubdir} +objdebug}"] != "" } {
-    gdb_suppress_entire_file "WARNING: +objdebug option is not supported in this compiler version, test ignored."
+    untested objdbg01.exp
+    return -1
 }
 
 if { [gdb_compile "${srcsubdir}/x1.cc" "${objdbgdir}/x1.o" object "debug c++ {additional_flags=-I${srcsubdir} +objdebug}"] != "" } {
Index: gdb.hp/gdb.objdbg/objdbg02.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.hp/gdb.objdbg/objdbg02.exp,v
retrieving revision 1.3
diff -u -p -r1.3 objdbg02.exp
--- gdb.hp/gdb.objdbg/objdbg02.exp	21 Dec 2001 00:30:38 -0000	1.3
+++ gdb.hp/gdb.objdbg/objdbg02.exp	21 Jul 2006 00:08:35 -0000
@@ -24,7 +24,8 @@ if {!$hp_aCC_compiler && !$hp_cc_compile
 }
 
 if { [gdb_compile "${toolssubdir}/test-objdbg.cc" "${objdbgdir}/test-objdbg.o" object "debug c++ {additional_flags=-I${toolssubdir} +objdebug}"] != "" } {
-    gdb_suppress_entire_file "WARNING: +objdebug option is not supported in this compiler version, test ignored."
+    untested objdbg02.exp
+    return -1
 }
 
 if { [gdb_compile "${srcsubdir}/x1.cc" "${objdbgdir}/x1.o" object "debug c++ {additional_flags=-I${srcsubdir} +objdebug}"] != "" } {
Index: gdb.hp/gdb.objdbg/objdbg03.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.hp/gdb.objdbg/objdbg03.exp,v
retrieving revision 1.3
diff -u -p -r1.3 objdbg03.exp
--- gdb.hp/gdb.objdbg/objdbg03.exp	21 Dec 2001 00:30:38 -0000	1.3
+++ gdb.hp/gdb.objdbg/objdbg03.exp	21 Jul 2006 00:08:36 -0000
@@ -29,7 +29,8 @@ if {!$hp_aCC_compiler && !$hp_cc_compile
 }
 
 if { [gdb_compile "${toolssubdir}/test-objdbg.cc" "${objdbgdir}/test-objdbg.o" object "debug c++ {additional_flags=-I${toolssubdir} +objdebug}"] != "" } {
-    gdb_suppress_entire_file "WARNING: +objdebug option is not supported in this compiler version, test ignored."
+    untested objdbg03.exp
+    return -1
 }
 
 if { [gdb_compile "${srcsubdir}/x1.cc" "${objdbgdir}/x1.o" object "debug c++ {additional_flags=-I${srcsubdir} +objdebug}"] != "" } {
Index: gdb.hp/gdb.objdbg/objdbg04.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.hp/gdb.objdbg/objdbg04.exp,v
retrieving revision 1.2
diff -u -p -r1.2 objdbg04.exp
--- gdb.hp/gdb.objdbg/objdbg04.exp	21 Dec 2001 00:30:38 -0000	1.2
+++ gdb.hp/gdb.objdbg/objdbg04.exp	21 Jul 2006 00:08:36 -0000
@@ -25,7 +25,8 @@ if {!$hp_aCC_compiler && !$hp_cc_compile
 }
 
 if { [gdb_compile "${toolssubdir}/test-objdbg.cc" "${objdbgdir}/test-objdbg.o" object "debug c++ {additional_flags=-I${toolssubdir} +objdebug}"] != "" } {
-    gdb_suppress_entire_file "WARNING: +objdebug option is not supported in this compiler version, test ignored."
+    untested objdbg04.exp
+    return -1
 }
 
 if { [gdb_compile "${srcsubdir}/x1.cc" "${objdbgdir}/x1.o" object "debug c++ {additional_flags=-I${srcsubdir} +objdebug}"] != "" } {
Index: gdb.mi/gdb701.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/gdb701.exp,v
retrieving revision 1.1
diff -u -p -r1.1 gdb701.exp
--- gdb.mi/gdb701.exp	16 Sep 2002 19:01:43 -0000	1.1
+++ gdb.mi/gdb701.exp	21 Jul 2006 00:08:37 -0000
@@ -33,7 +33,8 @@ set testfile gdb701
 set srcfile "$testfile.c"
 set binfile $objdir/$subdir/$testfile
 if {[gdb_compile $srcdir/$subdir/$srcfile $binfile executable debug] != ""} {
-  gdb_suppress_entire_file "Testcase compile failed, so all test in this file will automatically fail."
+  untested gdb701.exp
+  return -1
 }
 
 # When varobj reports the types of objects, it often isn't really reporting
Index: gdb.mi/gdb792.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/gdb792.exp,v
retrieving revision 1.4
diff -u -p -r1.4 gdb792.exp
--- gdb.mi/gdb792.exp	9 Aug 2004 16:32:44 -0000	1.4
+++ gdb.mi/gdb792.exp	21 Jul 2006 00:08:37 -0000
@@ -40,7 +40,8 @@ if [get_compiler_info ${binfile} "c++"] 
 }
 
 if {[gdb_compile $srcdir/$subdir/$srcfile $binfile executable {debug c++}] != ""} {
-  gdb_suppress_entire_file "Testcase compile failed, so all test in this file will automatically fail."
+  untested gdb792.exp
+  return -1
 }
 
 # Test that children of classes are properly reported
Index: gdb.mi/mi-basics.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi-basics.exp,v
retrieving revision 1.13
diff -u -p -r1.13 mi-basics.exp
--- gdb.mi/mi-basics.exp	6 May 2006 20:39:15 -0000	1.13
+++ gdb.mi/mi-basics.exp	21 Jul 2006 00:08:37 -0000
@@ -44,7 +44,8 @@ set escapedobjdir [string_to_regexp ${ob
 set escapedsrcdir [string_to_regexp ${srcdir}]
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug additional_flags=-DFAKEARGV}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested mi-basics.exp
+     return -1
 }
 
 # In this file we want to test if the operations needed by the following
Index: gdb.mi/mi-break.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi-break.exp,v
retrieving revision 1.8
diff -u -p -r1.8 mi-break.exp
--- gdb.mi/mi-break.exp	6 Feb 2006 21:55:06 -0000	1.8
+++ gdb.mi/mi-break.exp	21 Jul 2006 00:08:37 -0000
@@ -37,7 +37,8 @@ set testfile "basics"
 set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug additional_flags=-DFAKEARGV}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested mi-break.exp
+     return -1
 }
 
 mi_delete_breakpoints
Index: gdb.mi/mi-cli.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi-cli.exp,v
retrieving revision 1.5
diff -u -p -r1.5 mi-cli.exp
--- gdb.mi/mi-cli.exp	27 Sep 2005 22:39:02 -0000	1.5
+++ gdb.mi/mi-cli.exp	21 Jul 2006 00:08:37 -0000
@@ -32,7 +32,8 @@ set testfile "basics"
 set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug additional_flags=-DFAKEARGV}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested mi-cli.exp
+     return -1
 }
 
 mi_gdb_reinitialize_dir $srcdir/$subdir
Index: gdb.mi/mi-console.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi-console.exp,v
retrieving revision 1.16
diff -u -p -r1.16 mi-console.exp
--- gdb.mi/mi-console.exp	11 Sep 2005 20:24:54 -0000	1.16
+++ gdb.mi/mi-console.exp	21 Jul 2006 00:08:37 -0000
@@ -44,7 +44,8 @@ set testfile "mi-console"
 set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug additional_flags=-DFAKEARGV}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested mi-console.exp
+     return -1
 }
 
 mi_delete_breakpoints
Index: gdb.mi/mi-disassemble.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi-disassemble.exp,v
retrieving revision 1.14
diff -u -p -r1.14 mi-disassemble.exp
--- gdb.mi/mi-disassemble.exp	27 Sep 2005 22:39:02 -0000	1.14
+++ gdb.mi/mi-disassemble.exp	21 Jul 2006 00:08:38 -0000
@@ -33,7 +33,8 @@ set testfile "basics"
 set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug additional_flags=-DFAKEARGV}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested mi-disassemble.exp
+     return -1
 }
 
 mi_delete_breakpoints
Index: gdb.mi/mi-eval.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi-eval.exp,v
retrieving revision 1.9
diff -u -p -r1.9 mi-eval.exp
--- gdb.mi/mi-eval.exp	15 Aug 2004 10:15:58 -0000	1.9
+++ gdb.mi/mi-eval.exp	21 Jul 2006 00:08:38 -0000
@@ -35,7 +35,8 @@ set testfile "basics"
 set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug additional_flags=-DFAKEARGV}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested mi-eval.exp
+     return -1
 }
 
 mi_delete_breakpoints
Index: gdb.mi/mi-file.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi-file.exp,v
retrieving revision 1.5
diff -u -p -r1.5 mi-file.exp
--- gdb.mi/mi-file.exp	8 May 2005 13:42:03 -0000	1.5
+++ gdb.mi/mi-file.exp	21 Jul 2006 00:08:38 -0000
@@ -37,7 +37,8 @@ set testfile "basics"
 set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug additional_flags=-DFAKEARGV}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested mi-file.exp
+     return -1
 }
 
 mi_delete_breakpoints
Index: gdb.mi/mi-read-memory.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi-read-memory.exp,v
retrieving revision 1.9
diff -u -p -r1.9 mi-read-memory.exp
--- gdb.mi/mi-read-memory.exp	9 Aug 2004 16:32:44 -0000	1.9
+++ gdb.mi/mi-read-memory.exp	21 Jul 2006 00:08:38 -0000
@@ -41,7 +41,8 @@ set testfile "mi-read-memory"
 set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug additional_flags=-DFAKEARGV}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested mi-read-memory.exp
+     return -1
 }
 
 
Index: gdb.mi/mi-regs.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi-regs.exp,v
retrieving revision 1.13
diff -u -p -r1.13 mi-regs.exp
--- gdb.mi/mi-regs.exp	5 May 2006 23:34:40 -0000	1.13
+++ gdb.mi/mi-regs.exp	21 Jul 2006 00:08:38 -0000
@@ -38,7 +38,8 @@ set testfile "basics"
 set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug additional_flags=-DFAKEARGV}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested mi-regs.exp
+     return -1
 }
 
 mi_delete_breakpoints
Index: gdb.mi/mi-return.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi-return.exp,v
retrieving revision 1.12
diff -u -p -r1.12 mi-return.exp
--- gdb.mi/mi-return.exp	18 May 2005 03:41:59 -0000	1.12
+++ gdb.mi/mi-return.exp	21 Jul 2006 00:08:38 -0000
@@ -35,7 +35,8 @@ set testfile "basics"
 set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug additional_flags=-DFAKEARGV}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested mi-return.exp
+     return -1
 }
 
 mi_delete_breakpoints
Index: gdb.mi/mi-simplerun.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi-simplerun.exp,v
retrieving revision 1.12
diff -u -p -r1.12 mi-simplerun.exp
--- gdb.mi/mi-simplerun.exp	15 Aug 2004 10:15:58 -0000	1.12
+++ gdb.mi/mi-simplerun.exp	21 Jul 2006 00:08:38 -0000
@@ -37,7 +37,8 @@ set testfile "basics"
 set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug additional_flags=-DFAKEARGV}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested mi-simplerun.exp
+     return -1
 }
 
 mi_delete_breakpoints
Index: gdb.mi/mi-stack.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi-stack.exp,v
retrieving revision 1.19
diff -u -p -r1.19 mi-stack.exp
--- gdb.mi/mi-stack.exp	27 Sep 2005 22:39:02 -0000	1.19
+++ gdb.mi/mi-stack.exp	21 Jul 2006 00:08:38 -0000
@@ -35,7 +35,8 @@ set testfile "mi-stack"
 set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug additional_flags=-DFAKEARGV}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested mi-stack.exp
+     return -1
 }
 
 mi_delete_breakpoints
Index: gdb.mi/mi-stepi.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi-stepi.exp,v
retrieving revision 1.11
diff -u -p -r1.11 mi-stepi.exp
--- gdb.mi/mi-stepi.exp	18 May 2005 03:41:59 -0000	1.11
+++ gdb.mi/mi-stepi.exp	21 Jul 2006 00:08:38 -0000
@@ -35,7 +35,8 @@ set testfile "basics"
 set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug additional_flags=-DFAKEARGV}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested mi-stepi.exp
+     return -1
 }
 
 mi_delete_breakpoints
Index: gdb.mi/mi-syn-frame.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi-syn-frame.exp,v
retrieving revision 1.7
diff -u -p -r1.7 mi-syn-frame.exp
--- gdb.mi/mi-syn-frame.exp	11 Sep 2005 20:24:54 -0000	1.7
+++ gdb.mi/mi-syn-frame.exp	21 Jul 2006 00:08:38 -0000
@@ -32,7 +32,8 @@ set testfile "mi-syn-frame"
 set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug additional_flags=-DFAKEARGV}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested mi-syn-frame.exp
+     return -1
 }
 
 mi_gdb_exit
Index: gdb.mi/mi-until.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi-until.exp,v
retrieving revision 1.10
diff -u -p -r1.10 mi-until.exp
--- gdb.mi/mi-until.exp	30 Mar 2006 16:21:26 -0000	1.10
+++ gdb.mi/mi-until.exp	21 Jul 2006 00:08:38 -0000
@@ -38,7 +38,8 @@ set testfile "until"
 set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug additional_flags=-DFAKEARGV}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested mi-until.exp
+     return -1
 }
 
 mi_delete_breakpoints
Index: gdb.mi/mi-var-block.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi-var-block.exp,v
retrieving revision 1.11
diff -u -p -r1.11 mi-var-block.exp
--- gdb.mi/mi-var-block.exp	17 Aug 2004 09:38:29 -0000	1.11
+++ gdb.mi/mi-var-block.exp	21 Jul 2006 00:08:39 -0000
@@ -32,7 +32,8 @@ set testfile "var-cmd"
 set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug additional_flags=-DFAKEARGV}] != "" } {
-    gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+    untested mi-var-block.exp
+    return -1
 }
 
 mi_delete_breakpoints
Index: gdb.mi/mi-var-child.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi-var-child.exp,v
retrieving revision 1.20
diff -u -p -r1.20 mi-var-child.exp
--- gdb.mi/mi-var-child.exp	31 Jul 2005 22:10:53 -0000	1.20
+++ gdb.mi/mi-var-child.exp	21 Jul 2006 00:08:40 -0000
@@ -32,7 +32,8 @@ set testfile "mi-var-child"
 set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug additional_flags=-DFAKEARGV}] != "" } {
-    gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+    untested mi-var-child.exp
+    return -1
 }
 
 mi_delete_breakpoints
Index: gdb.mi/mi-var-cmd.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi-var-cmd.exp,v
retrieving revision 1.18
diff -u -p -r1.18 mi-var-cmd.exp
--- gdb.mi/mi-var-cmd.exp	14 Jan 2005 18:17:19 -0000	1.18
+++ gdb.mi/mi-var-cmd.exp	21 Jul 2006 00:08:40 -0000
@@ -33,7 +33,8 @@ set testfile "var-cmd"
 set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug additional_flags=-DFAKEARGV}] != "" } {
-    gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+    untested mi-var-cmd.exp
+    return -1
 }
 
 mi_delete_breakpoints
Index: gdb.mi/mi-var-display.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi-var-display.exp,v
retrieving revision 1.14
diff -u -p -r1.14 mi-var-display.exp
--- gdb.mi/mi-var-display.exp	13 Jun 2006 08:46:17 -0000	1.14
+++ gdb.mi/mi-var-display.exp	21 Jul 2006 00:08:40 -0000
@@ -33,7 +33,8 @@ set testfile "var-cmd"
 set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug additional_flags=-DFAKEARGV}] != "" } {
-    gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+    untested mi-var-display.exp
+    return -1
 }
 
 mi_delete_breakpoints
Index: gdb.mi/mi-watch.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi-watch.exp,v
retrieving revision 1.12
diff -u -p -r1.12 mi-watch.exp
--- gdb.mi/mi-watch.exp	18 May 2005 03:41:59 -0000	1.12
+++ gdb.mi/mi-watch.exp	21 Jul 2006 00:08:40 -0000
@@ -38,7 +38,8 @@ set testfile "basics"
 set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug additional_flags=-DFAKEARGV}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested mi-watch.exp
+     return -1
 }
 
 mi_delete_breakpoints
Index: gdb.mi/mi2-basics.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi2-basics.exp,v
retrieving revision 1.5
diff -u -p -r1.5 mi2-basics.exp
--- gdb.mi/mi2-basics.exp	6 May 2006 20:39:15 -0000	1.5
+++ gdb.mi/mi2-basics.exp	21 Jul 2006 00:08:41 -0000
@@ -45,7 +45,8 @@ set escapedobjdir [string_to_regexp ${ob
 set escapedsrcdir [string_to_regexp ${srcdir}]
 
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug additional_flags=-DFAKEARGV}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested mi2-basics.exp
+     return -1
 }
 
 # In this file we want to test if the operations needed by the following
Index: gdb.mi/mi2-break.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi2-break.exp,v
retrieving revision 1.4
diff -u -p -r1.4 mi2-break.exp
--- gdb.mi/mi2-break.exp	6 Feb 2006 21:55:06 -0000	1.4
+++ gdb.mi/mi2-break.exp	21 Jul 2006 00:08:41 -0000
@@ -37,7 +37,8 @@ set testfile "basics"
 set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug additional_flags=-DFAKEARGV}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested mi2-break.exp
+     return -1
 }
 
 mi_delete_breakpoints
Index: gdb.mi/mi2-cli.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi2-cli.exp,v
retrieving revision 1.4
diff -u -p -r1.4 mi2-cli.exp
--- gdb.mi/mi2-cli.exp	27 Sep 2005 22:39:03 -0000	1.4
+++ gdb.mi/mi2-cli.exp	21 Jul 2006 00:08:41 -0000
@@ -32,7 +32,8 @@ set testfile "basics"
 set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug additional_flags=-DFAKEARGV}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested mi2-cli.exp
+     return -1
 }
 
 mi_gdb_reinitialize_dir $srcdir/$subdir
Index: gdb.mi/mi2-console.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi2-console.exp,v
retrieving revision 1.4
diff -u -p -r1.4 mi2-console.exp
--- gdb.mi/mi2-console.exp	27 Apr 2005 16:35:15 -0000	1.4
+++ gdb.mi/mi2-console.exp	21 Jul 2006 00:08:41 -0000
@@ -44,7 +44,8 @@ set testfile "mi-console"
 set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug additional_flags=-DFAKEARGV}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested mi2-console.exp
+     return -1
 }
 
 mi_delete_breakpoints
Index: gdb.mi/mi2-disassemble.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi2-disassemble.exp,v
retrieving revision 1.4
diff -u -p -r1.4 mi2-disassemble.exp
--- gdb.mi/mi2-disassemble.exp	27 Sep 2005 22:39:03 -0000	1.4
+++ gdb.mi/mi2-disassemble.exp	21 Jul 2006 00:08:41 -0000
@@ -34,7 +34,8 @@ set testfile "basics"
 set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug additional_flags=-DFAKEARGV}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested mi2-disassemble.exp
+     return -1
 }
 
 mi_delete_breakpoints
Index: gdb.mi/mi2-eval.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi2-eval.exp,v
retrieving revision 1.3
diff -u -p -r1.3 mi2-eval.exp
--- gdb.mi/mi2-eval.exp	15 Aug 2004 10:15:58 -0000	1.3
+++ gdb.mi/mi2-eval.exp	21 Jul 2006 00:08:41 -0000
@@ -35,7 +35,8 @@ set testfile "basics"
 set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug additional_flags=-DFAKEARGV}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested mi2-eval.exp
+     return -1
 }
 
 mi_delete_breakpoints
Index: gdb.mi/mi2-file.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi2-file.exp,v
retrieving revision 1.6
diff -u -p -r1.6 mi2-file.exp
--- gdb.mi/mi2-file.exp	8 May 2005 13:42:03 -0000	1.6
+++ gdb.mi/mi2-file.exp	21 Jul 2006 00:08:41 -0000
@@ -37,7 +37,8 @@ set testfile "basics"
 set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug additional_flags=-DFAKEARGV}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested mi2-file.exp
+     return -1
 }
 
 mi_delete_breakpoints
Index: gdb.mi/mi2-read-memory.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi2-read-memory.exp,v
retrieving revision 1.2
diff -u -p -r1.2 mi2-read-memory.exp
--- gdb.mi/mi2-read-memory.exp	9 Aug 2004 22:21:54 -0000	1.2
+++ gdb.mi/mi2-read-memory.exp	21 Jul 2006 00:08:41 -0000
@@ -41,7 +41,8 @@ set testfile "mi-read-memory"
 set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug additional_flags=-DFAKEARGV}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested mi2-read-memory.exp
+     return -1
 }
 
 
Index: gdb.mi/mi2-regs.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi2-regs.exp,v
retrieving revision 1.3
diff -u -p -r1.3 mi2-regs.exp
--- gdb.mi/mi2-regs.exp	5 May 2006 23:34:40 -0000	1.3
+++ gdb.mi/mi2-regs.exp	21 Jul 2006 00:08:41 -0000
@@ -38,7 +38,8 @@ set testfile "basics"
 set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug additional_flags=-DFAKEARGV}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested mi2-regs.exp
+     return -1
 }
 
 mi_delete_breakpoints
Index: gdb.mi/mi2-return.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi2-return.exp,v
retrieving revision 1.4
diff -u -p -r1.4 mi2-return.exp
--- gdb.mi/mi2-return.exp	18 May 2005 03:41:59 -0000	1.4
+++ gdb.mi/mi2-return.exp	21 Jul 2006 00:08:41 -0000
@@ -36,7 +36,8 @@ set testfile "basics"
 set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug additional_flags=-DFAKEARGV}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested mi2-return.exp
+     return -1
 }
 
 mi_delete_breakpoints
Index: gdb.mi/mi2-simplerun.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi2-simplerun.exp,v
retrieving revision 1.3
diff -u -p -r1.3 mi2-simplerun.exp
--- gdb.mi/mi2-simplerun.exp	15 Aug 2004 10:15:58 -0000	1.3
+++ gdb.mi/mi2-simplerun.exp	21 Jul 2006 00:08:42 -0000
@@ -37,7 +37,8 @@ set testfile "basics"
 set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug additional_flags=-DFAKEARGV}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested mi2-simplerun.exp
+     return -1
 }
 
 mi_delete_breakpoints
Index: gdb.mi/mi2-stack.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi2-stack.exp,v
retrieving revision 1.6
diff -u -p -r1.6 mi2-stack.exp
--- gdb.mi/mi2-stack.exp	27 Sep 2005 22:39:03 -0000	1.6
+++ gdb.mi/mi2-stack.exp	21 Jul 2006 00:08:42 -0000
@@ -35,7 +35,8 @@ set testfile "basics"
 set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug additional_flags=-DFAKEARGV}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested mi2-stack.exp
+     return -1
 }
 
 mi_delete_breakpoints
Index: gdb.mi/mi2-stepi.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi2-stepi.exp,v
retrieving revision 1.4
diff -u -p -r1.4 mi2-stepi.exp
--- gdb.mi/mi2-stepi.exp	18 May 2005 03:41:59 -0000	1.4
+++ gdb.mi/mi2-stepi.exp	21 Jul 2006 00:08:42 -0000
@@ -36,7 +36,8 @@ set testfile "basics"
 set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug additional_flags=-DFAKEARGV}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested mi2-stepi.exp
+     return -1
 }
 
 mi_delete_breakpoints
Index: gdb.mi/mi2-syn-frame.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi2-syn-frame.exp,v
retrieving revision 1.4
diff -u -p -r1.4 mi2-syn-frame.exp
--- gdb.mi/mi2-syn-frame.exp	2 Aug 2005 14:21:01 -0000	1.4
+++ gdb.mi/mi2-syn-frame.exp	21 Jul 2006 00:08:42 -0000
@@ -33,7 +33,8 @@ set testfile "mi-syn-frame"
 set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug additional_flags=-DFAKEARGV}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested mi2-syn-frame.exp
+     return -1
 }
 
 set my_mi_gdb_prompt "\\(gdb\\)\[ \]*\[\r\n\]*"
Index: gdb.mi/mi2-until.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi2-until.exp,v
retrieving revision 1.4
diff -u -p -r1.4 mi2-until.exp
--- gdb.mi/mi2-until.exp	30 Mar 2006 16:21:26 -0000	1.4
+++ gdb.mi/mi2-until.exp	21 Jul 2006 00:08:42 -0000
@@ -39,7 +39,8 @@ set testfile "until"
 set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug additional_flags=-DFAKEARGV}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested mi2-until.exp
+     return -1
 }
 
 mi_delete_breakpoints
Index: gdb.mi/mi2-var-block.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi2-var-block.exp,v
retrieving revision 1.3
diff -u -p -r1.3 mi2-var-block.exp
--- gdb.mi/mi2-var-block.exp	17 Aug 2004 09:38:29 -0000	1.3
+++ gdb.mi/mi2-var-block.exp	21 Jul 2006 00:08:42 -0000
@@ -32,7 +32,8 @@ set testfile "var-cmd"
 set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug additional_flags=-DFAKEARGV}] != "" } {
-    gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+    untested mi2-var-block.exp
+    return -1
 }
 
 mi_delete_breakpoints
Index: gdb.mi/mi2-var-child.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi2-var-child.exp,v
retrieving revision 1.3
diff -u -p -r1.3 mi2-var-child.exp
--- gdb.mi/mi2-var-child.exp	17 Aug 2004 09:38:29 -0000	1.3
+++ gdb.mi/mi2-var-child.exp	21 Jul 2006 00:08:43 -0000
@@ -32,7 +32,8 @@ set testfile "var-cmd"
 set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug additional_flags=-DFAKEARGV}] != "" } {
-    gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+    untested mi2-var-child.exp
+    return -1
 }
 
 mi_delete_breakpoints
Index: gdb.mi/mi2-var-cmd.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi2-var-cmd.exp,v
retrieving revision 1.4
diff -u -p -r1.4 mi2-var-cmd.exp
--- gdb.mi/mi2-var-cmd.exp	14 Jan 2005 18:17:20 -0000	1.4
+++ gdb.mi/mi2-var-cmd.exp	21 Jul 2006 00:08:43 -0000
@@ -33,7 +33,8 @@ set testfile "var-cmd"
 set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug additional_flags=-DFAKEARGV}] != "" } {
-    gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+    untested mi2-var-cmd.exp
+    return -1
 }
 
 mi_delete_breakpoints
Index: gdb.mi/mi2-var-display.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi2-var-display.exp,v
retrieving revision 1.6
diff -u -p -r1.6 mi2-var-display.exp
--- gdb.mi/mi2-var-display.exp	13 Jun 2006 08:46:17 -0000	1.6
+++ gdb.mi/mi2-var-display.exp	21 Jul 2006 00:08:44 -0000
@@ -33,7 +33,8 @@ set testfile "var-cmd"
 set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug additional_flags=-DFAKEARGV}] != "" } {
-    gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+    untested mi2-var-display.exp
+    return -1
 }
 
 mi_delete_breakpoints
Index: gdb.mi/mi2-watch.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.mi/mi2-watch.exp,v
retrieving revision 1.3
diff -u -p -r1.3 mi2-watch.exp
--- gdb.mi/mi2-watch.exp	15 Aug 2004 10:15:58 -0000	1.3
+++ gdb.mi/mi2-watch.exp	21 Jul 2006 00:08:44 -0000
@@ -37,7 +37,8 @@ set testfile "basics"
 set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug additional_flags=-DFAKEARGV}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested mi2-watch.exp
+     return -1
 }
 
 mi_delete_breakpoints
Index: gdb.stabs/exclfwd.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.stabs/exclfwd.exp,v
retrieving revision 1.2
diff -u -p -r1.2 exclfwd.exp
--- gdb.stabs/exclfwd.exp	22 Jun 2006 19:50:57 -0000	1.2
+++ gdb.stabs/exclfwd.exp	21 Jul 2006 00:08:46 -0000
@@ -38,12 +38,14 @@ set binfile ${objdir}/${subdir}/${testfi
 
 foreach file {exclfwd1 exclfwd2} {
     if {[gdb_compile "${srcdir}/${subdir}/${file}.c" "${file}.o" object {debug}] != ""} {
-        gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+        untested exclfwd.exp
+        return -1
     }
 }
 
 if {[gdb_compile "exclfwd1.o exclfwd2.o" ${binfile} executable {debug}] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested exclfwd.exp
+     return -1
 }
 
 gdb_exit
Index: gdb.stabs/weird.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.stabs/weird.exp,v
retrieving revision 1.8
diff -u -p -r1.8 weird.exp
--- gdb.stabs/weird.exp	22 Apr 2004 17:55:46 -0000	1.8
+++ gdb.stabs/weird.exp	21 Jul 2006 00:08:47 -0000
@@ -290,7 +290,8 @@ if { [lindex $exec_output 0] != 0 } {
 }
 
 if  { [gdb_compile "${srcfile}" "${binfile}" object ""] != "" } {
-     gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+     untested weird.exp
+     return -1
 }
 
 remote_file build delete ${srcfile}
Index: gdb.threads/gcore-thread.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.threads/gcore-thread.exp,v
retrieving revision 1.7
diff -u -p -r1.7 gcore-thread.exp
--- gdb.threads/gcore-thread.exp	2 Feb 2004 05:15:27 -0000	1.7
+++ gdb.threads/gcore-thread.exp	21 Jul 2006 00:08:47 -0000
@@ -79,7 +79,8 @@ gdb_expect {
 }
 
 if { ! [ runto_main ] } then {
-    gdb_suppress_entire_file "Run to main failed, so all tests in this file will automatically fail."
+    untested gcore-thread.exp
+    return -1
 }
 
 send_gdb "info threads\n"
Index: gdb.trace/actions.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.trace/actions.exp,v
retrieving revision 1.3
diff -u -p -r1.3 actions.exp
--- gdb.trace/actions.exp	7 Mar 2006 15:23:32 -0000	1.3
+++ gdb.trace/actions.exp	21 Jul 2006 00:08:49 -0000
@@ -40,7 +40,8 @@ if [istarget "m68k-*-elf"] then {
     set binfile $objdir/$subdir/$testfile
     if { [gdb_compile "$srcdir/$subdir/$srcfile" $binfile \
 	    executable {debug nowarnings}] != "" } {
-	gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+	untested actions.exp
+	return -1
     }
 }
 gdb_reinitialize_dir $srcdir/$subdir
Index: gdb.trace/backtrace.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.trace/backtrace.exp,v
retrieving revision 1.3
diff -u -p -r1.3 backtrace.exp
--- gdb.trace/backtrace.exp	7 Mar 2006 15:23:32 -0000	1.3
+++ gdb.trace/backtrace.exp	21 Jul 2006 00:08:49 -0000
@@ -44,7 +44,8 @@ if [istarget "m68k-*-elf"] then {
     send_gdb "compare-sections CS\n"
     gdb_expect {
 	-re "MIS-MATCHED.*$gdb_prompt $" {
-	    gdb_suppress_entire_file "Symbol file does not match target!
+	    untested backtrace.exp
+	    return -1
 	    all tests in this module will fail.";
 	}
 	-re ".*$gdb_prompt $" { }
@@ -55,7 +56,8 @@ if [istarget "m68k-*-elf"] then {
     set binfile $objdir/$subdir/$testfile
     if { [gdb_compile "$srcdir/$subdir/$srcfile" $binfile \
 	    executable {debug nowarnings}] != "" } {
-	gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+	untested backtrace.exp
+	return -1
     }
     gdb_load $binfile
     gdb_test "tstop"       "" ""
@@ -124,12 +126,14 @@ gdb_expect {
     }
     -re ".*$gdb_prompt $" {
 	if { ($testline1 == 0) || ($testline2 == 0) || ($testline3 == 0) || ($testline4 == 0) || ($testline5 == 0) || ($testline6 == 0) } {
-	    gdb_suppress_entire_file "failed to locate test source lines:
+	    untested backtrace.exp
+	    return -1
 all tests in this module will fail."
 	}
     }
     default {
-	    gdb_suppress_entire_file "failed to locate test source lines (def):
+	    untested backtrace.exp
+	    return -1
 all tests in this module will fail."
     } 
 }
Index: gdb.trace/circ.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.trace/circ.exp,v
retrieving revision 1.3
diff -u -p -r1.3 circ.exp
--- gdb.trace/circ.exp	7 Mar 2006 15:23:32 -0000	1.3
+++ gdb.trace/circ.exp	21 Jul 2006 00:08:49 -0000
@@ -37,7 +37,8 @@ set binfile $objdir/$subdir/$testfile
 
 if { [gdb_compile "$srcdir/$subdir/$srcfile" $binfile \
 	executable {debug nowarnings}] != "" } {
-    gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+    untested circ.exp
+    return -1
 }
 
 # Tests:
Index: gdb.trace/collection.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.trace/collection.exp,v
retrieving revision 1.5
diff -u -p -r1.5 collection.exp
--- gdb.trace/collection.exp	7 Mar 2006 15:23:32 -0000	1.5
+++ gdb.trace/collection.exp	21 Jul 2006 00:08:50 -0000
@@ -37,7 +37,8 @@ set binfile $objdir/$subdir/$testfile
 
 if { [gdb_compile "$srcdir/$subdir/$srcfile" $binfile \
 	executable {debug nowarnings}] != "" } {
-    gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+    untested collection.exp
+    return -1
 }
 
 # Tests: 
Index: gdb.trace/deltrace.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.trace/deltrace.exp,v
retrieving revision 1.4
diff -u -p -r1.4 deltrace.exp
--- gdb.trace/deltrace.exp	7 Mar 2006 15:23:32 -0000	1.4
+++ gdb.trace/deltrace.exp	21 Jul 2006 00:08:50 -0000
@@ -40,7 +40,8 @@ if [istarget "m68k-*-elf"] then {
     set binfile $objdir/$subdir/$testfile
     if { [gdb_compile "$srcdir/$subdir/$srcfile" $binfile \
 	    executable {debug nowarnings}] != "" } {
-	gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+	untested deltrace.exp
+	return -1
     }
 }
 gdb_reinitialize_dir $srcdir/$subdir
Index: gdb.trace/infotrace.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.trace/infotrace.exp,v
retrieving revision 1.4
diff -u -p -r1.4 infotrace.exp
--- gdb.trace/infotrace.exp	7 Mar 2006 15:23:32 -0000	1.4
+++ gdb.trace/infotrace.exp	21 Jul 2006 00:08:52 -0000
@@ -40,7 +40,8 @@ if [istarget "m68k-*-elf"] then {
     set binfile $objdir/$subdir/$testfile
     if { [gdb_compile "$srcdir/$subdir/$srcfile" $binfile \
 	    executable {debug nowarnings}] != "" } {
-	gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+	untested infotrace.exp
+	return -1
     }
 }
 gdb_reinitialize_dir $srcdir/$subdir
Index: gdb.trace/limits.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.trace/limits.exp,v
retrieving revision 1.3
diff -u -p -r1.3 limits.exp
--- gdb.trace/limits.exp	7 Mar 2006 15:23:32 -0000	1.3
+++ gdb.trace/limits.exp	21 Jul 2006 00:08:52 -0000
@@ -37,7 +37,8 @@ set binfile $objdir/$subdir/$testfile
 
 if { [gdb_compile "$srcdir/$subdir/$srcfile" $binfile \
 	executable {debug nowarnings}] != "" } {
-    gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+    untested limits.exp
+    return -1
 }
 
 # Tests:
Index: gdb.trace/packetlen.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.trace/packetlen.exp,v
retrieving revision 1.3
diff -u -p -r1.3 packetlen.exp
--- gdb.trace/packetlen.exp	7 Mar 2006 15:23:32 -0000	1.3
+++ gdb.trace/packetlen.exp	21 Jul 2006 00:08:52 -0000
@@ -44,7 +44,8 @@ if [istarget "m68k-*-elf"] then {
     send_gdb "compare-sections CS\n"
     gdb_expect {
 	-re "MIS-MATCHED.*$gdb_prompt $" {
-	    gdb_suppress_entire_file "Symbol file does not match target!
+	    untested packetlen.exp
+	    return -1
 	    all tests in this module will fail.";
 	}
 	-re ".*$gdb_prompt $" { }
@@ -55,7 +56,8 @@ if [istarget "m68k-*-elf"] then {
     set binfile $objdir/$subdir/$testfile
     if { [gdb_compile "$srcdir/$subdir/$srcfile" $binfile \
 	    executable {debug nowarnings}] != "" } {
-	gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+	untested packetlen.exp
+	return -1
     }
     gdb_load $binfile
     gdb_test "tstop"       "" ""
Index: gdb.trace/passc-dyn.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.trace/passc-dyn.exp,v
retrieving revision 1.5
diff -u -p -r1.5 passc-dyn.exp
--- gdb.trace/passc-dyn.exp	7 Mar 2006 15:23:32 -0000	1.5
+++ gdb.trace/passc-dyn.exp	21 Jul 2006 00:08:52 -0000
@@ -43,7 +43,8 @@ if [istarget "m68k-*-elf"] then {
     send_gdb "compare-sections CS\n"
     gdb_expect {
 	-re "MIS-MATCHED.*$gdb_prompt $" {
-	    gdb_suppress_entire_file "Symbol file does not match target!
+	    untested passc-dyn.exp
+	    return -1
 	    all tests in this module will fail.";
 	}
 	-re ".*$gdb_prompt $" { }
@@ -54,7 +55,8 @@ if [istarget "m68k-*-elf"] then {
     set binfile $objdir/$subdir/$testfile
     if { [gdb_compile "$srcdir/$subdir/$srcfile" $binfile \
 	    executable {debug nowarnings}] != "" } {
-	gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+	untested passc-dyn.exp
+	return -1
     }
     gdb_load $binfile
     gdb_test "tstop"       "" ""
@@ -142,32 +144,38 @@ if [istarget "m68k-*-elf"] then {
 
 gdb_test "tfind none" "" ""
 if [gdb_test "printf \"x \%d x\\n\", \$trace_frame" "x -1 x" ""] {
-    gdb_suppress_entire_file "0: tfind none failed"
+    untested passc-dyn.exp
+    return -1
 }
 
 gdb_test "tfind tracepoint $tdp2" "" ""
 if [gdb_test "printf \"x \%d x\\n\", \$trace_frame" "x 0 x" ""] {
-    gdb_suppress_entire_file "1: first tfind failed"
+    untested passc-dyn.exp
+    return -1
 }
 
 gdb_test "tfind tracepoint $tdp3" "" ""
 if [gdb_test "printf \"x \%d x\\n\", \$trace_frame" "x 1 x" ""] {
-    gdb_suppress_entire_file "2: second tfind failed"
+    untested passc-dyn.exp
+    return -1
 }
 
 gdb_test "tfind tracepoint $tdp4" "" ""
 if [gdb_test "printf \"x \%d x\\n\", \$trace_frame" "x 2 x" ""] {
-    gdb_suppress_entire_file "3: third tfind failed"
+    untested passc-dyn.exp
+    return -1
 }
 
 gdb_test "tfind tracepoint $tdp2" "" ""
 if [gdb_test "printf \"x \%d x\\n\", \$trace_frame" "x 3 x" ""] {
-    gdb_suppress_entire_file "4: fourth tfind failed"
+    untested passc-dyn.exp
+    return -1
 }
 
 gdb_test "tfind tracepoint $tdp3" "" ""
 if [gdb_test "printf \"x \%d x\\n\", \$trace_frame" "x 4 x" ""] {
-    gdb_suppress_entire_file "5: fifth tfind failed"
+    untested passc-dyn.exp
+    return -1
 }
 
 ## We should now be at the last frame, because this frame's passcount
Index: gdb.trace/passcount.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.trace/passcount.exp,v
retrieving revision 1.4
diff -u -p -r1.4 passcount.exp
--- gdb.trace/passcount.exp	7 Mar 2006 15:23:32 -0000	1.4
+++ gdb.trace/passcount.exp	21 Jul 2006 00:08:52 -0000
@@ -39,7 +39,8 @@ if [istarget "m68k-*-elf"] then {
     set binfile $objdir/$subdir/$testfile
     if { [gdb_compile "$srcdir/$subdir/$srcfile" $binfile \
 	    executable {debug nowarnings}] != "" } {
-	gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+	untested passcount.exp
+	return -1
     }
 }
 gdb_reinitialize_dir $srcdir/$subdir
Index: gdb.trace/report.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.trace/report.exp,v
retrieving revision 1.3
diff -u -p -r1.3 report.exp
--- gdb.trace/report.exp	7 Mar 2006 15:23:32 -0000	1.3
+++ gdb.trace/report.exp	21 Jul 2006 00:08:52 -0000
@@ -44,7 +44,8 @@ if [istarget "m68k-*-elf"] then {
     send_gdb "compare-sections CS\n"
     gdb_expect {
 	-re "MIS-MATCHED.*$gdb_prompt $" {
-	    gdb_suppress_entire_file "Symbol file does not match target!
+	    untested report.exp
+	    return -1
 	    all tests in this module will fail.";
 	}
 	-re ".*$gdb_prompt $" { }
@@ -55,7 +56,8 @@ if [istarget "m68k-*-elf"] then {
     set binfile $objdir/$subdir/$testfile
     if { [gdb_compile "$srcdir/$subdir/$srcfile" $binfile \
 	     executable {debug nowarnings}] != "" } {
-	gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+	untested report.exp
+	return -1
     }
     gdb_load $binfile
     gdb_test "tstop"       "" ""
@@ -129,12 +131,14 @@ gdb_expect {
     }
     -re ".*$gdb_prompt $" {
 	if { ($testline1 == 0) || ($testline2 == 0) || ($testline3 == 0) || ($testline4 == 0) || ($testline5 == 0) || ($testline6 == 0) } {
-	    gdb_suppress_entire_file "failed to locate test source lines:
+	    untested report.exp
+	    return -1
 all tests in this module will fail."
 	}
     }
     default {
-	    gdb_suppress_entire_file "failed to locate test source lines (def):
+	    untested report.exp
+	    return -1
 all tests in this module will fail."
     } 
 }
Index: gdb.trace/save-trace.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.trace/save-trace.exp,v
retrieving revision 1.4
diff -u -p -r1.4 save-trace.exp
--- gdb.trace/save-trace.exp	7 Mar 2006 15:23:32 -0000	1.4
+++ gdb.trace/save-trace.exp	21 Jul 2006 00:08:53 -0000
@@ -40,7 +40,8 @@ if [istarget "m68k-*-elf"] then {
     set binfile $objdir/$subdir/$testfile
     if { [gdb_compile "$srcdir/$subdir/$srcfile" $binfile \
 	    executable {debug nowarnings}] != "" } {
-	gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+	untested save-trace.exp
+	return -1
     }
 }
 gdb_reinitialize_dir $srcdir/$subdir
Index: gdb.trace/tfind.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.trace/tfind.exp,v
retrieving revision 1.6
diff -u -p -r1.6 tfind.exp
--- gdb.trace/tfind.exp	7 Mar 2006 15:23:32 -0000	1.6
+++ gdb.trace/tfind.exp	21 Jul 2006 00:08:53 -0000
@@ -44,7 +44,8 @@ if [istarget "m68k-*-elf"] then {
     send_gdb "compare-sections CS\n"
     gdb_expect {
 	-re "MIS-MATCHED.*$gdb_prompt $" {
-	    gdb_suppress_entire_file "Symbol file does not match target!
+	    untested tfind.exp
+	    return -1
 	    all tests in this module will fail.";
 	}
 	-re ".*$gdb_prompt $" { }
@@ -56,7 +57,8 @@ if [istarget "m68k-*-elf"] then {
 
     if { [gdb_compile "$srcdir/$subdir/$srcfile" "$binfile" \
 	    executable {debug nowarnings}] != "" } {
-	gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+	untested tfind.exp
+	return -1
     }
     gdb_load $binfile
     gdb_test "tstop"       "" ""
Index: gdb.trace/tracecmd.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.trace/tracecmd.exp,v
retrieving revision 1.3
diff -u -p -r1.3 tracecmd.exp
--- gdb.trace/tracecmd.exp	7 Mar 2006 15:23:32 -0000	1.3
+++ gdb.trace/tracecmd.exp	21 Jul 2006 00:08:53 -0000
@@ -39,7 +39,8 @@ if [istarget "m68k-*-elf"] then {
     set binfile $objdir/$subdir/$testfile
     if { [gdb_compile "$srcdir/$subdir/$srcfile" $binfile \
 	    executable {debug nowarnings}] != "" } {
-	gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+	untested tracecmd.exp
+	return -1
     }
 }
 gdb_reinitialize_dir $srcdir/$subdir
Index: gdb.trace/while-dyn.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.trace/while-dyn.exp,v
retrieving revision 1.3
diff -u -p -r1.3 while-dyn.exp
--- gdb.trace/while-dyn.exp	7 Mar 2006 15:23:32 -0000	1.3
+++ gdb.trace/while-dyn.exp	21 Jul 2006 00:08:53 -0000
@@ -45,7 +45,8 @@ if [istarget "m68k-*-elf"] then {
     send_gdb "compare-section CS\n"
     gdb_expect {
 	-re "MIS-MATCHED.*$gdb_prompt $" {
-	    gdb_suppress_entire_file "Symbol file does not match target!
+	    untested while-dyn.exp
+	    return -1
 	    all tests in this module will fail.";
 	}
 	-re ".*$gdb_prompt $" { }
@@ -56,7 +57,8 @@ if [istarget "m68k-*-elf"] then {
     set binfile $objdir/$subdir/$testfile
     if { [gdb_compile "$srcdir/$subdir/$srcfile" $binfile \
 	    executable {debug nowarnings}] != "" } {
-	gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+	untested while-dyn.exp
+	return -1
     }
     gdb_load $binfile
     gdb_test "tstop"       "" ""
Index: gdb.trace/while-stepping.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.trace/while-stepping.exp,v
retrieving revision 1.4
diff -u -p -r1.4 while-stepping.exp
--- gdb.trace/while-stepping.exp	7 Mar 2006 15:23:32 -0000	1.4
+++ gdb.trace/while-stepping.exp	21 Jul 2006 00:08:53 -0000
@@ -40,7 +40,8 @@ if [istarget "m68k-*-elf"] then {
     set binfile ${objdir}/${subdir}/${testfile}
     if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" $binfile \
 	    executable {debug nowarnings}] != "" } {
-	gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+	untested while-stepping.exp
+	return -1
     }
 }
 gdb_reinitialize_dir $srcdir/$subdir