aboutsummaryrefslogtreecommitdiff
path: root/gdb/testsuite/gdb.base/break-interp.exp
diff options
context:
space:
mode:
Diffstat (limited to 'gdb/testsuite/gdb.base/break-interp.exp')
-rw-r--r--gdb/testsuite/gdb.base/break-interp.exp16
1 files changed, 7 insertions, 9 deletions
diff --git a/gdb/testsuite/gdb.base/break-interp.exp b/gdb/testsuite/gdb.base/break-interp.exp
index d3bda44..75e0ad7 100644
--- a/gdb/testsuite/gdb.base/break-interp.exp
+++ b/gdb/testsuite/gdb.base/break-interp.exp
@@ -442,21 +442,19 @@ proc test_ld {file ifmain trynosym displacement} {
if $ifmain {
reach "_dl_debug_state" run $displacement
- # Use two separate gdb_expect statements to avoid timeouts due to
- # slow processing of wildcard capturing long output
+ # Use two separate gdb_test_multiple statements to avoid timeouts due
+ # to slow processing of wildcard capturing long output
set test "info files"
set entrynohex ""
- send_gdb "$test\n"
- gdb_expect {
+ gdb_test_multiple $test $test {
-re "\r\n\[\t \]*Entry point:\[\t \]*0x(\[0-9a-f\]+)\r\n" {
set entrynohex $expect_out(1,string)
- gdb_expect {
- -re "$gdb_prompt $" { pass $test }
- timeout { fail "$test (timeout)" }
+ gdb_test_multiple "" $test {
+ -re "\r\n$gdb_prompt $" {
+ pass $test
+ }
}
}
- -re ".*$gdb_prompt $" { fail $test }
- timeout { fail "$test (timeout)" }
}
# `info sym' cannot be tested for .opd as the binary may not have