[gdb/testsuite] Fix gdb.base/multi-forks.exp timeout with -readnow

When running test-case gdb.base/multi-forks.exp with target board readnow, we
run into:
...
FAIL: gdb.base/multi-forks.exp: run to exit 1 (timeout)
...

Fix this by using exp_continue.

Tested on x86_64-linux.

gdb/testsuite/ChangeLog:

2020-10-27  Tom de Vries  <tdevries@suse.de>

	* gdb.base/multi-forks.exp: Use exp_continue to fix timeout.

diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog
index 3100ced0511c11dcaf2a29c52def2ed0ab2d89cf..ffbc01dde63475c250a5b9833320004e6d095c7d 100644 (file)
--- a/gdb/testsuite/ChangeLog
+++ b/gdb/testsuite/ChangeLog
@@ -1,3 +1,7 @@
+2020-10-27  Tom de Vries  <tdevries@suse.de>
+
+       * gdb.base/multi-forks.exp: Use exp_continue to fix timeout.
+
 2020-10-27  Tom de Vries  <tdevries@suse.de>
 
        * gdb.base/maint.exp: Update for -readnow.

diff --git a/gdb/testsuite/gdb.base/multi-forks.exp b/gdb/testsuite/gdb.base/multi-forks.exp
index 8aa349bc117a7a66ab7fa0e7c92f0bb2591dc52b..5d5a0787292beecf03eafff949f5645ae512d945 100644 (file)
--- a/gdb/testsuite/gdb.base/multi-forks.exp
+++ b/gdb/testsuite/gdb.base/multi-forks.exp
@@ -155,7 +155,17 @@ gdb_test_no_output "set detach off" "set detach off"
 #
 
 for {set i 1} {$i <= 15} {incr i} {
-  gdb_test "continue" "Breakpoint .* main .*exit.*" "run to exit $i"
+  gdb_test_multiple "continue" "run to exit $i" {
+      -re "Continuing\.\r\n" {
+         exp_continue
+      }
+      -re "\[New inferior $decimal \\(process $decimal\\)\]\r\n" {
+         exp_continue
+      }
+      -re -wrap "Breakpoint .* main .*exit.*" {
+         pass $gdb_test_name
+      }
+  }
   gdb_test "info inferior" " 2 .* 3 .* 4 .* 5 .*" "info inferior $i"
   gdb_test "inferior $i + 1" "(_dl_sysinfo_int80|fork|__kernel_(v|)syscall).*" \
       "inferior $i"