diff options
author | Keith Seitz <keiths@redhat.com> | 2001-04-20 17:20:02 +0000 |
---|---|---|
committer | Keith Seitz <keiths@redhat.com> | 2001-04-20 17:20:02 +0000 |
commit | 8a00ac5b0e880ff5d4cc4953f515ba9dafc4dc18 (patch) | |
tree | 14e869f5df458c015abeedf6e224368d98c58994 /gdb/gdbtk/library/ehandler.ith | |
parent | 7222fa17a575d629979824bb55005d3254dabd4c (diff) | |
download | gdb-8a00ac5b0e880ff5d4cc4953f515ba9dafc4dc18.tar.gz |
Event model revamp for "gdb_set_hook".
* library/interface.tcl (gdbtk_tcl_set_variable): New proc.
* library/gdbevent.ith (SetVariableEvent): New event.
* library/gdbevent.itb (SetVariableEvent::get): Override
GDBEvent::get.
* library/ehandler.ith (set_variable): New public method.
* generic/gdbtk-hooks.c (gdbtk_set_hook): Let inteface function
gdbtk_tcl_set_variable do all the work.
* tclIndex: Regenerated.
Diffstat (limited to 'gdb/gdbtk/library/ehandler.ith')
-rw-r--r-- | gdb/gdbtk/library/ehandler.ith | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/gdb/gdbtk/library/ehandler.ith b/gdb/gdbtk/library/ehandler.ith index a5c222b5f66..f38e666cfcc 100644 --- a/gdb/gdbtk/library/ehandler.ith +++ b/gdb/gdbtk/library/ehandler.ith @@ -29,5 +29,8 @@ class GDBEventHandler { # Breakpiont/tracepoint events method breakpoint {event} {} method tracepoint {event} {} + + # Set variable + method set_variable {event} {} } } |