2004-07-19 Michael Chastain <mec.gnu@mindspring.com>

Fix PR cli/740.
	* gdb.base/annota1.exp: Honor gdb,nosignals.
	* gdb.base/annota3.exp: Likewise.
This commit is contained in:
Michael Chastain
2004-07-20 00:24:41 +00:00
parent 3628158c3e
commit ab618a0235
3 changed files with 105 additions and 72 deletions

View File

@ -1,3 +1,16 @@
2004-07-19 Michael Chastain <mec.gnu@mindspring.com>
Fix PR cli/740.
* gdb.base/annota1.exp: Honor gdb,nosignals.
* gdb.base/annota3.exp: Likewise.
2004-07-19 Michael Chastain <mec.gnu@mindspring.com>
* gdb.ada/gnat_ada.gpr.in: Rename from here ...
* gdb.ada/gnat_ada.gin: ... to here.
* configure.in: Use gnat_ada.gin.
* configure: Regenerate.
2004-07-19 Michael Chastain <mec.gnu@mindspring.com>
* lib/java.exp: Update copyright notice.

View File

@ -269,6 +269,11 @@ gdb_expect {
# annotate-arg-value
# annotate-arg-end
#
if [target_info exists gdb,nosignals] {
unsupported "send SIGUSR1"
unsupported "backtrace @ signal handler"
} else {
send_gdb "signal SIGUSR1\n"
gdb_expect {
-re "\r\n\032\032post-prompt\r\nContinuing with signal SIGUSR1.\r\n\r\n\032\032starting\r\n\r\n\032\032frames-invalid\r\n\r\n\032\032breakpoint 2\r\n\r\nBreakpoint 2, \r\n\032\032frame-begin 0 $hex\r\n\r\n\032\032frame-function-name\r\nhandle_USR1\r\n\032\032frame-args\r\n \\(\r\n\032\032arg-begin\r\nsig\r\n\032\032arg-name-end\r\n=\r\n\032\032arg-value -\r\n$decimal\r\n\032\032arg-end\r\n\\)\r\n\032\032frame-source-begin\r\n at \r\n\032\032frame-source-file\r\n${escapedsrcfile}\r\n\032\032frame-source-file-end\r\n:\r\n\032\032frame-source-line\r\n.*\r\n\032\032frame-source-end\r\n\r\n\r\n\032\032source.*annota1.c:.*:.*:beg:$hex\r\n\r\n\032\032frame-end\r\n\r\n\032\032stopped\r\n$gdb_prompt$" \
@ -280,7 +285,6 @@ gdb_expect {
timeout { fail "send SIGUSR1 (timeout)" }
}
#
# test:
# annotate-signal-handler-caller
@ -299,6 +303,7 @@ gdb_expect {
-re ".*$gdb_prompt$" { fail "backtrace @ signal handler" }
timeout { fail "backtrace @ signal handler (timeout)" }
}
}
#
# delete all the breakpoints
@ -446,6 +451,10 @@ gdb_expect {
# It has been verified that other signals will be delivered. However,
# rather than twiddle the test, I choose to leave it as-is as it
# exposes an interesting failure on hpux11.
if [target_info exists gdb,nosignals] {
unsupported "signal sent"
} else {
setup_xfail hppa*-*-hpux11*
send_gdb "signal SIGTRAP\n"
gdb_expect {
@ -454,6 +463,7 @@ gdb_expect {
-re ".*$gdb_prompt$" { fail "signal sent" }
timeout { fail "signal sent (timeout)" }
}
}
# Check for production of a core file and remove it!

View File

@ -217,6 +217,11 @@ gdb_expect_list "backtrace from shlibrary" "$gdb_prompt$" {
#
# test printing a frame with some arguments:
#
if [target_info exists gdb,nosignals] {
unsupported "send SIGUSR1"
unsupported "backtrace @ signal handler"
} else {
send_gdb "signal SIGUSR1\n"
gdb_expect_list "send SIGUSR1" "$gdb_prompt$" {
"\r\n\032\032post-prompt\r\n"
@ -229,7 +234,6 @@ gdb_expect_list "send SIGUSR1" "$gdb_prompt$" {
"\r\n\032\032stopped\r\n"
}
#
# test:
#
@ -246,6 +250,7 @@ gdb_expect_list "backtrace @ signal handler" "$gdb_prompt$" {
"#2 .* printf \[^\r\n\]+\r\n"
"#3 .* main \[^\r\n\]+\r\n"
}
}
#
# delete all the breakpoints
@ -369,6 +374,10 @@ gdb_expect_list "breakpoint ignore count" "$gdb_prompt$" {
# It has been verified that other signals will be delivered. However,
# rather than twiddle the test, I choose to leave it as-is as it
# exposes an interesting failure on hpux11.
if [target_info exists gdb,nosignals] {
unsupported "signal sent"
} else {
setup_xfail hppa*-*-hpux11*
send_gdb "signal SIGTRAP\n"
gdb_expect_list "signal sent" "$gdb_prompt$" {
@ -382,6 +391,7 @@ gdb_expect_list "signal sent" "$gdb_prompt$" {
"The program no longer exists.\r\n"
"\r\n\032\032stopped\r\n"
}
}
# Check for production of a core file and remove it!