* gdb.base/sigall.exp (test_one_sig): Attempt to recover if

"get signal $thissig" test fails.
This commit is contained in:
Jim Kingdon 1995-01-14 18:23:51 +00:00
parent 8248d21bd9
commit 2d593cdda9
2 changed files with 23 additions and 5 deletions

View file

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

View file

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