* gdb.base/sigall.exp (test_one_sig): Attempt to recover if
"get signal $thissig" test fails.
This commit is contained in:
parent
8248d21bd9
commit
2d593cdda9
2 changed files with 23 additions and 5 deletions
|
@ -1,5 +1,8 @@
|
||||||
Sat Jan 14 11:25:28 1995 Jim Kingdon <kingdon@lioth.cygnus.com>
|
Sat Jan 14 11:25:28 1995 Jim Kingdon <kingdon@lioth.cygnus.com>
|
||||||
|
|
||||||
|
* gdb.base/sigall.exp (test_one_sig): Attempt to recover if
|
||||||
|
"get signal $thissig" test fails.
|
||||||
|
|
||||||
* gdb.base/setvar.exp: Check for and reject crazy expected type hacks.
|
* gdb.base/setvar.exp: Check for and reject crazy expected type hacks.
|
||||||
|
|
||||||
Thu Jan 12 01:14:53 1995 Jim Kingdon <kingdon@lioth.cygnus.com>
|
Thu Jan 12 01:14:53 1995 Jim Kingdon <kingdon@lioth.cygnus.com>
|
||||||
|
|
|
@ -43,15 +43,30 @@ proc test_one_sig {nextsig} {
|
||||||
"SIG$thissig\[ \t\]*Yes\[ \t\]*Yes\[ \t\]*Yes"
|
"SIG$thissig\[ \t\]*Yes\[ \t\]*Yes\[ \t\]*Yes"
|
||||||
gdb_test "b handle_$thissig" "Breakpoint \[0-9\]"
|
gdb_test "b handle_$thissig" "Breakpoint \[0-9\]"
|
||||||
gdb_test "b gen_$nextsig" "Breakpoint \[0-9\]"
|
gdb_test "b gen_$nextsig" "Breakpoint \[0-9\]"
|
||||||
|
|
||||||
|
set need_another_continue 1
|
||||||
if $this_sig_supported then {
|
if $this_sig_supported then {
|
||||||
gdb_test "continue" \
|
send "continue\n"
|
||||||
"Continuing.*Program received signal SIG$thissig" \
|
expect {
|
||||||
"get signal $thissig"
|
-re "Continuing.*Program received signal SIG$thissig.*$prompt $" {
|
||||||
|
pass "get signal $thissig"
|
||||||
|
}
|
||||||
|
-re ".*$prompt $" {
|
||||||
|
fail "get signal $thissig"
|
||||||
|
set need_another_continue 0
|
||||||
|
}
|
||||||
|
default {
|
||||||
|
fail "get signal $thissig (eof or timeout)"
|
||||||
|
}
|
||||||
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
gdb_test "continue" "Breakpoint.*handle_$thissig" "send signal $thissig"
|
if $need_another_continue then {
|
||||||
|
gdb_test "continue" \
|
||||||
|
"Breakpoint.*handle_$thissig" "send signal $thissig"
|
||||||
|
}
|
||||||
|
|
||||||
send "continue\n"
|
send "signal 0\n"
|
||||||
expect {
|
expect {
|
||||||
-re "Breakpoint.*gen_$nextsig.*kill.*$prompt $" {
|
-re "Breakpoint.*gen_$nextsig.*kill.*$prompt $" {
|
||||||
pass "advance to $nextsig"
|
pass "advance to $nextsig"
|
||||||
|
|
Loading…
Reference in a new issue