summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJim Blandy <jimb@codesourcery.com>2001-09-17 19:42:28 +0000
committerJim Blandy <jimb@codesourcery.com>2001-09-17 19:42:28 +0000
commit46a5ec4175a68285b74323ba495d83fb1884263e (patch)
treeecd656aa15414524287d536ea7913c4406b06629
parentb16c387bb2dda89eb61023f44cff59569bd58c6c (diff)
downloadgdb-46a5ec4175a68285b74323ba495d83fb1884263e.tar.gz
* gdb.base/restore.exp: Use temporary breakpoints, to avoid
overflowing the limited breakpoint tables on some ROM monitors (like the ROM68K).
-rw-r--r--gdb/testsuite/ChangeLog6
-rw-r--r--gdb/testsuite/gdb.base/restore.exp19
2 files changed, 14 insertions, 11 deletions
diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog
index 64f2098768c..b10aed81c00 100644
--- a/gdb/testsuite/ChangeLog
+++ b/gdb/testsuite/ChangeLog
@@ -1,3 +1,9 @@
+2001-09-17 Jim Blandy <jimb@redhat.com>
+
+ * gdb.base/restore.exp: Use temporary breakpoints, to avoid
+ overflowing the limited breakpoint tables on some ROM monitors
+ (like the ROM68K).
+
2001-09-15 Frank Ch. Eigler <fche@redhat.com>
* lib/insight-support.exp (_gdbtk_xvfb_init): Start Xvfb with
diff --git a/gdb/testsuite/gdb.base/restore.exp b/gdb/testsuite/gdb.base/restore.exp
index 524ee5d534c..2ff7ad15075 100644
--- a/gdb/testsuite/gdb.base/restore.exp
+++ b/gdb/testsuite/gdb.base/restore.exp
@@ -44,28 +44,25 @@ proc restore_tests { } {
set limit 5
- # Set breakpoints at each of the `caller' functions.
- for {set c 1} {$c <= $limit} {incr c} {
- gdb_test "break caller$c" "Breakpoint.*\[0-9\]*\\." "break caller$c"
- }
-
- # Set breakpoints at each of the `callee' functions.
- for {set c 1} {$c <= $limit} {incr c} {
- gdb_test "break callee$c" "Breakpoint.*\[0-9\]*\\." "break caller$c"
- }
-
# For each caller function,
# call each of the callee functions,
# force a return from the callee, and
# make sure that the local variables still have the right values.
for {set c 1} {$c <= $limit} {incr c} {
+ # Set a breakpoint at the next caller function.
+ gdb_test "tbreak caller$c" "Breakpoint.*\[0-9\]*\\." "tbreak caller$c"
+
# Continue to the next caller function.
gdb_test "continue" ".*/\\* caller$c \\*/" "run to caller$c"
# Do each callee function.
for {set e 1} {$e <= $limit} {incr e} {
- gdb_test " continue" ".*/\\* callee$e \\*/" "run to callee$e"
+
+ gdb_test "tbreak callee$e" "Breakpoint.*\[0-9\]*\\." \
+ "tbreak caller$e"
+
+ gdb_test "continue" ".*/\\* callee$e \\*/" "run to callee$e"
# Do a forced return from the callee.
send_gdb "return 0\n"