[committed][gdb/testsuite] Fix gdb.base/break-interp.exp timeout with check-read1

classic Classic list List threaded Threaded
1 message Options
Reply | Threaded
Open this post in threaded view
|

[committed][gdb/testsuite] Fix gdb.base/break-interp.exp timeout with check-read1

Tom de Vries
Hi,

With gdb.base/break-interp.exp and check-read1, we run get:
...
FAIL: gdb.base/break-interp.exp: LDprelinkNOdebugNO: \
  BINprelinkNOdebugNOpieNO: symbol-less: info files (timeout)
FAIL: gdb.base/break-interp.exp: LDprelinkNOdebugNO: \
  BINprelinkNOdebugNOpieYES: symbol-less: info files (timeout)
FAIL: gdb.base/break-interp.exp: LDprelinkNOdebugIN: \
  BINprelinkNOdebugNOpieNO: symbol-less: info files (timeout)
FAIL: gdb.base/break-interp.exp: LDprelinkNOdebugIN: \
  BINprelinkNOdebugNOpieYES: symbol-less: info files (timeout)
...

Fix this by calling exp_continue after each "info files" line.

Tested on x86_64-linux.

Committed to trunk.

Thanks,
- Tom

[gdb/testsuite] Fix gdb.base/break-interp.exp timeout with check-read1

gdb/testsuite/ChangeLog:

2019-07-31  Tom de Vries  <[hidden email]>

        PR testsuite/24863
        * gdb.base/break-interp.exp: Use exp_continue after each "info files"
        line.

---
 gdb/testsuite/gdb.base/break-interp.exp | 8 ++++++++
 1 file changed, 8 insertions(+)

diff --git a/gdb/testsuite/gdb.base/break-interp.exp b/gdb/testsuite/gdb.base/break-interp.exp
index 51e31f6503..d6da653529 100644
--- a/gdb/testsuite/gdb.base/break-interp.exp
+++ b/gdb/testsuite/gdb.base/break-interp.exp
@@ -451,6 +451,10 @@ proc test_ld {file ifmain trynosym displacement} {
     # to slow processing of wildcard capturing long output
     set test "info files"
     set entrynohex ""
+    set info_line [join [list \
+     "\r\n" "\[\t\]" "0x\[0-9af\]+" " - " \
+     "0x\[0-9af\]+" " @ " "0x\[0-9af\]+"  \
+     " is " "\[^\r\n\]+"] ""]
     gdb_test_multiple $test $test {
  -re "\r\n\[\t \]*Entry point:\[\t \]*0x(\[0-9a-f\]+)\r\n" {
     set entrynohex $expect_out(1,string)
@@ -458,6 +462,10 @@ proc test_ld {file ifmain trynosym displacement} {
  -re "\r\n$gdb_prompt $" {
     pass $test
  }
+ -re $info_line {
+    # Avoid timeout with check-read1
+    exp_continue
+ }
     }
  }
     }