aboutsummaryrefslogtreecommitdiff
path: root/gdb/testsuite
diff options
context:
space:
mode:
authorMaciej W. Rozycki <macro@linux-mips.org>2007-09-14 17:37:55 +0000
committerMaciej W. Rozycki <macro@linux-mips.org>2007-09-14 17:37:55 +0000
commit4a543daf06146700e2fcdc4d50a4d28c072b88cd (patch)
treeb58558519091f33f9cda684b0230146bcb7fabaf /gdb/testsuite
parent5509918fe41a6057f55bed6038c847026cb47a99 (diff)
downloadgdb-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/ChangeLog12
-rw-r--r--gdb/testsuite/gdb.mi/mi-watch.exp20
-rw-r--r--gdb/testsuite/gdb.mi/mi2-watch.exp20
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
}