From: Bob Manson <manson@cygnus>
Date: Thu, 22 May 1997 05:56:31 +0000 (+0000)
Subject: 	* gdb.base/watchpoint.exp: Don't run the test_stepping
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=ee9a6181ff5cc3c7b7bf203ccb3f17cd5eb4f5a3;p=binutils-gdb.git

	* gdb.base/watchpoint.exp: Don't run the test_stepping
	tests if gdb can't call functions on the target.
---

diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog
index 544bd692f58..95cab224635 100644
--- a/gdb/testsuite/ChangeLog
+++ b/gdb/testsuite/ChangeLog
@@ -1,5 +1,8 @@
 Wed May 21 21:23:16 1997  Bob Manson  <manson@charmed.cygnus.com>
 
+	* gdb.base/watchpoint.exp: Don't run the test_stepping
+	tests if gdb can't call functions on the target.
+
 	* gdb.base/setshow.exp: Don't run the set prompt tests if
 	the board has gdb_prompt set.
 
diff --git a/gdb/testsuite/gdb.base/watchpoint.exp b/gdb/testsuite/gdb.base/watchpoint.exp
index 574a9ebcd5b..980383c6236 100644
--- a/gdb/testsuite/gdb.base/watchpoint.exp
+++ b/gdb/testsuite/gdb.base/watchpoint.exp
@@ -305,6 +305,7 @@ proc test_stepping {} {
 	    clear_xfail "hppa*-*-*bsd*"
 	    # It works with the generic inferior function calling code too.
 	    clear_xfail "mn10200*-*-*"
+	    clear_xfail "mn10300*-*-*"
 	    gdb_test "p func1 ()" "= 73" \
 		"calling function with watchpoint enabled"
 	}
@@ -527,15 +528,17 @@ if [initialize] then {
 	initialize
     }
 
-    test_stepping
+    if ![target_info exsts gdb,cannot_call_functions] {
+	test_stepping
 
-    # See above.
-    if [istarget "mips-idt-*"] then {
-	gdb_exit
-	gdb_start
-	gdb_reinitialize_dir $srcdir/$subdir
-	gdb_load $binfile
-	initialize
+	# See above.
+	if [istarget "mips-idt-*"] then {
+	    gdb_exit
+	    gdb_start
+	    gdb_reinitialize_dir $srcdir/$subdir
+	    gdb_load $binfile
+	    initialize
+	}
     }
 
     # Only enabled for some targets merely because it has not been tested