From: Jim Kingdon <jkingdon@engr.sgi.com>
Date: Thu, 2 Mar 1995 14:23:40 +0000 (+0000)
Subject: 	* misc.exp: If executable does not exist, issue warning and skip
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=ff0a7ea5cd3c287ba044c9c1bb771b687ad7158e;p=binutils-gdb.git

	* misc.exp: If executable does not exist, issue warning and skip
	remaining tests, like other chill tests.
---

diff --git a/gdb/testsuite/gdb.chill/ChangeLog b/gdb/testsuite/gdb.chill/ChangeLog
index 8446b095ebb..049b54f3e08 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  <bothner@kalessin.cygnus.com>
 
 	* 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 a1f3123aea4..a12bdb88e84 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