aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorAndrew Burgess <andrew.burgess@embecosm.com>2021-02-25 16:06:25 +0000
committerAndrew Burgess <andrew.burgess@embecosm.com>2021-02-25 16:38:03 +0000
commitd4ff3cbfdb361a1c3a16425c084cdd2ff8535cfd (patch)
treee652e0982e6c3b431b9848ac3f2bdd28738947d5
parent2450ad54ce04376d354acc948a52aa0f5efed56b (diff)
downloadfsf-binutils-gdb-d4ff3cbfdb361a1c3a16425c084cdd2ff8535cfd.zip
fsf-binutils-gdb-d4ff3cbfdb361a1c3a16425c084cdd2ff8535cfd.tar.gz
fsf-binutils-gdb-d4ff3cbfdb361a1c3a16425c084cdd2ff8535cfd.tar.bz2
gdb/testsuite: Add a missing -wrap in gdb_test_multiple
In commit: commit faeb9f13c179a4c78bc295a0d0bbd788239704d9 Date: Wed Feb 24 12:50:00 2021 +0000 gdb/fortran: add support for ASSOCIATED builtin A test was added that fails to process the trailing gdb prompt inside a gdb_test_multiple call, this will cause a failure if the tests are run with READ1=1, or randomly at other times depending on how the expect buffers are read in. Fixed by adding a -wrap argument. gdb/testsuite/ChangeLog: * gdb.fortran/associated.exp: Add missing '-wrap' argument.
-rw-r--r--gdb/testsuite/ChangeLog4
-rw-r--r--gdb/testsuite/gdb.fortran/associated.exp2
2 files changed, 5 insertions, 1 deletions
diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog
index bbe4e5c..46d27a1 100644
--- a/gdb/testsuite/ChangeLog
+++ b/gdb/testsuite/ChangeLog
@@ -1,5 +1,9 @@
2021-02-25 Andrew Burgess <andrew.burgess@embecosm.com>
+ * gdb.fortran/associated.exp: Add missing '-wrap' argument.
+
+2021-02-25 Andrew Burgess <andrew.burgess@embecosm.com>
+
PR fortran/26155
* gdb.fortran/call-no-debug-func.f90: New file.
* gdb.fortran/call-no-debug-prog.f90: New file.
diff --git a/gdb/testsuite/gdb.fortran/associated.exp b/gdb/testsuite/gdb.fortran/associated.exp
index d9976f7..021a6b7 100644
--- a/gdb/testsuite/gdb.fortran/associated.exp
+++ b/gdb/testsuite/gdb.fortran/associated.exp
@@ -45,7 +45,7 @@ while { $test_count < 500 } {
-re -wrap "! Test Breakpoint" {
# We can run a test from here.
}
- -re "! Final Breakpoint" {
+ -re -wrap "! Final Breakpoint" {
# We're done with the tests.
set found_final_breakpoint true
}