diff options
author | Jim Blandy <jimb@codesourcery.com> | 2001-09-17 19:42:28 +0000 |
---|---|---|
committer | Jim Blandy <jimb@codesourcery.com> | 2001-09-17 19:42:28 +0000 |
commit | 46a5ec4175a68285b74323ba495d83fb1884263e (patch) | |
tree | ecd656aa15414524287d536ea7913c4406b06629 | |
parent | b16c387bb2dda89eb61023f44cff59569bd58c6c (diff) | |
download | gdb-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/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 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" |