diff options
author | Carl Love <cel@us.ibm.com> | 2023-01-18 11:13:17 -0500 |
---|---|---|
committer | Carl Love <cel@us.ibm.com> | 2023-01-18 11:13:17 -0500 |
commit | b986eec55f460a9c77a0c06ec30d7280293f7a8c (patch) | |
tree | 0d78a889928fc6a76904b3689d36f134fe4d17b7 /gdb/testsuite/lib/gdb.exp | |
parent | 15d2b36c5b60795067cec773a66d2627d2bf9266 (diff) | |
download | gdb-b986eec55f460a9c77a0c06ec30d7280293f7a8c.zip gdb-b986eec55f460a9c77a0c06ec30d7280293f7a8c.tar.gz gdb-b986eec55f460a9c77a0c06ec30d7280293f7a8c.tar.bz2 |
Revert "X86: reverse-finish fix"
This reverts commit b22548ddb30bfb167708e82d3bb932461c1b703a.
This patch is being reverted since the patch series is causing regressions.
Diffstat (limited to 'gdb/testsuite/lib/gdb.exp')
-rw-r--r-- | gdb/testsuite/lib/gdb.exp | 33 |
1 files changed, 0 insertions, 33 deletions
diff --git a/gdb/testsuite/lib/gdb.exp b/gdb/testsuite/lib/gdb.exp index a677f84..68337bd 100644 --- a/gdb/testsuite/lib/gdb.exp +++ b/gdb/testsuite/lib/gdb.exp @@ -9261,39 +9261,6 @@ proc gdb_step_until { regexp {test_name ""} {max_steps 10} } { } } -# Do repeated stepping COMMANDs in order to reach TARGET from CURRENT -# -# COMMAND is a stepping command -# CURRENT is a string matching the current location -# TARGET is a string matching the target location -# TEST is the test name -# -# The function issues repeated COMMANDs as long as the location matches -# CURRENT up to a maximum of 100 steps. -# -# TEST passes if the resulting location matches TARGET and fails -# otherwise. - -proc repeat_cmd_until { command current target test } { - global gdb_prompt - - set count 0 - gdb_test_multiple "$command" "$test" { - -re "$current.*$gdb_prompt $" { - incr count - if { $count < 100 } { - send_gdb "$command\n" - exp_continue - } else { - fail "$test" - } - } - -re "$target.*$gdb_prompt $" { - pass "$test" - } - } -} - # Check if the compiler emits epilogue information associated # with the closing brace or with the last statement line. # |