Index: gdb/testsuite/boards/native-stdio-gdbserver.exp |
diff --git a/gdb/testsuite/boards/native-stdio-gdbserver.exp b/gdb/testsuite/boards/native-stdio-gdbserver.exp |
index 9804289017b1252f0b83b627e019fa1dec542d15..a0939049d9940609a6fda32b1ee0c615c50e979e 100644 |
--- a/gdb/testsuite/boards/native-stdio-gdbserver.exp |
+++ b/gdb/testsuite/boards/native-stdio-gdbserver.exp |
@@ -1,4 +1,4 @@ |
-# Copyright 2011-2012 Free Software Foundation, Inc. |
+# Copyright 2011-2013 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 |
@@ -17,19 +17,11 @@ |
# natively with gdbserver using stdio for comms. |
# |
# To use this file: |
-# bash$ touch ${my_dejagnu_dir}/my-dejagnu.exp |
-# bash$ export DEJAGNU=${my_dejagnu_dir}/my-dejagnu.exp |
-# bash$ mkdir ${my_dejagnu_dir}/boards |
-# bash$ cp ${src_dir}/gdb/testsuite/boards/native-stdio-gdbserver.exp \ |
-# ${my_dejagnu_dir}/boards |
# bash$ cd ${build_dir}/gdb |
# bash$ make check RUNTESTFLAGS="--target_board=native-stdio-gdbserver" |
load_generic_config "gdbserver" |
-process_multilib_options "" |
- |
-# The default compiler for this target. |
-set_board_info compiler "[find_gcc]" |
+load_board_description "gdbserver-base" |
# This gdbserver can only run a process once per session. |
set_board_info gdb,do_reload_on_run 1 |
@@ -37,23 +29,15 @@ set_board_info gdb,do_reload_on_run 1 |
# There's no support for argument-passing (yet). |
set_board_info noargs 1 |
-# Can't do input (or output) in the current gdbserver. |
-set_board_info gdb,noinferiorio 1 |
- |
-# gdbserver does not intercept target file operations and perform them |
-# on the host. |
-set_board_info gdb,nofileio 1 |
- |
# Hack into sockethost to pass our peculiar remote connection string. |
set_board_info sockethost "stdio" |
set_board_info gdb,socketport "" |
set_board_info gdb,get_remote_address ${board}_get_remote_address |
set_board_info use_gdb_stub 1 |
+set_board_info exit_is_reliable 1 |
# We will be using the standard GDB remote protocol. |
set_board_info gdb_protocol "remote" |
-# Test the copy of gdbserver in the build directory. |
-set_board_info gdb_server_prog "../gdbserver/gdbserver" |
# The argument to pass to "target remote". |
# We build this once we know how the testsuite will start gdbserver. |
@@ -77,7 +61,7 @@ proc ${board}_build_remote_cmd { cmd } { |
for { set i 1 } { $i < $len } { incr i } { |
set elm [lindex $cmd $i] |
- switch $elm { |
+ switch -- $elm { |
--multi { |
set args "$args $elm" |
} |
@@ -137,14 +121,3 @@ proc ${board}_exec { hostname program args } { |
return $result |
} |
- |
-proc ${board}_download { board host dest } { |
- return $host |
-} |
- |
-proc ${board}_file { dest op args } { |
- if { $op == "delete" } { |
- return 0 |
- } |
- return [eval [list standard_file $dest $op] $args] |
-} |