MatCat.OpenSource/8sa1-binutils-gdb
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

* gdb.mi/mi-watch.exp (test_watchpoint_all): Pass the watchpoint

Browse Source 
type down.
(test_watchpoint_triggering): XFAIL the sw watchpoint scope
test.
* gdb.mi/mi2-watch.exp (test_watchpoint_all): Pass the
watchpoint type down.
(test_watchpoint_triggering): XFAIL the sw watchpoint scope
test.
This commit is contained in:
Maciej W. Rozycki 2007-09-14 17:37:55 +00:00
parent 5509918fe4
commit 4a543daf06
3 changed files with 35 additions and 17 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
gdb/testsuite/ChangeLog
View File

@ -1,6 +1,16 @@
2007-09-14 Maciej W. Rozycki <macro@mips.com> 2007-09-14 Maciej W. Rozycki <macro@mips.com>
[mti-fix-scope] * gdb.mi/mi-watch.exp (test_watchpoint_all): Pass the watchpoint
type down.
(test_watchpoint_triggering): XFAIL the sw watchpoint scope
test.
* gdb.mi/mi2-watch.exp (test_watchpoint_all): Pass the
watchpoint type down.
(test_watchpoint_triggering): XFAIL the sw watchpoint scope
test.
2007-09-14 Maciej W. Rozycki <macro@mips.com>
* gdb.mi/mi-watch.exp (test_watchpoint_all): New function. * gdb.mi/mi-watch.exp (test_watchpoint_all): New function.
Move all the tests here and run them twice, once using software Move all the tests here and run them twice, once using software
watchpoints and once using hardware watchpoints. watchpoints and once using hardware watchpoints.

20
gdb/testsuite/gdb.mi/mi-watch.exp
View File

@ -41,7 +41,7 @@ if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {deb
return -1 return -1
} }
proc test_watchpoint_creation_and_listing {} { proc test_watchpoint_creation_and_listing {type} {
global mi_gdb_prompt global mi_gdb_prompt
global srcfile global srcfile
global hex global hex
@ -65,7 +65,7 @@ proc test_watchpoint_creation_and_listing {} {
} }
# UNUSED at the time # UNUSED at the time
proc test_awatch_creation_and_listing {} { proc test_awatch_creation_and_listing {type} {
global mi_gdb_prompt global mi_gdb_prompt
global srcfile global srcfile
global hex global hex
@ -92,7 +92,7 @@ proc test_awatch_creation_and_listing {} {
} }
# UNUSED at the time # UNUSED at the time
proc test_rwatch_creation_and_listing {} { proc test_rwatch_creation_and_listing {type} {
global mi_gdb_prompt global mi_gdb_prompt
global srcfile global srcfile
global hex global hex
@ -118,7 +118,7 @@ proc test_rwatch_creation_and_listing {} {
"delete read watchpoint" "delete read watchpoint"
} }
proc test_watchpoint_triggering {} { proc test_watchpoint_triggering {type} {
global mi_gdb_prompt global mi_gdb_prompt
global hex fullname_syntax srcfile global hex fullname_syntax srcfile
@ -147,6 +147,9 @@ proc test_watchpoint_triggering {} {
timeout {fail "watchpoint trigger (timeout 1)"} timeout {fail "watchpoint trigger (timeout 1)"}
} }
if { $type == "sw" } {
setup_xfail *-*-*
}
send_gdb "223-exec-continue\n" send_gdb "223-exec-continue\n"
gdb_expect { gdb_expect {
-re "223\\^running\r\n$mi_gdb_prompt" { -re "223\\^running\r\n$mi_gdb_prompt" {
@ -161,6 +164,7 @@ proc test_watchpoint_triggering {} {
-re ".*$mi_gdb_prompt$" {fail "wp out of scope (1)"} -re ".*$mi_gdb_prompt$" {fail "wp out of scope (1)"}
timeout {fail "wp out of scope (timeout 1)"} timeout {fail "wp out of scope (timeout 1)"}
} }
clear_xfail *-*-*
} }
proc test_watchpoint_all {type} { proc test_watchpoint_all {type} {
@ -177,10 +181,10 @@ proc test_watchpoint_all {type} {
mi_gdb_load ${binfile} mi_gdb_load ${binfile}
mi_runto callee4 mi_runto callee4
test_watchpoint_creation_and_listing test_watchpoint_creation_and_listing $type
#test_rwatch_creation_and_listing #test_rwatch_creation_and_listing $type
#test_awatch_creation_and_listing #test_awatch_creation_and_listing $type
test_watchpoint_triggering test_watchpoint_triggering $type
set pf_prefix $old_prefix set pf_prefix $old_prefix
} }

20
gdb/testsuite/gdb.mi/mi2-watch.exp
View File

@ -41,7 +41,7 @@ if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {deb
return -1 return -1
} }
proc test_watchpoint_creation_and_listing {} { proc test_watchpoint_creation_and_listing {type} {
global mi_gdb_prompt global mi_gdb_prompt
global srcfile global srcfile
global hex global hex
@ -65,7 +65,7 @@ proc test_watchpoint_creation_and_listing {} {
} }
# UNUSED at the time # UNUSED at the time
proc test_awatch_creation_and_listing {} { proc test_awatch_creation_and_listing {type} {
global mi_gdb_prompt global mi_gdb_prompt
global srcfile global srcfile
global hex global hex
@ -92,7 +92,7 @@ proc test_awatch_creation_and_listing {} {
} }
# UNUSED at the time # UNUSED at the time
proc test_rwatch_creation_and_listing {} { proc test_rwatch_creation_and_listing {type} {
global mi_gdb_prompt global mi_gdb_prompt
global srcfile global srcfile
global hex global hex
@ -118,7 +118,7 @@ proc test_rwatch_creation_and_listing {} {
"delete read watchpoint" "delete read watchpoint"
} }
proc test_watchpoint_triggering {} { proc test_watchpoint_triggering {type} {
global mi_gdb_prompt global mi_gdb_prompt
global hex global hex
@ -147,6 +147,9 @@ proc test_watchpoint_triggering {} {
timeout {fail "watchpoint trigger (timeout 1)"} timeout {fail "watchpoint trigger (timeout 1)"}
} }
if { $type == "sw" } {
setup_xfail *-*-*
}
send_gdb "223-exec-continue\n" send_gdb "223-exec-continue\n"
gdb_expect { gdb_expect {
-re "223\\^running\r\n$mi_gdb_prompt" { -re "223\\^running\r\n$mi_gdb_prompt" {
@ -161,6 +164,7 @@ proc test_watchpoint_triggering {} {
-re ".*$mi_gdb_prompt$" {fail "wp out of scope (1)"} -re ".*$mi_gdb_prompt$" {fail "wp out of scope (1)"}
timeout {fail "wp out of scope (timeout 1)"} timeout {fail "wp out of scope (timeout 1)"}
} }
clear_xfail *-*-*
} }
proc test_watchpoint_all {type} { proc test_watchpoint_all {type} {
@ -177,10 +181,10 @@ proc test_watchpoint_all {type} {
mi_gdb_load ${binfile} mi_gdb_load ${binfile}
mi_runto callee4 mi_runto callee4
test_watchpoint_creation_and_listing test_watchpoint_creation_and_listing $type
#test_rwatch_creation_and_listing #test_rwatch_creation_and_listing $type
#test_awatch_creation_and_listing #test_awatch_creation_and_listing $type
test_watchpoint_triggering test_watchpoint_triggering $type
set pf_prefix $old_prefix set pf_prefix $old_prefix
} }