aboutsummaryrefslogtreecommitdiff
path: root/gdb/testsuite
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
commit1b8947f0b5670b7f1a3c1305d4115bd7e5a1ab69 (patch)
tree076e4948978042df45e6879ac555225d29113f1a /gdb/testsuite
parentbb731fb64587ee3a124d6f4df3f837c360580b0b (diff)
downloadgdb-1b8947f0b5670b7f1a3c1305d4115bd7e5a1ab69.zip
gdb-1b8947f0b5670b7f1a3c1305d4115bd7e5a1ab69.tar.gz
gdb-1b8947f0b5670b7f1a3c1305d4115bd7e5a1ab69.tar.bz2
* gdb.base/restore.exp: Use temporary breakpoints, to avoid
overflowing the limited breakpoint tables on some ROM monitors (like the ROM68K).
Diffstat (limited to 'gdb/testsuite')
-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 64f2098..b10aed8 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 524ee5d..2ff7ad1 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"