blob: 81c7c731f7a0d4a6f27689092017094d78dfb9cf (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
|
# Breakpoint window class definition for Insight
# Copyright 1997, 1998, 1999, 2001 Red Hat, Inc.
#
# This program is free software; you can redistribute it and/or modify it
# under the terms of the GNU General Public License (GPL) as published by
# the Free Software Foundation; either version 2 of the License, or (at
# your option) any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# GNU General Public License for more details.
itcl::class BpWin {
inherit EmbeddedWin GDBWin
public {
variable tracepoints 0
method constructor {args}
method destructor {}
method bp_select {r}
method bp_able { i }
method bp_remove { i }
method bp_restore {}
method bp_store {}
method bp_type { i }
method bp_all { command }
method get_actions {bpnum}
method toggle_threads {}
method reconfig {}
method goto_bp {r}
# GDB Events
method breakpoint {event}
method tracepoint {event}
}
private {
variable twin
variable next_row 0
variable index_to_bpnum
variable Index_to_bptype
variable temp
variable mbar 1
variable selected 0
variable bg1
variable Menu
variable show_threads ;#cached copy of [pref get gdb/bp/show_threads]
method build_win {}
method bp_add {bp_event {tracepoint 0}}
method bp_modify {bp_event {tracepoint 0}}
method bp_delete {bp_event}
method _select_and_popup {bp X Y}
}
}
|