summaryrefslogtreecommitdiff
path: root/gdb
diff options
context:
space:
mode:
authorMark Salter <msalter@sadr.localdomain>2003-01-31 13:11:26 +0000
committerMark Salter <msalter@sadr.localdomain>2003-01-31 13:11:26 +0000
commitafe7af29f6d3373cb71a7fc0dbf88e06e0da0357 (patch)
tree07112fb8631d540b88c4afb1aa6927cd68a2305a /gdb
parent684012b30c49b476f8ccbedf633821bccfef1e07 (diff)
downloadgdb-afe7af29f6d3373cb71a7fc0dbf88e06e0da0357.tar.gz
Support remote targets.
Diffstat (limited to 'gdb')
-rw-r--r--gdb/testsuite/lib/mi-support.exp27
1 files changed, 27 insertions, 0 deletions
diff --git a/gdb/testsuite/lib/mi-support.exp b/gdb/testsuite/lib/mi-support.exp
index 399aac6b8e1..4b057d49623 100644
--- a/gdb/testsuite/lib/mi-support.exp
+++ b/gdb/testsuite/lib/mi-support.exp
@@ -291,8 +291,15 @@ proc mi_gdb_load { arg } {
global loadfile
global GDB
global mi_gdb_prompt
+ global last_mi_gdb_file
upvar timeout timeout
+ if { $arg == "" } {
+ set arg $last_mi_gdb_file;
+ }
+
+ set last_mi_gdb_file $arg;
+
# ``gdb_unload''
# ``gdb_file_cmd''
@@ -388,6 +395,26 @@ proc mi_gdb_load { arg } {
return -1
}
}
+ } elseif { [target_info gdb_protocol] == "remote" } {
+ # remote targets
+ send_gdb "target [target_info gdb_protocol] [target_info netport]\n"
+ gdb_expect 60 {
+ -re "\\^done,.*$mi_gdb_prompt$" {
+ }
+ timeout {
+ perror "Unable to connect to remote target"
+ return -1
+ }
+ }
+ send_gdb "48-target-download\n"
+ gdb_expect 10 {
+ -re "48\\^done.*$mi_gdb_prompt$" {
+ }
+ timeout {
+ perror "Unable to download to remote target"
+ return -1
+ }
+ }
}
return 0
}