aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorAlexandra Hájková <ahajkova@redhat.com>2023-05-02 22:33:49 +0200
committerAlexandra Hájková <ahajkova@redhat.com>2023-05-02 22:51:10 +0200
commit59305ae6247e86f35bbe94ed1f9599af8f8e6f69 (patch)
treecaf48db55c2c18a40851be7071079b6fbb657ee8
parent433e8364fedffb394d5cac29691f2bb0480369a4 (diff)
downloadgdb-59305ae6247e86f35bbe94ed1f9599af8f8e6f69.zip
gdb-59305ae6247e86f35bbe94ed1f9599af8f8e6f69.tar.gz
gdb-59305ae6247e86f35bbe94ed1f9599af8f8e6f69.tar.bz2
gdb.base/watchpoint-unaligned.exp: Always initialize wpoffset_to_wpnum
Initialize wpoffset_to_wpnumto avoid TCL error which happens in some aarch64 types. ERROR: in testcase /root/build/gdb/testsuite/../../../binutils-gdb/gdb/testsuite/gdb.base/watchpoint-unaligned.exp ERROR: can't read "wpoffset_to_wpnum(1)": no such element in array ERROR: tcl error code TCL READ VARNAME ERROR: tcl error info: can't read "wpoffset_to_wpnum(1)": no such element in array while executing Bug: https://sourceware.org/bugzilla/show_bug.cgi?id=30340 Reviewed-by: Luis Machado <luis.machado@arm.com> Reviewed-By: Andrew Burgess <aburgess@redhat.com>
-rw-r--r--gdb/testsuite/gdb.base/watchpoint-unaligned.exp3
1 files changed, 2 insertions, 1 deletions
diff --git a/gdb/testsuite/gdb.base/watchpoint-unaligned.exp b/gdb/testsuite/gdb.base/watchpoint-unaligned.exp
index ce5a1e5..d31a9cd 100644
--- a/gdb/testsuite/gdb.base/watchpoint-unaligned.exp
+++ b/gdb/testsuite/gdb.base/watchpoint-unaligned.exp
@@ -103,6 +103,8 @@ foreach wpcount {4 7} {
for {set wpoffset 1} {$wpoffset <= $wpcount} {incr wpoffset} {
set test "$rwatch data.u.size1\[$wpoffset\]"
set wpnum ""
+ # Initialize the result incase the test fails.
+ set wpoffset_to_wpnum($wpoffset) 0
gdb_test_multiple $test $test {
-re "$rwatch_exp (\[0-9\]+): .*\r\n$gdb_prompt $" {
set wpoffset_to_wpnum($wpoffset) $expect_out(1,string)
@@ -113,7 +115,6 @@ foreach wpcount {4 7} {
setup_xfail breakpoints/23131 "arm*-*-*"
}
fail $test
- set wpoffset_to_wpnum($wpoffset) 0
}
}
}