From 80d28979c5048623e14672a44cad840c12a1c34f Mon Sep 17 00:00:00 2001
From: Jeff Law <law@redhat.com>
Date: Tue, 22 Aug 1995 06:36:40 +0000
Subject: [PATCH] 	* gdb.base/funcargs.exp: Avoid ever setting more than
 8 	breakpoints in the inferior at any given time by making 	two
 groups of breakpoints for call2*, call6* and call7* 	tests.

---
 gdb/testsuite/ChangeLog             |  7 +++++++
 gdb/testsuite/gdb.base/funcargs.exp | 26 +++++++++++++++++++-------
 2 files changed, 26 insertions(+), 7 deletions(-)

diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog
index a2b9691d7da..80209f95668 100644
--- a/gdb/testsuite/ChangeLog
+++ b/gdb/testsuite/ChangeLog
@@ -1,3 +1,10 @@
+Tue Aug 22 00:30:37 1995  Jeff Law  (law@snake.cs.utah.edu)
+
+	* gdb.base/funcargs.exp: Avoid ever setting more than 8
+	breakpoints in the inferior at any given time by making
+	two groups of breakpoints for call2*, call6* and call7*
+	tests.
+
 Sun Aug 20 06:58:25 1995  Peter Schauer  (pes@regent.e-technik.tu-muenchen.de)
 
 	* gdb.base/funcargs.exp:  Fix typos introduced by Aug 15 change.
diff --git a/gdb/testsuite/gdb.base/funcargs.exp b/gdb/testsuite/gdb.base/funcargs.exp
index fe4d4dc382c..8ec8d31db59 100644
--- a/gdb/testsuite/gdb.base/funcargs.exp
+++ b/gdb/testsuite/gdb.base/funcargs.exp
@@ -171,7 +171,6 @@ proc float_and_integral_args {} {
     send "break call2f\n" ; expect -re ".*$prompt $"
     send "break call2g\n" ; expect -re ".*$prompt $"
     send "break call2h\n" ; expect -re ".*$prompt $"
-    send "break call2i\n" ; expect -re ".*$prompt $"
 
     # Run; should stop at call2a and print actual arguments.
 
@@ -233,6 +232,11 @@ proc float_and_integral_args {} {
 	return
     }
 
+    # monitor only allows 8 breakpoints; w89k board allows 10, so
+    # break them up into two groups.
+    delete_breakpoints
+    send "break call2i\n" ; expect -re ".*$prompt $"
+
     # Continue; should stop at call2i and print actual arguments.
     if [gdb_test "cont" ".* call2i \\(c1=97 'a', f1=4, c2=97 'a', c3=97 'a', d1=5, c4=97 'a', c5=97 'a', c6=97 'a', f2=4, s=1, c7=97 'a', d2=5\\) .*" "continue to call2i"] {
 	return
@@ -395,9 +399,6 @@ proc discard_and_shuffle {} {
     send "break call6f\n" ; expect -re ".*$prompt $"
     send "break call6g\n" ; expect -re ".*$prompt $"
     send "break call6h\n" ; expect -re ".*$prompt $"
-    send "break call6i\n" ; expect -re ".*$prompt $"
-    send "break call6j\n" ; expect -re ".*$prompt $"
-    send "break call6k\n" ; expect -re ".*$prompt $"
 
     # Run; should stop at call6a and print actual arguments.
     # Print backtrace.
@@ -591,6 +592,13 @@ $prompt $" { pass "backtrace from call6h" }
 	timeout { fail "(timeout) backtrace from call6h" ; return }
     }
 
+    # monitor only allows 8 breakpoints; w89k board allows 10, so
+    # break them up into two groups.
+    delete_breakpoints
+    send "break call6i\n" ; expect -re ".*$prompt $"
+    send "break call6j\n" ; expect -re ".*$prompt $"
+    send "break call6k\n" ; expect -re ".*$prompt $"
+
     # Continue; should stop at call6i and print actual arguments.
     # Print backtrace.
 
@@ -704,9 +712,6 @@ proc shuffle_round_robin {} {
     send "break call7f\n" ; expect -re ".*$prompt $"
     send "break call7g\n" ; expect -re ".*$prompt $"
     send "break call7h\n" ; expect -re ".*$prompt $"
-    send "break call7i\n" ; expect -re ".*$prompt $"
-    send "break call7j\n" ; expect -re ".*$prompt $"
-    send "break call7k\n" ; expect -re ".*$prompt $"
 
     # Run; should stop at call7a and print actual arguments.
     # Print backtrace.
@@ -932,6 +937,13 @@ $prompt $" { pass "backtrace from call7i" }
 	timeout { fail "(timeout) backtrace from call7i" ; return }
     }
 
+    # monitor only allows 8 breakpoints; w89k board allows 10, so
+    # break them up into two groups.
+    delete_breakpoints
+    send "break call7i\n" ; expect -re ".*$prompt $"
+    send "break call7j\n" ; expect -re ".*$prompt $"
+    send "break call7k\n" ; expect -re ".*$prompt $"
+
     # Continue; should stop at call7j and print actual arguments.
     # Print backtrace.
 
-- 
2.30.2