From: Daniel Jacobowitz <drow@false.org>
Date: Mon, 9 Feb 2004 22:45:35 +0000 (+0000)
Subject: 	* gdb.threads/thread-specific.exp: Stop early if no threads are
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=9cf689d7c72646cc23d60fd81e8f593876913488;p=binutils-gdb.git

	* gdb.threads/thread-specific.exp: Stop early if no threads are
	found.
---

diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog
index 08abd625056..93287a53c72 100644
--- a/gdb/testsuite/ChangeLog
+++ b/gdb/testsuite/ChangeLog
@@ -1,3 +1,8 @@
+2004-02-09  Daniel Jacobowitz  <drow@mvista.com>
+
+	* gdb.threads/thread-specific.exp: Stop early if no threads are
+	found.
+
 2004-02-09  Michael Chastain  <mec.gnu@mindspring.com>
 
 	* gdb.base/pending.exp: Remove extra \n from gdb_test calls.
diff --git a/gdb/testsuite/gdb.threads/thread-specific.exp b/gdb/testsuite/gdb.threads/thread-specific.exp
index ffcaaad1762..66f0bd2261c 100644
--- a/gdb/testsuite/gdb.threads/thread-specific.exp
+++ b/gdb/testsuite/gdb.threads/thread-specific.exp
@@ -86,6 +86,11 @@ gdb_continue_to_breakpoint "all threads started"
 set line [gdb_get_line_number "thread-specific.exp: thread loop"]
 set threads [get_thread_list]
 
+if {[llength $threads] == 0} {
+  # We have already issued a FAIL above.
+  return 1
+}
+
 gdb_test_multiple "break $line thread [lindex $threads 0]" \
   "breakpoint $line main thread" {
     -re "Breakpoint (\[0-9\]*) at.* file .*$srcfile, line.*$gdb_prompt $" {