From 26e4dcae58a0fa81475af8d4615b48e759fcf959 Mon Sep 17 00:00:00 2001
From: Stan Shebs <shebs@codesourcery.com>
Date: Fri, 6 Jan 1995 01:37:18 +0000
Subject: [PATCH] 	* lib/gdb.exp, gdb.base/corefile.exp: Supply -nw as
 argument 	when invoking GDB, suppresses any windowing interface.

---
 gdb/testsuite/ChangeLog             |  5 +++++
 gdb/testsuite/gdb.base/corefile.exp | 15 +++++----------
 2 files changed, 10 insertions(+), 10 deletions(-)

diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog
index 83e34d9..30dc1f3 100644
--- a/gdb/testsuite/ChangeLog
+++ b/gdb/testsuite/ChangeLog
@@ -1,3 +1,8 @@
+Thu Jan  5 17:34:03 1995  Stan Shebs  <shebs@andros.cygnus.com>
+
+	* lib/gdb.exp, gdb.base/corefile.exp: Supply -nw as argument
+	when invoking GDB, suppresses any windowing interface.
+
 Mon Jan  2 17:40:21 1995  Stan Shebs  <shebs@andros.cygnus.com>
 
 	* config/sim-gdb: New file, simulator testing support.
diff --git a/gdb/testsuite/gdb.base/corefile.exp b/gdb/testsuite/gdb.base/corefile.exp
index 5406b4d..58de09c 100644
--- a/gdb/testsuite/gdb.base/corefile.exp
+++ b/gdb/testsuite/gdb.base/corefile.exp
@@ -1,4 +1,4 @@
-# Copyright (C) 1992, 1993, 1994 Free Software Foundation, Inc.
+# Copyright (C) 1992, 1993, 1994, 1995 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
@@ -73,7 +73,7 @@ if ![file exists $objdir/$subdir/corefile] then {
 
 gdb_exit
 if $verbose>1 then {
-    send_user "Spawning $GDB $GDBFLAGS -core=$objdir/$subdir/corefile\n"
+    send_user "Spawning $GDB -nw $GDBFLAGS -core=$objdir/$subdir/corefile\n"
 }
 
 # The RS/6000 gdb doesn't know how to extract the file name and
@@ -83,7 +83,7 @@ if $verbose>1 then {
 setup_xfail "rs6000-*-*"
 set oldtimeout $timeout
 set timeout [expr "$timeout + 60"]
-spawn $GDB $GDBFLAGS -core=$objdir/$subdir/corefile
+eval "spawn $GDB -nw $GDBFLAGS -core=$objdir/$subdir/corefile"
 expect {
     -re "Core was generated by .*coremaker.*\r
 \#0  .*\(\).*\r
@@ -100,13 +100,13 @@ $prompt $"			{ pass "args: -core=corefile" }
 
 gdb_exit
 if $verbose>1 then {
-    send_user "Spawning $GDB $GDBFLAGS $objdir/$subdir/$binfile -core=$objdir/$subdir/corefile\n"
+    send_user "Spawning $GDB -nw $GDBFLAGS $objdir/$subdir/$binfile -core=$objdir/$subdir/corefile\n"
 }
 
 
 setup_xfail "rs6000-*-*"
 # This fails in p3, but not in devo.
-spawn $GDB $GDBFLAGS $objdir/$subdir/$binfile -core=$objdir/$subdir/corefile
+spawn $GDB -nw $GDBFLAGS $objdir/$subdir/$binfile -core=$objdir/$subdir/corefile
 expect {
     -re "Core was generated by .*coremaker.*\r
 \#0  .*\(\).*\r
@@ -142,9 +142,4 @@ gdb_load $objdir/$subdir/$binfile
 setup_xfail "*-*-*"
 gdb_test "up" "#\[0-9\]* *\[0-9xa-fH'\]* in .* \\(\\)"
 
-# another good test of roughly the same thing would be to select a frame,
-# print a local variable in that frame, then do the "file" and
-# (without selecting the frame again explicitly) print the variable
-# again.
-
 gdb_test "core" "No core file now."
-- 
2.7.4