diff options
author | Yao Qi <yao@codesourcery.com> | 2012-06-22 07:45:57 +0000 |
---|---|---|
committer | Yao Qi <yao@codesourcery.com> | 2012-06-22 07:45:57 +0000 |
commit | 6ea815ef85326da39a6031116e37b84f19241f33 (patch) | |
tree | 0fa9123c2cf758d79b84353ef7c35a584c1455b4 /gdb/testsuite/boards | |
parent | 27fc25a1a9c4bea12a981d67ac68a626ade87837 (diff) | |
download | gdb-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.exp | 12 | ||||
-rw-r--r-- | gdb/testsuite/boards/native-stdio-gdbserver.exp | 12 |
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 } |