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

found.

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.

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 $" {