[1/3] Export dap_initialize

Message ID 20240124-dap-launch-fix-v1-1-0d47f87fa9f0@adacore.com
State New
Headers
Series Fix ordering of configurationDone and launch |

Checks

Context Check Description
linaro-tcwg-bot/tcwg_gdb_build--master-aarch64 success Testing passed
linaro-tcwg-bot/tcwg_gdb_build--master-arm success Testing passed
linaro-tcwg-bot/tcwg_gdb_check--master-aarch64 success Testing passed
linaro-tcwg-bot/tcwg_gdb_check--master-arm success Testing passed

Commit Message

Tom Tromey Jan. 24, 2024, 3:48 p.m. UTC
  This changes the test suite to export dap_initialize.
---
 gdb/testsuite/lib/dap-support.exp | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)
  

Patch

diff --git a/gdb/testsuite/lib/dap-support.exp b/gdb/testsuite/lib/dap-support.exp
index 0bb413e4037..07259862b18 100644
--- a/gdb/testsuite/lib/dap-support.exp
+++ b/gdb/testsuite/lib/dap-support.exp
@@ -238,7 +238,7 @@  proc dap_check_request_and_response {name command {obj {}}} {
 # desired.  Callers not caring about this should probably use
 # dap_launch.  Returns the empty string on failure.  NAME is used as
 # the test name.
-proc _dap_initialize {name} {
+proc dap_initialize {name} {
     if {[dap_gdb_start]} {
 	return ""
     }
@@ -266,7 +266,7 @@  proc _dap_initialize {name} {
 # After this proc is called, gdb will be ready to accept breakpoint
 # requests.
 proc dap_launch {file {args {}}} {
-    if {[_dap_initialize "startup - initialize"] == ""} {
+    if {[dap_initialize "startup - initialize"] == ""} {
 	return ""
     }
     set params "o program"
@@ -315,7 +315,7 @@  proc dap_launch {file {args {}}} {
 # specifying PID as the inferior process ID.  Returns the empty string
 # on failure, or the response object from the attach request.
 proc dap_attach {pid {prog ""}} {
-    if {[_dap_initialize "startup - initialize"] == ""} {
+    if {[dap_initialize "startup - initialize"] == ""} {
 	return ""
     }
 
@@ -331,7 +331,7 @@  proc dap_attach {pid {prog ""}} {
 # specifying TARGET as the remote target.  Returns the empty string on
 # failure, or the response object from the attach request.
 proc dap_target_remote {target} {
-    if {[_dap_initialize "startup - initialize"] == ""} {
+    if {[dap_initialize "startup - initialize"] == ""} {
 	return ""
     }
     return [dap_check_request_and_response "startup - target" attach \