diff options
author | Tom de Vries <tdevries@suse.de> | 2024-02-14 09:55:23 +0100 |
---|---|---|
committer | Tom de Vries <tdevries@suse.de> | 2024-02-14 09:55:23 +0100 |
commit | b235e90e740aa486e6bbe8243eedf109fed41a5c (patch) | |
tree | 1f2e0ebe0f3418dab5f2916c992b4e06f3d93d56 /configure.ac | |
parent | 363baa11378c6383eada19f6bc851fc7230c5dea (diff) | |
download | gdb-b235e90e740aa486e6bbe8243eedf109fed41a5c.zip gdb-b235e90e740aa486e6bbe8243eedf109fed41a5c.tar.gz gdb-b235e90e740aa486e6bbe8243eedf109fed41a5c.tar.bz2 |
[gdb/testsuite] Fix another fail and tcl error in gdb.dap/sources.exp
With gdb.dap/sources.exp on aarch64-linux, I'm running into:
...
{"request_seq": 3, "type": "response", "command": "loadedSources", \
"success": false, "message": "notStopped", "seq": 7}Content-Length: 92^M
^M
{"type": "event", "event": "thread", \
"body": {"reason": "started", "threadId": 1}, \
"seq": 8}FAIL: gdb.dap/sources.exp: loadedSources success
ERROR: tcl error sourcing gdb.dap/sources.exp.
ERROR: tcl error code TCL LOOKUP DICT body
ERROR: key "body" not known in dictionary
while executing
"dict get [lindex $obj 0] body sources"
...
These are the same type of tcl error and FAIL I just fixed for a later
request in the same test-case.
Fix this by:
- moving the wait-for-stop to before the loadedSources request to fix the
FAIL, and
- checking for $obj == "" to fix the tcl error.
Also make the code a bit less indented and more readable by wrapping the tests
in a proc, allowing the use of return to bail out, while still running
dap_shutdown afterwards.
Approved-By: Tom Tromey <tom@tromey.com>
Tested on aarch64-linux.
Diffstat (limited to 'configure.ac')
0 files changed, 0 insertions, 0 deletions