equal
deleted
inserted
replaced
8 instanceVariableNames:'id group info stack' |
8 instanceVariableNames:'id group info stack' |
9 classVariableNames:'' |
9 classVariableNames:'' |
10 poolDictionaries:'' |
10 poolDictionaries:'' |
11 category:'GDB-Core' |
11 category:'GDB-Core' |
12 ! |
12 ! |
|
13 |
13 |
14 |
14 !GDBThread class methodsFor:'instance creation'! |
15 !GDBThread class methodsFor:'instance creation'! |
15 |
16 |
16 newWithDebugger: debugger id: id group: group |
17 newWithDebugger: debugger id: id group: group |
17 ^ self new |
18 ^ self new |
41 |
42 |
42 id |
43 id |
43 ^ id |
44 ^ id |
44 |
45 |
45 "Created: / 07-09-2014 / 22:41:29 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
46 "Created: / 07-09-2014 / 22:41:29 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
|
47 ! |
|
48 |
|
49 name |
|
50 ^ self targetId |
|
51 |
|
52 "Created: / 10-03-2015 / 00:32:37 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
46 ! |
53 ! |
47 |
54 |
48 stack |
55 stack |
49 self ensureIsStopped. |
56 self ensureIsStopped. |
50 stack isNil ifTrue:[ |
57 stack isNil ifTrue:[ |
69 |
76 |
70 status |
77 status |
71 ^ self info state |
78 ^ self info state |
72 |
79 |
73 "Modified: / 08-03-2015 / 09:10:40 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
80 "Modified: / 08-03-2015 / 09:10:40 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
|
81 ! |
|
82 |
|
83 targetId |
|
84 ^ self info targetId |
|
85 |
|
86 "Created: / 10-03-2015 / 00:32:18 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
74 ! ! |
87 ! ! |
75 |
88 |
76 !GDBThread methodsFor:'accessing-private'! |
89 !GDBThread methodsFor:'accessing-private'! |
77 |
90 |
78 info |
91 info |
90 |
103 |
91 "Created: / 08-03-2015 / 09:07:21 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
104 "Created: / 08-03-2015 / 09:07:21 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
92 "Modified: / 08-03-2015 / 12:35:54 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
105 "Modified: / 08-03-2015 / 12:35:54 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
93 ! ! |
106 ! ! |
94 |
107 |
|
108 !GDBThread methodsFor:'displaying'! |
|
109 |
|
110 displayString |
|
111 ^ '%1 [%2]' bindWith: self name with: self status |
|
112 |
|
113 "Created: / 10-03-2015 / 00:32:47 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
|
114 ! ! |
|
115 |
95 !GDBThread methodsFor:'initialization'! |
116 !GDBThread methodsFor:'initialization'! |
96 |
117 |
97 setGroup: aGDBThreadGroup |
118 setGroup: aGDBThreadGroup |
98 self assert: group isNil. |
119 self assert: group isNil. |
99 group := aGDBThreadGroup. |
120 group := aGDBThreadGroup. |
173 |
194 |
174 "Created: / 07-09-2014 / 23:23:48 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
195 "Created: / 07-09-2014 / 23:23:48 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
175 "Modified: / 08-03-2015 / 09:08:55 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
196 "Modified: / 08-03-2015 / 09:08:55 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
176 ! ! |
197 ! ! |
177 |
198 |
|
199 !GDBThread class methodsFor:'documentation'! |
|
200 |
|
201 version_HG |
|
202 |
|
203 ^ '$Changeset: <not expanded> $' |
|
204 ! ! |
|
205 |