* gdb.base/recurse.exp: Enable test for SunOS4. xfail one test

	for SunOS4 (reason for failure not investigated).  Remove
	redundant test for $binfile.

diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog
index 0a2bbf2..291d5c5 100644 (file)
--- a/gdb/testsuite/ChangeLog
+++ b/gdb/testsuite/ChangeLog
@@ -1,5 +1,9 @@
 Tue Mar 21 12:14:12 1995  Jim Kingdon  (kingdon@lioth.cygnus.com)
 
+       * gdb.base/recurse.exp: Enable test for SunOS4.  xfail one test
+       for SunOS4 (reason for failure not investigated).  Remove
+       redundant test for $binfile.
+
        * gdb.base/nodebug.c (array_index): Call malloc.
 
        * gdb.base/{corefile.exp,default.exp}: Make names of "up" tests unique.

diff --git a/gdb/testsuite/gdb.base/recurse.exp b/gdb/testsuite/gdb.base/recurse.exp
index 02a3b93..41f1518 100644 (file)
--- a/gdb/testsuite/gdb.base/recurse.exp
+++ b/gdb/testsuite/gdb.base/recurse.exp
@@ -43,7 +43,7 @@ gdb_reinitialize_dir $srcdir/$subdir
 gdb_load $objdir/$subdir/$binfile
 
 # For now we only run this on PAs running BSD.
-if {[file exists $objdir/$subdir/$binfile] && [istarget "hppa*-*-bsd*"]} then {
+if {[istarget "sparc*-*-sunos4*"] || [istarget "hppa*-*-bsd*"]} then {
 
     # Preserve the old timeout, and set a new one that should be
     # sufficient to avoid timing out during this test.
@@ -94,6 +94,7 @@ if {[file exists $objdir/$subdir/$binfile] && [istarget "hppa*-*-bsd*"]} then {
 
        # Continue until second set of b (second instance).
        send "cont\n"
+       setup_xfail "sparc*-*-sunos4*"
        expect {
            -re "Continuing.*\[Ww\]atchpoint.*: b.*Old value = 5.*New value = 120.*return.*$prompt $" { pass "watchpoint hit, second time (second instance)" }
            -re ".*$prompt $" {