| 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]
|
| -}
|
|
|