diff options
author | Maciej W. Rozycki <macro@linux-mips.org> | 2007-09-14 17:37:55 +0000 |
---|---|---|
committer | Maciej W. Rozycki <macro@linux-mips.org> | 2007-09-14 17:37:55 +0000 |
commit | 4a543daf06146700e2fcdc4d50a4d28c072b88cd (patch) | |
tree | b58558519091f33f9cda684b0230146bcb7fabaf /gdb/testsuite | |
parent | 5509918fe41a6057f55bed6038c847026cb47a99 (diff) | |
download | gdb-4a543daf06146700e2fcdc4d50a4d28c072b88cd.zip gdb-4a543daf06146700e2fcdc4d50a4d28c072b88cd.tar.gz gdb-4a543daf06146700e2fcdc4d50a4d28c072b88cd.tar.bz2 |
* 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.
Diffstat (limited to 'gdb/testsuite')
-rw-r--r-- | gdb/testsuite/ChangeLog | 12 | ||||
-rw-r--r-- | gdb/testsuite/gdb.mi/mi-watch.exp | 20 | ||||
-rw-r--r-- | gdb/testsuite/gdb.mi/mi2-watch.exp | 20 |
3 files changed, 35 insertions, 17 deletions
diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog index 7ae2325..188db16 100644 --- a/gdb/testsuite/ChangeLog +++ b/gdb/testsuite/ChangeLog @@ -1,6 +1,16 @@ 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. Move all the tests here and run them twice, once using software watchpoints and once using hardware watchpoints. diff --git a/gdb/testsuite/gdb.mi/mi-watch.exp b/gdb/testsuite/gdb.mi/mi-watch.exp index 0f23b31..c96d20d 100644 --- a/gdb/testsuite/gdb.mi/mi-watch.exp +++ b/gdb/testsuite/gdb.mi/mi-watch.exp @@ -41,7 +41,7 @@ if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {deb return -1 } -proc test_watchpoint_creation_and_listing {} { +proc test_watchpoint_creation_and_listing {type} { global mi_gdb_prompt global srcfile global hex @@ -65,7 +65,7 @@ proc test_watchpoint_creation_and_listing {} { } # UNUSED at the time -proc test_awatch_creation_and_listing {} { +proc test_awatch_creation_and_listing {type} { global mi_gdb_prompt global srcfile global hex @@ -92,7 +92,7 @@ proc test_awatch_creation_and_listing {} { } # UNUSED at the time -proc test_rwatch_creation_and_listing {} { +proc test_rwatch_creation_and_listing {type} { global mi_gdb_prompt global srcfile global hex @@ -118,7 +118,7 @@ proc test_rwatch_creation_and_listing {} { "delete read watchpoint" } -proc test_watchpoint_triggering {} { +proc test_watchpoint_triggering {type} { global mi_gdb_prompt global hex fullname_syntax srcfile @@ -147,6 +147,9 @@ proc test_watchpoint_triggering {} { timeout {fail "watchpoint trigger (timeout 1)"} } + if { $type == "sw" } { + setup_xfail *-*-* + } send_gdb "223-exec-continue\n" gdb_expect { -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)"} timeout {fail "wp out of scope (timeout 1)"} } + clear_xfail *-*-* } proc test_watchpoint_all {type} { @@ -177,10 +181,10 @@ proc test_watchpoint_all {type} { mi_gdb_load ${binfile} mi_runto callee4 - test_watchpoint_creation_and_listing - #test_rwatch_creation_and_listing - #test_awatch_creation_and_listing - test_watchpoint_triggering + test_watchpoint_creation_and_listing $type + #test_rwatch_creation_and_listing $type + #test_awatch_creation_and_listing $type + test_watchpoint_triggering $type set pf_prefix $old_prefix } diff --git a/gdb/testsuite/gdb.mi/mi2-watch.exp b/gdb/testsuite/gdb.mi/mi2-watch.exp index 938e6d6..5de5f3a 100644 --- a/gdb/testsuite/gdb.mi/mi2-watch.exp +++ b/gdb/testsuite/gdb.mi/mi2-watch.exp @@ -41,7 +41,7 @@ if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {deb return -1 } -proc test_watchpoint_creation_and_listing {} { +proc test_watchpoint_creation_and_listing {type} { global mi_gdb_prompt global srcfile global hex @@ -65,7 +65,7 @@ proc test_watchpoint_creation_and_listing {} { } # UNUSED at the time -proc test_awatch_creation_and_listing {} { +proc test_awatch_creation_and_listing {type} { global mi_gdb_prompt global srcfile global hex @@ -92,7 +92,7 @@ proc test_awatch_creation_and_listing {} { } # UNUSED at the time -proc test_rwatch_creation_and_listing {} { +proc test_rwatch_creation_and_listing {type} { global mi_gdb_prompt global srcfile global hex @@ -118,7 +118,7 @@ proc test_rwatch_creation_and_listing {} { "delete read watchpoint" } -proc test_watchpoint_triggering {} { +proc test_watchpoint_triggering {type} { global mi_gdb_prompt global hex @@ -147,6 +147,9 @@ proc test_watchpoint_triggering {} { timeout {fail "watchpoint trigger (timeout 1)"} } + if { $type == "sw" } { + setup_xfail *-*-* + } send_gdb "223-exec-continue\n" gdb_expect { -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)"} timeout {fail "wp out of scope (timeout 1)"} } + clear_xfail *-*-* } proc test_watchpoint_all {type} { @@ -177,10 +181,10 @@ proc test_watchpoint_all {type} { mi_gdb_load ${binfile} mi_runto callee4 - test_watchpoint_creation_and_listing - #test_rwatch_creation_and_listing - #test_awatch_creation_and_listing - test_watchpoint_triggering + test_watchpoint_creation_and_listing $type + #test_rwatch_creation_and_listing $type + #test_awatch_creation_and_listing $type + test_watchpoint_triggering $type set pf_prefix $old_prefix } |