diff options
Diffstat (limited to 'gdb/testsuite')
-rw-r--r-- | gdb/testsuite/ChangeLog | 6 | ||||
-rw-r--r-- | gdb/testsuite/gdb.reverse/solib-precsave.exp | 30 | ||||
-rw-r--r-- | gdb/testsuite/gdb.reverse/solib-reverse.exp | 30 |
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 + } +} |