aboutsummaryrefslogtreecommitdiff
path: root/gdb/testsuite
diff options
context:
space:
mode:
Diffstat (limited to 'gdb/testsuite')
-rw-r--r--gdb/testsuite/ChangeLog6
-rw-r--r--gdb/testsuite/gdb.reverse/solib-precsave.exp30
-rw-r--r--gdb/testsuite/gdb.reverse/solib-reverse.exp30
3 files changed, 60 insertions, 6 deletions
diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog
index b67ad73..804df02 100644
--- a/gdb/testsuite/ChangeLog
+++ b/gdb/testsuite/ChangeLog
@@ -1,5 +1,11 @@
2020-07-21 Tom de Vries <tdevries@suse.de>
+ * gdb.reverse/solib-precsave.exp: Handle additional "recommended
+ breakpoint locations".
+ * gdb.reverse/solib-reverse.exp: Same.
+
+2020-07-21 Tom de Vries <tdevries@suse.de>
+
* gdb.reverse/step-reverse.c (callee): Merge statements.
2020-07-21 Tom de Vries <tdevries@suse.de>
diff --git a/gdb/testsuite/gdb.reverse/solib-precsave.exp b/gdb/testsuite/gdb.reverse/solib-precsave.exp
index cd44007..8d57e79 100644
--- a/gdb/testsuite/gdb.reverse/solib-precsave.exp
+++ b/gdb/testsuite/gdb.reverse/solib-precsave.exp
@@ -148,11 +148,27 @@ gdb_test "reverse-next" " generic statement.*" "reverse-next generic"
# Test reverse-step into debuggable solib function
#
-gdb_test "reverse-step" "${lib2src}.*" "reverse-step into solib function one"
+gdb_test_multiple "reverse-step" "reverse-step into solib function one" {
+ -re -wrap "middle part two.*" {
+ send_gdb "reverse-step\n"
+ exp_continue
+ }
+ -re -wrap "${lib2src}.*" {
+ pass $gdb_test_name
+ }
+}
gdb_test "reverse-step" "return 2.x.*" "reverse-step within solib function one"
gdb_test "reverse-step" " middle part two.*" "reverse-step back to main one"
-gdb_test "reverse-step" "${lib2src}.*" "reverse-step into solib function two"
+gdb_test_multiple "reverse-step" "reverse-step into solib function two" {
+ -re -wrap "begin part two.*" {
+ send_gdb "reverse-step\n"
+ exp_continue
+ }
+ -re -wrap "${lib2src}.*" {
+ pass $gdb_test_name
+ }
+}
gdb_test "reverse-step" "return 2.x.*" "reverse-step within solib function two"
gdb_test "reverse-step" " begin part two.*" "reverse-step back to main two"
@@ -163,4 +179,12 @@ gdb_test "reverse-step" " begin part two.*" "reverse-step back to main two"
gdb_test "until $end_part_two" " end part two.*" "run until end part two"
gdb_test "reverse-next" " middle part two.*" "reverse-next over solib function one"
-gdb_test "reverse-next" " begin part two.*" "reverse-next over solib function two"
+gdb_test_multiple "reverse-next" "reverse-next over solib function two" {
+ -re -wrap "middle part two.*" {
+ send_gdb "reverse-next\n"
+ exp_continue
+ }
+ -re -wrap " begin part two.*" {
+ pass $gdb_test_name
+ }
+}
diff --git a/gdb/testsuite/gdb.reverse/solib-reverse.exp b/gdb/testsuite/gdb.reverse/solib-reverse.exp
index 8ff62e2..843aedc 100644
--- a/gdb/testsuite/gdb.reverse/solib-reverse.exp
+++ b/gdb/testsuite/gdb.reverse/solib-reverse.exp
@@ -122,11 +122,27 @@ gdb_test "reverse-next" " generic statement.*" "reverse-next generic"
# Test reverse-step into debuggable solib function
#
-gdb_test "reverse-step" "${lib2src}.*" "reverse-step into solib function one"
+gdb_test_multiple "reverse-step" "reverse-step into solib function one" {
+ -re -wrap "middle part two.*" {
+ send_gdb "reverse-step\n"
+ exp_continue
+ }
+ -re -wrap "${lib2src}.*" {
+ pass $gdb_test_name
+ }
+}
gdb_test "reverse-step" "return 2.x.*" "reverse-step within solib function one"
gdb_test "reverse-step" " middle part two.*" "reverse-step back to main one"
-gdb_test "reverse-step" "${lib2src}.*" "reverse-step into solib function two"
+gdb_test_multiple "reverse-step" "reverse-step into solib function two" {
+ -re -wrap "begin part two.*" {
+ send_gdb "reverse-step\n"
+ exp_continue
+ }
+ -re -wrap "${lib2src}.*" {
+ pass $gdb_test_name
+ }
+}
gdb_test "reverse-step" "return 2.x.*" "reverse-step within solib function two"
gdb_test "reverse-step" " begin part two.*" "reverse-step back to main two"
@@ -137,4 +153,12 @@ gdb_test "reverse-step" " begin part two.*" "reverse-step back to main two"
gdb_test "until $end_part_two" " end part two.*" "run until end part two"
gdb_test "reverse-next" " middle part two.*" "reverse-next over solib function one"
-gdb_test "reverse-next" " begin part two.*" "reverse-next over solib function two"
+gdb_test_multiple "reverse-next" "reverse-next over solib function two" {
+ -re -wrap "middle part two.*" {
+ send_gdb "reverse-next\n"
+ exp_continue
+ }
+ -re -wrap " begin part two.*" {
+ pass $gdb_test_name
+ }
+}