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.
This commit is contained in:
Daniel Jacobowitz 2002-01-31 05:05:29 +00:00
parent 8a48e96728
commit 396cc25565
2 changed files with 16 additions and 10 deletions

View File

@ -1,3 +1,9 @@
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>:

View File

@ -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