From: Jan Kratochvil Date: Tue, 12 Oct 2010 18:41:06 +0000 (+0000) Subject: gdb/testsuite/ X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=93c17e06d2bbc70353ed0e8df3456f4cb35346f8;p=binutils-gdb.git gdb/testsuite/ * gdb.base/break-interp.exp (test_ld): Replace gdb_expect by gdb_test_multiple. --- diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog index 5ad723f8dcb..f94b56b9b26 100644 --- a/gdb/testsuite/ChangeLog +++ b/gdb/testsuite/ChangeLog @@ -1,3 +1,8 @@ +2010-10-12 Jan Kratochvil + + * gdb.base/break-interp.exp (test_ld): Replace gdb_expect by + gdb_test_multiple. + 2010-10-12 Jan Kratochvil * gdb.base/break-interp.exp: Use ldlags for linking flags. diff --git a/gdb/testsuite/gdb.base/break-interp.exp b/gdb/testsuite/gdb.base/break-interp.exp index d3bda442e2a..75e0ad7312d 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