diff options
author | Jan Kratochvil <jan.kratochvil@redhat.com> | 2011-08-26 21:45:24 +0000 |
---|---|---|
committer | Jan Kratochvil <jan.kratochvil@redhat.com> | 2011-08-26 21:45:24 +0000 |
commit | 353d1d731afffb8550c9451e783b02be4121f461 (patch) | |
tree | 96be8c17fc0bb39b58c322ab3f50deed741f526e /gdb/breakpoint.c | |
parent | 5c07461a748143e1ad1931bd0f5054aabde9c306 (diff) | |
download | gdb-353d1d731afffb8550c9451e783b02be4121f461.zip gdb-353d1d731afffb8550c9451e783b02be4121f461.tar.gz gdb-353d1d731afffb8550c9451e783b02be4121f461.tar.bz2 |
gdb/
* breakpoint.c (bpstat_do_actions): New variable cleanup_if_error, call
make_bpstat_clear_actions_cleanup and discard_cleanups for it.
* defs.h (make_bpstat_clear_actions_cleanup): New declaration.
* exceptions.c (throw_exception): Remove the bpstat_clear_actions call.
* inf-loop.c (inferior_event_handler): New variable cleanup_if_error,
call make_bpstat_clear_actions_cleanup and discard_cleanups for it.
Call bpstat_clear_actions for failed fetch_inferior_event_wrapper.
* infrun.c (fetch_inferior_event): Call
make_bpstat_clear_actions_cleanup.
* top.c (execute_command): New variable cleanup_if_error, call
make_bpstat_clear_actions_cleanup and discard_cleanups for it.
* utils.c (do_bpstat_clear_actions_cleanup)
(make_bpstat_clear_actions_cleanup): New functions.
gdb/testsuite/
* gdb.base/commands.exp (error_clears_commands_left): New function.
(): Call it.
Diffstat (limited to 'gdb/breakpoint.c')
-rw-r--r-- | gdb/breakpoint.c | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/gdb/breakpoint.c b/gdb/breakpoint.c index 6ccdb6d..8c5b6e5 100644 --- a/gdb/breakpoint.c +++ b/gdb/breakpoint.c @@ -3352,6 +3352,8 @@ bpstat_do_actions_1 (bpstat *bsp) void bpstat_do_actions (void) { + struct cleanup *cleanup_if_error = make_bpstat_clear_actions_cleanup (); + /* Do any commands attached to breakpoint we are stopped at. */ while (!ptid_equal (inferior_ptid, null_ptid) && target_has_execution @@ -3363,6 +3365,8 @@ bpstat_do_actions (void) indicate the inferior was not resumed. */ if (!bpstat_do_actions_1 (&inferior_thread ()->control.stop_bpstat)) break; + + discard_cleanups (cleanup_if_error); } /* Print out the (old or new) value associated with a watchpoint. */ |