diff options
| author | Andrew Burgess <andrew.burgess@embecosm.com> | 2021-02-25 16:06:25 +0000 |
|---|---|---|
| committer | Andrew Burgess <andrew.burgess@embecosm.com> | 2021-02-25 16:38:03 +0000 |
| commit | d4ff3cbfdb361a1c3a16425c084cdd2ff8535cfd (patch) | |
| tree | e652e0982e6c3b431b9848ac3f2bdd28738947d5 /gdb | |
| parent | 2450ad54ce04376d354acc948a52aa0f5efed56b (diff) | |
| download | gdb-d4ff3cbfdb361a1c3a16425c084cdd2ff8535cfd.zip gdb-d4ff3cbfdb361a1c3a16425c084cdd2ff8535cfd.tar.gz 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.
Diffstat (limited to 'gdb')
| -rw-r--r-- | gdb/testsuite/ChangeLog | 4 | ||||
| -rw-r--r-- | gdb/testsuite/gdb.fortran/associated.exp | 2 |
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 } |