From ff0a7ea5cd3c287ba044c9c1bb771b687ad7158e Mon Sep 17 00:00:00 2001 From: Jim Kingdon Date: Thu, 2 Mar 1995 14:23:40 +0000 Subject: [PATCH] * misc.exp: If executable does not exist, issue warning and skip remaining tests, like other chill tests. --- gdb/testsuite/gdb.chill/ChangeLog | 5 +++++ gdb/testsuite/gdb.chill/misc.exp | 3 ++- 2 files changed, 7 insertions(+), 1 deletion(-) diff --git a/gdb/testsuite/gdb.chill/ChangeLog b/gdb/testsuite/gdb.chill/ChangeLog index 8446b095eb..049b54f3e0 100644 --- a/gdb/testsuite/gdb.chill/ChangeLog +++ b/gdb/testsuite/gdb.chill/ChangeLog @@ -1,3 +1,8 @@ +Thu Mar 2 06:17:41 1995 Jim Kingdon (kingdon@lioth.cygnus.com) + + * misc.exp: If executable does not exist, issue warning and skip + remaining tests, like other chill tests. + Wed Mar 1 20:28:42 1995 Per Bothner * misc.ch, misc.exp, Makefile.in: New test case. diff --git a/gdb/testsuite/gdb.chill/misc.exp b/gdb/testsuite/gdb.chill/misc.exp index a1f3123aea..a12bdb88e8 100644 --- a/gdb/testsuite/gdb.chill/misc.exp +++ b/gdb/testsuite/gdb.chill/misc.exp @@ -36,7 +36,8 @@ proc set_lang_chill {} { global binfile objdir subdir if ![file exists $objdir/$subdir/$binfile] then { - return 0 + warning "$binfile does not exist; tests suppressed." + return 1 } verbose "loading file '$objdir/$subdir/$binfile'" gdb_load $objdir/$subdir/$binfile