aboutsummaryrefslogtreecommitdiff
path: root/gdb/testsuite/gdb.dap/bt-nodebug.exp
diff options
context:
space:
mode:
Diffstat (limited to 'gdb/testsuite/gdb.dap/bt-nodebug.exp')
-rw-r--r--gdb/testsuite/gdb.dap/bt-nodebug.exp1
1 files changed, 1 insertions, 0 deletions
diff --git a/gdb/testsuite/gdb.dap/bt-nodebug.exp b/gdb/testsuite/gdb.dap/bt-nodebug.exp
index 3053f8c..8188a98 100644
--- a/gdb/testsuite/gdb.dap/bt-nodebug.exp
+++ b/gdb/testsuite/gdb.dap/bt-nodebug.exp
@@ -71,6 +71,7 @@ gdb_assert {[dict exists [lindex $breakpoints 0] instructionReference]} \
# slipped in that caused this to be incorrect, so we test both parts
# here; to test whether a string was given, we have to reach into the
# TON form.
+# tclint-disable-next-line command-args
set list_form [namespace eval ton::2list $last_ton]
set ref [namespace eval ton::2list {
get $list_form body breakpoints 0 instructionReference