diff options
| author | Tom de Vries <tdevries@suse.de> | 2023-04-25 08:33:57 +0200 |
|---|---|---|
| committer | Tom de Vries <tdevries@suse.de> | 2023-04-25 08:33:57 +0200 |
| commit | f35613934c9cff986e74ed11c2a141756f4de469 (patch) | |
| tree | 5e8d65eaf48829ccd0b5bfc406ed8f12e2787d6c | |
| parent | f57b5a395b153937b927a70a23e0c57a8af728d9 (diff) | |
| download | gdb-f35613934c9cff986e74ed11c2a141756f4de469.zip gdb-f35613934c9cff986e74ed11c2a141756f4de469.tar.gz gdb-f35613934c9cff986e74ed11c2a141756f4de469.tar.bz2 | |
[gdb/testsuite] Fix timeout in gdb.tui/main.exp
With test-case gdb.tui/main.exp we run into:
...
WARNING: timeout in accept_gdb_output
PASS: gdb.tui/main.exp: show main after file
...
The problem is that this command:
...
Term::command "file [standard_output_file $testfile]"
...
tries to match "(gdb) $cmd", but due to the long file name, $cmd is split up
over two lines:
...
16 (gdb) file /data/vries/gdb/leap-15-4/build/gdb/testsuite/outputs/gdb.tui/main/ma
17 in
18 Reading symbols from /data/vries/gdb/leap-15-4/build/gdb/testsuite/outputs/gdb.t
19 ui/main/main...
20 (gdb)
...
Fix this by matching "Reading symbols from" instead.
Tested on x86_64-linux.
| -rw-r--r-- | gdb/testsuite/gdb.tui/main.exp | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/gdb/testsuite/gdb.tui/main.exp b/gdb/testsuite/gdb.tui/main.exp index 7fc9969..9cd3ce8 100644 --- a/gdb/testsuite/gdb.tui/main.exp +++ b/gdb/testsuite/gdb.tui/main.exp @@ -40,7 +40,8 @@ if {![Term::enter_tui]} { return } -Term::command "file [standard_output_file $testfile]" +send_gdb "file [standard_output_file $testfile]\n" +gdb_assert { [Term::wait_for "Reading symbols from"] } "file command" Term::check_contents "show main after file" \ [string_to_regexp "|___[format %06d $nr]_$line"] |