gdb/testsuite/
* gdb.base/maint.exp: Expect "." prefix. * gdb.base/nodebug.exp: Expect "." Likewise. * gdb.base/sepsymtab.exp: Expect "." Likewise. * gdb.base/watchpoint-cond-gone.exp: Likewise. * gdb.base/watchpoint.exp: Expect a software watch to be created for POWER server processors.
This commit is contained in:
parent
d9435e4b81
commit
efd11a33a1
|
@ -1,3 +1,13 @@
|
|||
2010-11-09 Edjunior Machado <emachado@br.ibm.com>
|
||||
Luis Machado <luisgpm@br.ibm.com>
|
||||
|
||||
* gdb.base/maint.exp: Expect "." prefix.
|
||||
* gdb.base/nodebug.exp: Expect "." Likewise.
|
||||
* gdb.base/sepsymtab.exp: Expect "." Likewise.
|
||||
* gdb.base/watchpoint-cond-gone.exp: Likewise.
|
||||
* gdb.base/watchpoint.exp: Expect a software watch to be created for
|
||||
POWER server processors.
|
||||
|
||||
2010-11-08 Edjunior Machado <emachado@br.ibm.com>
|
||||
Luis Machado <luisgpm@br.ibm.com>
|
||||
|
||||
|
|
|
@ -253,7 +253,7 @@ gdb_expect {
|
|||
-re "msymbols_output\r\n$gdb_prompt $" {
|
||||
send_gdb "shell grep factorial msymbols_output\n"
|
||||
gdb_expect {
|
||||
-re "\\\[ *$decimal\\\] \[tT\]\[ \t\]+$hex factorial.*$gdb_prompt $" {
|
||||
-re "\\\[ *$decimal\\\] \[tT\]\[ \t\]+$hex \\.?factorial.*$gdb_prompt $" {
|
||||
pass "maint print msymbols"
|
||||
}
|
||||
-re ".*$gdb_prompt $" { fail "maint print msymbols" }
|
||||
|
@ -280,7 +280,7 @@ gdb_test_multiple "maint print msymbols msymbols_output2 ${subdir}/${testfile}"
|
|||
gdb_test_multiple "shell ls msymbols_output2" "maint print msymbols" {
|
||||
-re "msymbols_output2\r\n$gdb_prompt $" {
|
||||
gdb_test_multiple "shell grep factorial msymbols_output2" "maint print msymbols" {
|
||||
-re "\\\[ *$decimal\\\] \[tT\]\[ \t\]+$hex factorial.*$gdb_prompt $" {
|
||||
-re "\\\[ *$decimal\\\] \[tT\]\[ \t\]+$hex \\.?factorial.*$gdb_prompt $" {
|
||||
pass "maint print msymbols"
|
||||
}
|
||||
-re ".*$gdb_prompt $" {
|
||||
|
|
|
@ -75,7 +75,7 @@ if [runto inner] then {
|
|||
|
||||
if {![test_compiler_info "gcc-*"]} then { setup_xfail "mips-sgi-irix5*" "mips-sgi-irix6*" }
|
||||
gdb_test "p top" \
|
||||
"\{(<(text variable|function), no debug info>|short \\(int\\)|short \\(\\))\} \[0-9a-fx]* <top(\\(int\\)|)>"
|
||||
"\{(<(text variable|function), no debug info>|short \\(int\\)|short \\(\\))\} \[0-9a-fx]* <\\.?top(\\(int\\)|)>"
|
||||
if {![test_compiler_info "gcc-*"]} then { setup_xfail "mips-sgi-irix5*" "mips-sgi-irix6*" }
|
||||
gdb_test "whatis top" \
|
||||
"(<(text variable|function), no debug info>|short \\(int\\)|short \\(\\))"
|
||||
|
@ -85,7 +85,7 @@ if [runto inner] then {
|
|||
if {![test_compiler_info "gcc-*"]} then { setup_xfail "mips-sgi-irix5*" }
|
||||
setup_xfail "mips-sgi-irix6*"
|
||||
gdb_test "p middle" \
|
||||
"\{(<(text variable|function), no debug info>|short \\(int\\)|short \\(\\))\} \[0-9a-fx]* <middle(\\(int\\)|)>"
|
||||
"\{(<(text variable|function), no debug info>|short \\(int\\)|short \\(\\))\} \[0-9a-fx]* <\\.?middle(\\(int\\)|)>"
|
||||
if {![test_compiler_info "gcc-*"]} then { setup_xfail "mips-sgi-irix5*" }
|
||||
setup_xfail "mips-sgi-irix6*"
|
||||
gdb_test "whatis middle" \
|
||||
|
|
|
@ -45,7 +45,7 @@ gdb_load ${binfile}
|
|||
set command "info sym main"
|
||||
set command_regex [string_to_regexp $command]
|
||||
gdb_test_multiple "$command" "$command" {
|
||||
-re "^${command_regex}\[\r\n\]+main in section \[^\r\n\]+\[\r\n\]+$gdb_prompt \$" {
|
||||
-re "^${command_regex}\[\r\n\]+\\.?main in section \[^\r\n\]+\[\r\n\]+$gdb_prompt \$" {
|
||||
pass "$command"
|
||||
}
|
||||
}
|
||||
|
|
|
@ -46,6 +46,7 @@ gdb_test "watch c if c == 30" "atchpoint \[0-9\]*.*" "Place the watchpoint"
|
|||
|
||||
# We may stay either in the function itself or only at the first instruction of
|
||||
# its caller depending on the epilogue unwinder (or valid epilogue CFI) presence.
|
||||
|
||||
gdb_test "finish" \
|
||||
"Watchpoint .* deleted because the program has left the block in.*which its expression is valid..*in (jumper|func).*" \
|
||||
"Watchpoint .* deleted because the program has left the block in.*which its expression is valid..*in (\\.?jumper|func).*" \
|
||||
"Catch the no longer valid watchpoint"
|
||||
|
|
|
@ -683,7 +683,13 @@ proc test_inaccessible_watchpoint {} {
|
|||
"$watchpoint_msg \[0-9\]+: \\*\\(int \\*\\) 0"
|
||||
delete_breakpoints
|
||||
|
||||
gdb_test "watch *global_ptr" "$watchpoint_msg \[0-9\]+: \\*global_ptr"
|
||||
# This step requires two HW watchpoints. Since PPC Server only has
|
||||
# a single one, it will use a SW watchpoint in this case.
|
||||
if [istarget powerpc64-*] {
|
||||
set watchpoint_msg "Watchpoint"
|
||||
}
|
||||
|
||||
gdb_test "watch *global_ptr" "$watchpoint_msg \[0-9\]+: \\\*global_ptr"
|
||||
gdb_test "set \$global_ptr_breakpoint_number = \$bpnum" ""
|
||||
gdb_test "next" ".*global_ptr = buf.*" "global_ptr next"
|
||||
gdb_test_multiple "next" "next over ptr init" {
|
||||
|
|
Loading…
Reference in New Issue