diff options
author | Daniel Jacobowitz <drow@false.org> | 2002-01-31 05:05:29 +0000 |
---|---|---|
committer | Daniel Jacobowitz <drow@false.org> | 2002-01-31 05:05:29 +0000 |
commit | 396cc25565f77fe9eb14153b599dfe8022963cbe (patch) | |
tree | 0a2fccef64cb9da3e90295ff265efe557ee64b26 | |
parent | 8a48e96728f9b0d7f7d56495ce7206e9c9955527 (diff) | |
download | gdb-396cc25565f77fe9eb14153b599dfe8022963cbe.zip gdb-396cc25565f77fe9eb14153b599dfe8022963cbe.tar.gz gdb-396cc25565f77fe9eb14153b599dfe8022963cbe.tar.bz2 |
2002-01-30 Daniel Jacobowitz <drow@mvista.com>
* gdb.threads/linux-dp.exp: Use 'array unset', not 'array set'.
(check_philosopher_stack): Check for manager thread before checking
for a just-starting thread.
-rw-r--r-- | gdb/testsuite/ChangeLog | 6 | ||||
-rw-r--r-- | gdb/testsuite/gdb.threads/linux-dp.exp | 20 |
2 files changed, 16 insertions, 10 deletions
diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog index dd64a30..646132b 100644 --- a/gdb/testsuite/ChangeLog +++ b/gdb/testsuite/ChangeLog @@ -1,5 +1,11 @@ 2002-01-30 Daniel Jacobowitz <drow@mvista.com> + * gdb.threads/linux-dp.exp: Use 'array unset', not 'array set'. + (check_philosopher_stack): Check for manager thread before checking + for a just-starting thread. + +2002-01-30 Daniel Jacobowitz <drow@mvista.com> + From Neil Booth <neil@daikokuya.demon.co.uk>: * gdb.base/bitfields.c: Correct assignments to bitfields to avoid warnings. diff --git a/gdb/testsuite/gdb.threads/linux-dp.exp b/gdb/testsuite/gdb.threads/linux-dp.exp index bdb3209..0ce94c0 100644 --- a/gdb/testsuite/gdb.threads/linux-dp.exp +++ b/gdb/testsuite/gdb.threads/linux-dp.exp @@ -172,6 +172,15 @@ proc check_philosopher_stack {thread seen_name} { } set interesting 1 } + -re ".* in __pthread_manager \\(.*$gdb_prompt $" { + if {$manager_seen == 1} { + fail "manager thread is distinct: $thread" + } else { + set manager_seen 1 + pass "manager thread is distinct: $thread" + } + set interesting 1 + } -re "pthread_start_thread.*\r\n$gdb_prompt $" { ## Maybe the thread hasn't started yet. pass $name @@ -185,15 +194,6 @@ proc check_philosopher_stack {thread seen_name} { } set interesting 1 } - -re ".* in __pthread_manager \\(.*$gdb_prompt $" { - if {$manager_seen == 1} { - fail "manager thread is distinct: $thread" - } else { - set manager_seen 1 - pass "manager thread is distinct: $thread" - } - set interesting 1 - } -re " in \\?\\?.*\r\n$gdb_prompt $" { ## Sometimes we can't get a backtrace. I'm going to call ## this a pass, since we do verify that at least one @@ -214,7 +214,7 @@ proc check_philosopher_stack {thread seen_name} { } set any_interesting 0 -array set seen {} +array unset seen for {set i 1} {$i <= 7} {incr i} { if [check_philosopher_stack $i seen] { set any_interesting 1 |