From 9cf689d7c72646cc23d60fd81e8f593876913488 Mon Sep 17 00:00:00 2001 From: Daniel Jacobowitz Date: Mon, 9 Feb 2004 22:45:35 +0000 Subject: [PATCH] * gdb.threads/thread-specific.exp: Stop early if no threads are found. --- gdb/testsuite/ChangeLog | 5 +++++ gdb/testsuite/gdb.threads/thread-specific.exp | 5 +++++ 2 files changed, 10 insertions(+) diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog index 08abd62..93287a5 100644 --- a/gdb/testsuite/ChangeLog +++ b/gdb/testsuite/ChangeLog @@ -1,3 +1,8 @@ +2004-02-09 Daniel Jacobowitz + + * gdb.threads/thread-specific.exp: Stop early if no threads are + found. + 2004-02-09 Michael Chastain * 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 ffcaaad..66f0bd2 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 $" { -- 2.7.4