aboutsummaryrefslogtreecommitdiff
path: root/gdb/testsuite/boards
diff options
context:
space:
mode:
authorYao Qi <yao@codesourcery.com>2012-06-22 07:45:57 +0000
committerYao Qi <yao@codesourcery.com>2012-06-22 07:45:57 +0000
commit6ea815ef85326da39a6031116e37b84f19241f33 (patch)
tree0fa9123c2cf758d79b84353ef7c35a584c1455b4 /gdb/testsuite/boards
parent27fc25a1a9c4bea12a981d67ac68a626ade87837 (diff)
downloadgdb-6ea815ef85326da39a6031116e37b84f19241f33.zip
gdb-6ea815ef85326da39a6031116e37b84f19241f33.tar.gz
gdb-6ea815ef85326da39a6031116e37b84f19241f33.tar.bz2
gdb/testsuite:
* boards/native-gdbserver.exp: New proc ${board}_exec. * boards/native-stdio-gdbserver.exp: Likewise.
Diffstat (limited to 'gdb/testsuite/boards')
-rw-r--r--gdb/testsuite/boards/native-gdbserver.exp12
-rw-r--r--gdb/testsuite/boards/native-stdio-gdbserver.exp12
2 files changed, 24 insertions, 0 deletions
diff --git a/gdb/testsuite/boards/native-gdbserver.exp b/gdb/testsuite/boards/native-gdbserver.exp
index 5fa02a4..89702df 100644
--- a/gdb/testsuite/boards/native-gdbserver.exp
+++ b/gdb/testsuite/boards/native-gdbserver.exp
@@ -64,6 +64,18 @@ proc ${board}_spawn { board cmd } {
return $result
}
+proc ${board}_exec { hostname program args } {
+ global board_info
+
+ set baseboard [lindex [split $hostname "/"] 0]
+
+ set board_info($baseboard,isremote) 0
+ set result [remote_exec $hostname $program $args]
+ set board_info($baseboard,isremote) 1
+
+ return $result
+}
+
proc ${board}_download { board host dest } {
return $host
}
diff --git a/gdb/testsuite/boards/native-stdio-gdbserver.exp b/gdb/testsuite/boards/native-stdio-gdbserver.exp
index 703f370..9804289 100644
--- a/gdb/testsuite/boards/native-stdio-gdbserver.exp
+++ b/gdb/testsuite/boards/native-stdio-gdbserver.exp
@@ -126,6 +126,18 @@ proc ${board}_spawn { board cmd } {
return $result
}
+proc ${board}_exec { hostname program args } {
+ global board_info
+
+ set baseboard [lindex [split $hostname "/"] 0]
+
+ set board_info($baseboard,isremote) 0
+ set result [remote_exec $hostname $program $args]
+ set board_info($baseboard,isremote) 1
+
+ return $result
+}
+
proc ${board}_download { board host dest } {
return $host
}