* lib/gdb.exp(default_gdb_start): Use gdb_opts host feature.

diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog
index cd4f56b87bc6abb9bd0c5e235d5fc85438c15dfd..9d9c4bb24e9b9921e507c599a0e37af85d7de2a2 100644 (file)
--- a/gdb/testsuite/ChangeLog
+++ b/gdb/testsuite/ChangeLog
@@ -1,5 +1,7 @@
 Sat Jun 28 13:31:11 1997  Bob Manson  <manson@charmed.cygnus.com>
 
+       * lib/gdb.exp(default_gdb_start): Use gdb_opts host feature.
+
        * gdb.c++/virtfunc.exp: Remove setting of libs variable.
 
 Fri Jun 27 07:44:25 1997  Fred Fish  <fnf@cygnus.com>

diff --git a/gdb/testsuite/lib/gdb.exp b/gdb/testsuite/lib/gdb.exp
index e217d380beca03b5baf8c03872ea2f5076b3ceae..6994c6d787704856ba7bb5cf695a919311c972bd 100644 (file)
--- a/gdb/testsuite/lib/gdb.exp
+++ b/gdb/testsuite/lib/gdb.exp
@@ -709,16 +709,13 @@ proc default_gdb_start { } {
        return 0;
     }
 
-    if [is_remote host] {
-       set res [remote_spawn host "$GDB -nw $GDBFLAGS --command gdbinit"];
-    } else {
+    if ![is_remote host] {
        if { [which $GDB] == 0 } then {
            perror "$GDB does not exist."
            exit 1
        }
-
-       set res [remote_spawn host "$GDB -nw $GDBFLAGS"];
     }
+    set res [remote_spawn host "$GDB -nw $GDBFLAGS [host_info gdb_opts]"];
     if { $res < 0 || $res == "" } {
        perror "Spawning $GDB failed."
        return 1;