[Bug testsuite/30414] Random failure in gdb.fortran/lbound-ubound.exp

["simon.marchi at polymtl dot ca" <sourceware-bugzilla@sourceware.org>]

https://sourceware.org/bugzilla/show_bug.cgi?id=30414

--- Comment #3 from Simon Marchi <simon.marchi at polymtl dot ca> ---
(In reply to Tom de Vries from comment #1)
> (In reply to Simon Marchi from comment #0)
> > I haven't figured out how the test can get out of the gdb_test_multiple
> > without a value for ubound.
> 
> I think this is what happens when hitting this clause:
> ...
>             -re ".*LBOUND = (\[^\r\n\]+)\r\n" {
>                 set expected_lbound $expect_out(1,string)
>                 if {!$found_prompt} {
>                     exp_continue
>                 }
>             }
> ...
> when $found_prompt == 1.
> 
> I wonder whether this'll fix it:
> ...
> diff --git a/gdb/testsuite/gdb.fortran/lbound-ubound.exp
> b/gdb/testsuite/gdb.fortran/lbound-ubound.exp
> index fced41f9fe3..31a3be11c3d 100644
> --- a/gdb/testsuite/gdb.fortran/lbound-ubound.exp
> +++ b/gdb/testsuite/gdb.fortran/lbound-ubound.exp
> @@ -59,9 +59,7 @@ while { $test_count < 500 } {
>  
>             -re ".*LBOUND = (\[^\r\n\]+)\r\n" {
>                 set expected_lbound $expect_out(1,string)
> -               if {!$found_prompt} {
> -                   exp_continue
> -               }
> +               exp_continue
>             }
>             -re ".*UBOUND = (\[^\r\n\]+)\r\n" {
>                 set expected_ubound $expect_out(1,string)
> ...

Hmm it could be.  The gdb_test_multiple reads from both the GDB output and the
inferior's output, so it is possible that there is a race here, that we read
GDB's prompt before we read the UBOUND line.  I'm wondering if there is a way
to hack the test case to force this to happen.

But I'm not sure why the test case uses inferior I/O to print the expected
results.  Could it instead place the expected results in some variables that
GDB would read, while stopped at the test breakpoint?

-- 
You are receiving this mail because:
You are on the CC list for the bug.