diff options
Diffstat (limited to 'gdb/testsuite/gdb.dap/lazy-string.exp')
-rw-r--r-- | gdb/testsuite/gdb.dap/lazy-string.exp | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/gdb/testsuite/gdb.dap/lazy-string.exp b/gdb/testsuite/gdb.dap/lazy-string.exp index 5442220..35de3b8 100644 --- a/gdb/testsuite/gdb.dap/lazy-string.exp +++ b/gdb/testsuite/gdb.dap/lazy-string.exp @@ -1,4 +1,4 @@ -# Copyright 2023-2024 Free Software Foundation, Inc. +# Copyright 2023-2025 Free Software Foundation, Inc. # This program is free software; you can redistribute it and/or modify # it under the terms of the GNU General Public License as published by @@ -36,6 +36,8 @@ save_vars GDBFLAGS { } } +set launch_id [dap_launch $testfile] + set line [gdb_get_line_number "STOP"] set obj [dap_check_request_and_response "set breakpoint by line number" \ setBreakpoints \ @@ -45,9 +47,8 @@ set line_bpno [dap_get_breakpoint_number $obj] dap_check_request_and_response "configurationDone" configurationDone -if {[dap_launch $testfile] == ""} { - return -} +dap_check_response "launch response" launch $launch_id + dap_wait_for_event_and_check "stopped at line breakpoint" stopped \ "body reason" breakpoint \ "body hitBreakpointIds" $line_bpno |