From 00c916f4a83950d361c50aab635ca2ecf6c218f7 Mon Sep 17 00:00:00 2001 From: Jeff Law 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 d5a5a7b2aa5..5fddd994b65 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 + + * 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 7c369d5afb3..2c5b17e32cc 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 6afef0789e8..b3c00c5d213 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 139baddc81f..2c92d33f547 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 7843d7ae701..9f3d72545f0 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 b237ca441b8..c7e14db3c4f 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 0c93ccd14ff..02beee73392 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 aec59651b9d..3f60b23f7e2 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 6f30a276356..4d6ca5e229c 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 d0696728ee3..fee3b8bfe95 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 c403e331ab7..865ee728e9e 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 2dd6a362403..4d9cd4e39fb 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 efb88984c9a..4fd00dd5021 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 cfcc733c42d..086d527ea1b 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 fa8bd9f524e..b1bca3f0afb 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 d07d9a5b159..a76c95304a2 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 1ea6048280d..e7c7b256fae 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 eda79da2998..d32423d75e9 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.30.2