2004-07-13 Andrew Cagney <cagney@gnu.org>

* gdb.base/signull.exp (test_segv): Prefix all tests with
	"${name}".  Clean up test messages.
This commit is contained in:
Andrew Cagney 2004-07-13 13:44:01 +00:00
parent b475183b5c
commit ec58997a7b
2 changed files with 13 additions and 8 deletions

View File

@ -1,5 +1,8 @@
2004-07-13 Andrew Cagney <cagney@gnu.org>
* gdb.base/signull.exp (test_segv): Prefix all tests with
"${name}". Clean up test messages.
* gdb.base/annota3.exp, gdb.base/annota1.exp: Update copyright.
* gdb.base/ena-dis-br.exp: Update copyright.

View File

@ -101,18 +101,20 @@ gdb_test "handle SIGSEGV" "SIGSEGV.*Yes.*Yes.*Yes.*Segmentation fault"
# through the SEGV works.
proc test_segv { name tag bt_from_segv bt_from_keeper } {
gdb_test continue "Breakpoint.* bowler.*" "${name} starts with the bowler"
gdb_test "set test = $tag"
gdb_test continue "Program received signal SIGSEGV.*" "${name} got SEGV"
gdb_test backtrace $bt_from_segv "backtrace segv for ${name}"
gdb_test continue "Breakpoint.* keeper.*" "${name} through to keeper"
gdb_test backtrace $bt_from_keeper "backtrace keeper for ${name}"
gdb_test continue "Breakpoint.* bowler.*" "${name}; start with the bowler"
# NB: Don't use $tag in the testname - changes across systems.
gdb_test "set test = $tag" "" "${name}; select the pointer type"
gdb_test continue "Program received signal SIGSEGV.*" \
"${name}; take the SIGSEGV"
gdb_test backtrace $bt_from_segv "${name}; backtrace from SIGSEGV"
gdb_test continue "Breakpoint.* keeper.*" "${name}; continue to the keeper"
gdb_test backtrace $bt_from_keeper "${name}; backtrace from keeper through SIGSEGV"
}
test_segv data-read data_read \
test_segv "data read" data_read \
{#0 .* bowler .*#1 .* main .*} \
{#0 .* keeper .*#1 .* handler .*#2 .* bowler .*#3 .* main .*}
test_segv data-write data_write \
test_segv "data write" data_write \
{#0 .* bowler .*#1 .* main .*} \
{#0 .* keeper .*#1 .* handler .*#2 .* bowler .*#3 .* main .*}
test_segv code $function_pointer \