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:
parent
8a48e96728
commit
396cc25565
2 changed files with 16 additions and 10 deletions
|
@ -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>
|
2002-01-30 Daniel Jacobowitz <drow@mvista.com>
|
||||||
|
|
||||||
From Neil Booth <neil@daikokuya.demon.co.uk>:
|
From Neil Booth <neil@daikokuya.demon.co.uk>:
|
||||||
|
|
|
@ -172,6 +172,15 @@ proc check_philosopher_stack {thread seen_name} {
|
||||||
}
|
}
|
||||||
set interesting 1
|
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 $" {
|
-re "pthread_start_thread.*\r\n$gdb_prompt $" {
|
||||||
## Maybe the thread hasn't started yet.
|
## Maybe the thread hasn't started yet.
|
||||||
pass $name
|
pass $name
|
||||||
|
@ -185,15 +194,6 @@ proc check_philosopher_stack {thread seen_name} {
|
||||||
}
|
}
|
||||||
set interesting 1
|
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 $" {
|
-re " in \\?\\?.*\r\n$gdb_prompt $" {
|
||||||
## Sometimes we can't get a backtrace. I'm going to call
|
## Sometimes we can't get a backtrace. I'm going to call
|
||||||
## this a pass, since we do verify that at least one
|
## 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
|
set any_interesting 0
|
||||||
array set seen {}
|
array unset seen
|
||||||
for {set i 1} {$i <= 7} {incr i} {
|
for {set i 1} {$i <= 7} {incr i} {
|
||||||
if [check_philosopher_stack $i seen] {
|
if [check_philosopher_stack $i seen] {
|
||||||
set any_interesting 1
|
set any_interesting 1
|
||||||
|
|
Loading…
Add table
Reference in a new issue