diff options
Diffstat (limited to 'gdb')
| -rw-r--r-- | gdb/testsuite/ChangeLog | 6 | ||||
| -rw-r--r-- | gdb/testsuite/gdb.base/restore.exp | 19 |
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" |