From 00c916f4a83950d361c50aab635ca2ecf6c218f7 Mon Sep 17 00:00:00 2001
From: Jeff Law <law@redhat.com>
Date: Wed, 18 Oct 1995 05:07:51 +0000
Subject: [PATCH]         * Many files: When warning about suppressed tests due
 to a         nonexistant test binary, avoid incrementing the warning count.

Fixes bogus UNRESOLVED test results.
---
 gdb/testsuite/ChangeLog               | 9 +++++++++
 gdb/testsuite/gdb.chill/callch.exp    | 2 +-
 gdb/testsuite/gdb.chill/chexp.exp     | 2 +-
 gdb/testsuite/gdb.chill/chillvars.exp | 2 +-
 gdb/testsuite/gdb.chill/misc.exp      | 2 +-
 gdb/testsuite/gdb.chill/pr-4975.exp   | 2 +-
 gdb/testsuite/gdb.chill/pr-5016.exp   | 2 +-
 gdb/testsuite/gdb.chill/pr-5020.exp   | 2 +-
 gdb/testsuite/gdb.chill/pr-5022.exp   | 2 +-
 gdb/testsuite/gdb.chill/pr-5646.exp   | 2 +-
 gdb/testsuite/gdb.chill/pr-5984.exp   | 2 +-
 gdb/testsuite/gdb.chill/pr-6292.exp   | 2 +-
 gdb/testsuite/gdb.chill/pr-6632.exp   | 2 +-
 gdb/testsuite/gdb.chill/pr-8134.exp   | 2 +-
 gdb/testsuite/gdb.chill/pr-8136.exp   | 2 +-
 gdb/testsuite/gdb.chill/result.exp    | 2 +-
 gdb/testsuite/gdb.chill/string.exp    | 2 +-
 gdb/testsuite/gdb.chill/tuples.exp    | 2 +-
 18 files changed, 26 insertions(+), 17 deletions(-)

diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog
index d5a5a7b..5fddd99 100644
--- a/gdb/testsuite/ChangeLog
+++ b/gdb/testsuite/ChangeLog
@@ -1,3 +1,12 @@
+Tue Oct 17 23:02:12 1995  Jeffrey A Law  (law@cygnus.com)
+
+	* Many files: When warning about suppressed tests due to a 
+	nonexistant test binary, avoid incrementing the warning count.
+
+Tue Oct 10 11:00:41 1995  Fred Fish  <fnf@cygnus.com>
+
+	* Makefile.in (TARGET_FLAGS_TO_PASS):  Remove BISON.
+	
 Sun Oct  8 04:23:14 1995  Peter Schauer  (pes@regent.e-technik.tu-muenchen.de)
 
 	* gdb.base/return.exp:  Change xfail from "sparc-*-solaris2.*" to
diff --git a/gdb/testsuite/gdb.chill/callch.exp b/gdb/testsuite/gdb.chill/callch.exp
index 7c369d5..2c5b17e 100644
--- a/gdb/testsuite/gdb.chill/callch.exp
+++ b/gdb/testsuite/gdb.chill/callch.exp
@@ -64,7 +64,7 @@ set srcfile $binfile.ch
 if [skip_chill_tests] then { continue }
 
 if ![file exists $objdir/$subdir/$binfile] then {
-    warning "$binfile does not exist; tests suppressed."
+    warning "$binfile does not exist; tests suppressed." 0
 } else {
     do_tests
 }
diff --git a/gdb/testsuite/gdb.chill/chexp.exp b/gdb/testsuite/gdb.chill/chexp.exp
index 6afef07..b3c00c5 100644
--- a/gdb/testsuite/gdb.chill/chexp.exp
+++ b/gdb/testsuite/gdb.chill/chexp.exp
@@ -444,5 +444,5 @@ if [set_lang_chill] then {
     test_float_literals_accepted
     test_arithmetic_expressions
 } else {
-    warning "$test_name tests suppressed."
+    warning "$test_name tests suppressed." 0
 }
diff --git a/gdb/testsuite/gdb.chill/chillvars.exp b/gdb/testsuite/gdb.chill/chillvars.exp
index 139badd..2c92d33 100644
--- a/gdb/testsuite/gdb.chill/chillvars.exp
+++ b/gdb/testsuite/gdb.chill/chillvars.exp
@@ -313,7 +313,7 @@ set srcfile $binfile.ch
 if [skip_chill_tests] then { continue }
 
 if ![file exists $objdir/$subdir/$binfile] then {
-    warning "$binfile does not exist; tests suppressed."
+    warning "$binfile does not exist; tests suppressed." 0
 } else {
     do_tests
 }
diff --git a/gdb/testsuite/gdb.chill/misc.exp b/gdb/testsuite/gdb.chill/misc.exp
index 7843d7a..9f3d725 100644
--- a/gdb/testsuite/gdb.chill/misc.exp
+++ b/gdb/testsuite/gdb.chill/misc.exp
@@ -36,7 +36,7 @@ proc set_lang_chill {} {
     global binfile objdir subdir
 
     if ![file exists $objdir/$subdir/$binfile] then {
-	warning "$binfile does not exist; tests suppressed."
+	warning "$binfile does not exist; tests suppressed." 0
 	return 1
     }
     verbose "loading file '$objdir/$subdir/$binfile'"
diff --git a/gdb/testsuite/gdb.chill/pr-4975.exp b/gdb/testsuite/gdb.chill/pr-4975.exp
index b237ca4..c7e14db 100644
--- a/gdb/testsuite/gdb.chill/pr-4975.exp
+++ b/gdb/testsuite/gdb.chill/pr-4975.exp
@@ -56,7 +56,7 @@ set srcfile $binfile.ch
 if [skip_chill_tests] then { continue }
 
 if ![file exists $objdir/$subdir/$binfile] then {
-	warning "$objdir/$subdir/$binfile does not exist; tests suppressed."
+	warning "$objdir/$subdir/$binfile does not exist; tests suppressed." 0
 } else {
     do_tests
 }
diff --git a/gdb/testsuite/gdb.chill/pr-5016.exp b/gdb/testsuite/gdb.chill/pr-5016.exp
index 0c93ccd..02beee7 100644
--- a/gdb/testsuite/gdb.chill/pr-5016.exp
+++ b/gdb/testsuite/gdb.chill/pr-5016.exp
@@ -57,7 +57,7 @@ set srcfile $binfile.ch
 if [skip_chill_tests] then { continue }
 
 if ![file exists $objdir/$subdir/$binfile] then {
-    warning "$binfile does not exist; tests suppressed."
+    warning "$binfile does not exist; tests suppressed." 0
 } else {
     do_tests
 }
diff --git a/gdb/testsuite/gdb.chill/pr-5020.exp b/gdb/testsuite/gdb.chill/pr-5020.exp
index aec5965..3f60b23 100644
--- a/gdb/testsuite/gdb.chill/pr-5020.exp
+++ b/gdb/testsuite/gdb.chill/pr-5020.exp
@@ -82,7 +82,7 @@ set srcfile $binfile.ch
 if [skip_chill_tests] then { continue }
 
 if ![file exists $objdir/$subdir/$binfile] then {
-	warning "$objdir/$subdir/$binfile does not exist; tests suppressed."
+	warning "$objdir/$subdir/$binfile does not exist; tests suppressed." 0
 } else {
     do_tests
 }
diff --git a/gdb/testsuite/gdb.chill/pr-5022.exp b/gdb/testsuite/gdb.chill/pr-5022.exp
index 6f30a27..4d6ca5e 100644
--- a/gdb/testsuite/gdb.chill/pr-5022.exp
+++ b/gdb/testsuite/gdb.chill/pr-5022.exp
@@ -67,7 +67,7 @@ set srcfile $binfile.ch
 if [skip_chill_tests] then { continue }
 
 if ![file exists $objdir/$subdir/$binfile] then {
-    warning "$binfile does not exist; tests suppressed."
+    warning "$binfile does not exist; tests suppressed." 0
 } else {
     do_tests
 }
diff --git a/gdb/testsuite/gdb.chill/pr-5646.exp b/gdb/testsuite/gdb.chill/pr-5646.exp
index d069672..fee3b8b 100644
--- a/gdb/testsuite/gdb.chill/pr-5646.exp
+++ b/gdb/testsuite/gdb.chill/pr-5646.exp
@@ -53,7 +53,7 @@ set srcfile $binfile.ch
 if [skip_chill_tests] then { continue }
 
 if ![file exists $objdir/$subdir/$binfile] then {
-    warning "$binfile does not exist; tests suppressed."
+    warning "$binfile does not exist; tests suppressed." 0
 } else {
     do_tests
 }
diff --git a/gdb/testsuite/gdb.chill/pr-5984.exp b/gdb/testsuite/gdb.chill/pr-5984.exp
index c403e33..865ee72 100644
--- a/gdb/testsuite/gdb.chill/pr-5984.exp
+++ b/gdb/testsuite/gdb.chill/pr-5984.exp
@@ -54,7 +54,7 @@ set srcfile $binfile.ch
 if [skip_chill_tests] then { continue }
 
 if ![file exists $objdir/$subdir/$binfile] then {
-    warning "$binfile does not exist; tests suppressed."
+    warning "$binfile does not exist; tests suppressed." 0
 } else {
     do_tests
 }
diff --git a/gdb/testsuite/gdb.chill/pr-6292.exp b/gdb/testsuite/gdb.chill/pr-6292.exp
index 2dd6a36..4d9cd4e 100644
--- a/gdb/testsuite/gdb.chill/pr-6292.exp
+++ b/gdb/testsuite/gdb.chill/pr-6292.exp
@@ -55,7 +55,7 @@ set srcfile $binfile.ch
 if [skip_chill_tests] then { continue }
 
 if ![file exists $objdir/$subdir/$binfile] then {
-    warning "$binfile does not exist; tests suppressed."
+    warning "$binfile does not exist; tests suppressed." 0
 } else {
     do_tests
 }
diff --git a/gdb/testsuite/gdb.chill/pr-6632.exp b/gdb/testsuite/gdb.chill/pr-6632.exp
index efb8898..4fd00dd 100644
--- a/gdb/testsuite/gdb.chill/pr-6632.exp
+++ b/gdb/testsuite/gdb.chill/pr-6632.exp
@@ -54,7 +54,7 @@ set srcfile $binfile.ch
 if [skip_chill_tests] then { continue }
 
 if ![file exists $objdir/$subdir/$binfile] then {
-    warning "$binfile does not exist; tests suppressed."
+    warning "$binfile does not exist; tests suppressed." 0
 } else {
     do_tests
 }
diff --git a/gdb/testsuite/gdb.chill/pr-8134.exp b/gdb/testsuite/gdb.chill/pr-8134.exp
index cfcc733..086d527 100644
--- a/gdb/testsuite/gdb.chill/pr-8134.exp
+++ b/gdb/testsuite/gdb.chill/pr-8134.exp
@@ -54,7 +54,7 @@ set srcfile $binfile.ch
 if [skip_chill_tests] then { continue }
 
 if ![file exists $objdir/$subdir/$binfile] then {
-    warning "$binfile does not exist; tests suppressed."
+    warning "$binfile does not exist; tests suppressed." 0
 } else {
     do_tests
 }
diff --git a/gdb/testsuite/gdb.chill/pr-8136.exp b/gdb/testsuite/gdb.chill/pr-8136.exp
index fa8bd9f..b1bca3f 100644
--- a/gdb/testsuite/gdb.chill/pr-8136.exp
+++ b/gdb/testsuite/gdb.chill/pr-8136.exp
@@ -52,7 +52,7 @@ set srcfile $binfile.ch
 if [skip_chill_tests] then { continue }
 
 if ![file exists $objdir/$subdir/$binfile] then {
-    warning "$binfile does not exist; tests suppressed."
+    warning "$binfile does not exist; tests suppressed." 0
 } else {
     do_tests
 }
diff --git a/gdb/testsuite/gdb.chill/result.exp b/gdb/testsuite/gdb.chill/result.exp
index d07d9a5..a76c953 100644
--- a/gdb/testsuite/gdb.chill/result.exp
+++ b/gdb/testsuite/gdb.chill/result.exp
@@ -65,7 +65,7 @@ set srcfile $binfile.ch
 if [skip_chill_tests] then { continue }
 
 if ![file exists $objdir/$subdir/$binfile] then {
-	warning "$objdir/$subdir/$binfile does not exist; tests suppressed."
+	warning "$objdir/$subdir/$binfile does not exist; tests suppressed." 0
 } else {
     do_tests
 }
diff --git a/gdb/testsuite/gdb.chill/string.exp b/gdb/testsuite/gdb.chill/string.exp
index 1ea6048..e7c7b25 100644
--- a/gdb/testsuite/gdb.chill/string.exp
+++ b/gdb/testsuite/gdb.chill/string.exp
@@ -65,7 +65,7 @@ set srcfile $binfile.ch
 if [skip_chill_tests] then { continue }
 
 if ![file exists $objdir/$subdir/$binfile] then {
-    warning "$binfile does not exist; tests suppressed."
+    warning "$binfile does not exist; tests suppressed." 0
 } else {
     do_tests
 }
diff --git a/gdb/testsuite/gdb.chill/tuples.exp b/gdb/testsuite/gdb.chill/tuples.exp
index eda79da..d32423d 100644
--- a/gdb/testsuite/gdb.chill/tuples.exp
+++ b/gdb/testsuite/gdb.chill/tuples.exp
@@ -124,7 +124,7 @@ set srcfile $binfile.ch
 if [skip_chill_tests] then { continue }
 
 if ![file exists $objdir/$subdir/$binfile] then {
-    warning "$binfile does not exist; tests suppressed."
+    warning "$binfile does not exist; tests suppressed." 0
 } else {
     do_tests
 }
-- 
2.7.4