author | Jan Vrany <jan.vrany@labware.com> |
Tue, 26 Jul 2022 15:01:33 +0100 | |
changeset 265 | f2470f0dd9cd |
parent 264 | 23960fcb9dac |
permissions | -rw-r--r-- |
49
2ec7f7ed9242
License this package under 'Creative Commons Attribution-NonCommercial 4.0 International License'
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
45
diff
changeset
|
1 |
" |
264
23960fcb9dac
Relicense under MIT license.
Jan Vrany <jan.vrany@labware.com>
parents:
260
diff
changeset
|
2 |
jv:libgdbs - GNU Debugger Interface Library |
49
2ec7f7ed9242
License this package under 'Creative Commons Attribution-NonCommercial 4.0 International License'
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
45
diff
changeset
|
3 |
Copyright (C) 2015-now Jan Vrany |
260
be963ee78dba
UX: do not update stacktrace for threads that are collapsed
Jan Vrany <jan.vrany@labware.com>
parents:
219
diff
changeset
|
4 |
Copyright (C) 2020-2022 LabWare |
49
2ec7f7ed9242
License this package under 'Creative Commons Attribution-NonCommercial 4.0 International License'
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
45
diff
changeset
|
5 |
|
264
23960fcb9dac
Relicense under MIT license.
Jan Vrany <jan.vrany@labware.com>
parents:
260
diff
changeset
|
6 |
Permission is hereby granted, free of charge, to any person obtaining a copy |
23960fcb9dac
Relicense under MIT license.
Jan Vrany <jan.vrany@labware.com>
parents:
260
diff
changeset
|
7 |
of this software and associated documentation files (the 'Software'), to deal |
23960fcb9dac
Relicense under MIT license.
Jan Vrany <jan.vrany@labware.com>
parents:
260
diff
changeset
|
8 |
in the Software without restriction, including without limitation the rights |
23960fcb9dac
Relicense under MIT license.
Jan Vrany <jan.vrany@labware.com>
parents:
260
diff
changeset
|
9 |
to use, copy, modify, merge, publish, distribute, sublicense, and/or sell |
23960fcb9dac
Relicense under MIT license.
Jan Vrany <jan.vrany@labware.com>
parents:
260
diff
changeset
|
10 |
copies of the Software, and to permit persons to whom the Software is |
23960fcb9dac
Relicense under MIT license.
Jan Vrany <jan.vrany@labware.com>
parents:
260
diff
changeset
|
11 |
furnished to do so, subject to the following conditions: |
49
2ec7f7ed9242
License this package under 'Creative Commons Attribution-NonCommercial 4.0 International License'
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
45
diff
changeset
|
12 |
|
264
23960fcb9dac
Relicense under MIT license.
Jan Vrany <jan.vrany@labware.com>
parents:
260
diff
changeset
|
13 |
The above copyright notice and this permission notice shall be included in all |
23960fcb9dac
Relicense under MIT license.
Jan Vrany <jan.vrany@labware.com>
parents:
260
diff
changeset
|
14 |
copies or substantial portions of the Software. |
23960fcb9dac
Relicense under MIT license.
Jan Vrany <jan.vrany@labware.com>
parents:
260
diff
changeset
|
15 |
|
23960fcb9dac
Relicense under MIT license.
Jan Vrany <jan.vrany@labware.com>
parents:
260
diff
changeset
|
16 |
THE SOFTWARE IS PROVIDED 'AS IS', WITHOUT WARRANTY OF ANY KIND, EXPRESS OR |
23960fcb9dac
Relicense under MIT license.
Jan Vrany <jan.vrany@labware.com>
parents:
260
diff
changeset
|
17 |
IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, |
23960fcb9dac
Relicense under MIT license.
Jan Vrany <jan.vrany@labware.com>
parents:
260
diff
changeset
|
18 |
FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE |
23960fcb9dac
Relicense under MIT license.
Jan Vrany <jan.vrany@labware.com>
parents:
260
diff
changeset
|
19 |
AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER |
23960fcb9dac
Relicense under MIT license.
Jan Vrany <jan.vrany@labware.com>
parents:
260
diff
changeset
|
20 |
LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, |
23960fcb9dac
Relicense under MIT license.
Jan Vrany <jan.vrany@labware.com>
parents:
260
diff
changeset
|
21 |
OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE |
23960fcb9dac
Relicense under MIT license.
Jan Vrany <jan.vrany@labware.com>
parents:
260
diff
changeset
|
22 |
SOFTWARE. |
49
2ec7f7ed9242
License this package under 'Creative Commons Attribution-NonCommercial 4.0 International License'
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
45
diff
changeset
|
23 |
" |
22
6684f4d82301
Temporary commit: reworking VDBStackApplication to support multiple threads and inferiors
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff
changeset
|
24 |
"{ Package: 'jv:vdb' }" |
6684f4d82301
Temporary commit: reworking VDBStackApplication to support multiple threads and inferiors
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff
changeset
|
25 |
|
38
9b861cb882c8
Show al thread groupd, even terminated ones
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
31
diff
changeset
|
26 |
"{ NameSpace: Smalltalk }" |
9b861cb882c8
Show al thread groupd, even terminated ones
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
31
diff
changeset
|
27 |
|
60
bcdb393c956f
Cleanup of (former) `VDBModelPresenter`
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
49
diff
changeset
|
28 |
VDBAbstractPresenter subclass:#VDBThreadPresenter |
45 | 29 |
instanceVariableNames:'thread name' |
22
6684f4d82301
Temporary commit: reworking VDBStackApplication to support multiple threads and inferiors
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff
changeset
|
30 |
classVariableNames:'' |
6684f4d82301
Temporary commit: reworking VDBStackApplication to support multiple threads and inferiors
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff
changeset
|
31 |
poolDictionaries:'' |
6684f4d82301
Temporary commit: reworking VDBStackApplication to support multiple threads and inferiors
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff
changeset
|
32 |
category:'VDB-Presentation' |
6684f4d82301
Temporary commit: reworking VDBStackApplication to support multiple threads and inferiors
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff
changeset
|
33 |
! |
6684f4d82301
Temporary commit: reworking VDBStackApplication to support multiple threads and inferiors
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff
changeset
|
34 |
|
49
2ec7f7ed9242
License this package under 'Creative Commons Attribution-NonCommercial 4.0 International License'
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
45
diff
changeset
|
35 |
!VDBThreadPresenter class methodsFor:'documentation'! |
2ec7f7ed9242
License this package under 'Creative Commons Attribution-NonCommercial 4.0 International License'
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
45
diff
changeset
|
36 |
|
2ec7f7ed9242
License this package under 'Creative Commons Attribution-NonCommercial 4.0 International License'
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
45
diff
changeset
|
37 |
copyright |
2ec7f7ed9242
License this package under 'Creative Commons Attribution-NonCommercial 4.0 International License'
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
45
diff
changeset
|
38 |
" |
264
23960fcb9dac
Relicense under MIT license.
Jan Vrany <jan.vrany@labware.com>
parents:
260
diff
changeset
|
39 |
jv:libgdbs - GNU Debugger Interface Library |
49
2ec7f7ed9242
License this package under 'Creative Commons Attribution-NonCommercial 4.0 International License'
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
45
diff
changeset
|
40 |
Copyright (C) 2015-now Jan Vrany |
260
be963ee78dba
UX: do not update stacktrace for threads that are collapsed
Jan Vrany <jan.vrany@labware.com>
parents:
219
diff
changeset
|
41 |
Copyright (C) 2020-2022 LabWare |
49
2ec7f7ed9242
License this package under 'Creative Commons Attribution-NonCommercial 4.0 International License'
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
45
diff
changeset
|
42 |
|
264
23960fcb9dac
Relicense under MIT license.
Jan Vrany <jan.vrany@labware.com>
parents:
260
diff
changeset
|
43 |
Permission is hereby granted, free of charge, to any person obtaining a copy |
23960fcb9dac
Relicense under MIT license.
Jan Vrany <jan.vrany@labware.com>
parents:
260
diff
changeset
|
44 |
of this software and associated documentation files (the 'Software'), to deal |
23960fcb9dac
Relicense under MIT license.
Jan Vrany <jan.vrany@labware.com>
parents:
260
diff
changeset
|
45 |
in the Software without restriction, including without limitation the rights |
23960fcb9dac
Relicense under MIT license.
Jan Vrany <jan.vrany@labware.com>
parents:
260
diff
changeset
|
46 |
to use, copy, modify, merge, publish, distribute, sublicense, and/or sell |
23960fcb9dac
Relicense under MIT license.
Jan Vrany <jan.vrany@labware.com>
parents:
260
diff
changeset
|
47 |
copies of the Software, and to permit persons to whom the Software is |
23960fcb9dac
Relicense under MIT license.
Jan Vrany <jan.vrany@labware.com>
parents:
260
diff
changeset
|
48 |
furnished to do so, subject to the following conditions: |
49
2ec7f7ed9242
License this package under 'Creative Commons Attribution-NonCommercial 4.0 International License'
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
45
diff
changeset
|
49 |
|
264
23960fcb9dac
Relicense under MIT license.
Jan Vrany <jan.vrany@labware.com>
parents:
260
diff
changeset
|
50 |
The above copyright notice and this permission notice shall be included in all |
23960fcb9dac
Relicense under MIT license.
Jan Vrany <jan.vrany@labware.com>
parents:
260
diff
changeset
|
51 |
copies or substantial portions of the Software. |
23960fcb9dac
Relicense under MIT license.
Jan Vrany <jan.vrany@labware.com>
parents:
260
diff
changeset
|
52 |
|
23960fcb9dac
Relicense under MIT license.
Jan Vrany <jan.vrany@labware.com>
parents:
260
diff
changeset
|
53 |
THE SOFTWARE IS PROVIDED 'AS IS', WITHOUT WARRANTY OF ANY KIND, EXPRESS OR |
23960fcb9dac
Relicense under MIT license.
Jan Vrany <jan.vrany@labware.com>
parents:
260
diff
changeset
|
54 |
IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, |
23960fcb9dac
Relicense under MIT license.
Jan Vrany <jan.vrany@labware.com>
parents:
260
diff
changeset
|
55 |
FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE |
23960fcb9dac
Relicense under MIT license.
Jan Vrany <jan.vrany@labware.com>
parents:
260
diff
changeset
|
56 |
AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER |
23960fcb9dac
Relicense under MIT license.
Jan Vrany <jan.vrany@labware.com>
parents:
260
diff
changeset
|
57 |
LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, |
23960fcb9dac
Relicense under MIT license.
Jan Vrany <jan.vrany@labware.com>
parents:
260
diff
changeset
|
58 |
OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE |
23960fcb9dac
Relicense under MIT license.
Jan Vrany <jan.vrany@labware.com>
parents:
260
diff
changeset
|
59 |
SOFTWARE. |
49
2ec7f7ed9242
License this package under 'Creative Commons Attribution-NonCommercial 4.0 International License'
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
45
diff
changeset
|
60 |
" |
2ec7f7ed9242
License this package under 'Creative Commons Attribution-NonCommercial 4.0 International License'
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
45
diff
changeset
|
61 |
! ! |
38
9b861cb882c8
Show al thread groupd, even terminated ones
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
31
diff
changeset
|
62 |
|
197
a4f790013a99
UI: add "Copy Backtrace to Clipboard" menu item
Jan Vrany <jan.vrany@labware.com>
parents:
60
diff
changeset
|
63 |
!VDBThreadPresenter class methodsFor:'menu specs'! |
a4f790013a99
UI: add "Copy Backtrace to Clipboard" menu item
Jan Vrany <jan.vrany@labware.com>
parents:
60
diff
changeset
|
64 |
|
a4f790013a99
UI: add "Copy Backtrace to Clipboard" menu item
Jan Vrany <jan.vrany@labware.com>
parents:
60
diff
changeset
|
65 |
contextMenu |
a4f790013a99
UI: add "Copy Backtrace to Clipboard" menu item
Jan Vrany <jan.vrany@labware.com>
parents:
60
diff
changeset
|
66 |
"This resource specification was automatically generated |
a4f790013a99
UI: add "Copy Backtrace to Clipboard" menu item
Jan Vrany <jan.vrany@labware.com>
parents:
60
diff
changeset
|
67 |
by the MenuEditor of ST/X." |
a4f790013a99
UI: add "Copy Backtrace to Clipboard" menu item
Jan Vrany <jan.vrany@labware.com>
parents:
60
diff
changeset
|
68 |
|
a4f790013a99
UI: add "Copy Backtrace to Clipboard" menu item
Jan Vrany <jan.vrany@labware.com>
parents:
60
diff
changeset
|
69 |
"Do not manually edit this!! If it is corrupted, |
a4f790013a99
UI: add "Copy Backtrace to Clipboard" menu item
Jan Vrany <jan.vrany@labware.com>
parents:
60
diff
changeset
|
70 |
the MenuEditor may not be able to read the specification." |
a4f790013a99
UI: add "Copy Backtrace to Clipboard" menu item
Jan Vrany <jan.vrany@labware.com>
parents:
60
diff
changeset
|
71 |
|
a4f790013a99
UI: add "Copy Backtrace to Clipboard" menu item
Jan Vrany <jan.vrany@labware.com>
parents:
60
diff
changeset
|
72 |
|
a4f790013a99
UI: add "Copy Backtrace to Clipboard" menu item
Jan Vrany <jan.vrany@labware.com>
parents:
60
diff
changeset
|
73 |
" |
a4f790013a99
UI: add "Copy Backtrace to Clipboard" menu item
Jan Vrany <jan.vrany@labware.com>
parents:
60
diff
changeset
|
74 |
MenuEditor new openOnClass:VDBThreadPresenter andSelector:#contextMenu |
a4f790013a99
UI: add "Copy Backtrace to Clipboard" menu item
Jan Vrany <jan.vrany@labware.com>
parents:
60
diff
changeset
|
75 |
(Menu new fromLiteralArrayEncoding:(VDBThreadPresenter contextMenu)) startUp |
a4f790013a99
UI: add "Copy Backtrace to Clipboard" menu item
Jan Vrany <jan.vrany@labware.com>
parents:
60
diff
changeset
|
76 |
" |
a4f790013a99
UI: add "Copy Backtrace to Clipboard" menu item
Jan Vrany <jan.vrany@labware.com>
parents:
60
diff
changeset
|
77 |
|
a4f790013a99
UI: add "Copy Backtrace to Clipboard" menu item
Jan Vrany <jan.vrany@labware.com>
parents:
60
diff
changeset
|
78 |
<resource: #menu> |
a4f790013a99
UI: add "Copy Backtrace to Clipboard" menu item
Jan Vrany <jan.vrany@labware.com>
parents:
60
diff
changeset
|
79 |
|
a4f790013a99
UI: add "Copy Backtrace to Clipboard" menu item
Jan Vrany <jan.vrany@labware.com>
parents:
60
diff
changeset
|
80 |
^ |
a4f790013a99
UI: add "Copy Backtrace to Clipboard" menu item
Jan Vrany <jan.vrany@labware.com>
parents:
60
diff
changeset
|
81 |
#(Menu ( |
a4f790013a99
UI: add "Copy Backtrace to Clipboard" menu item
Jan Vrany <jan.vrany@labware.com>
parents:
60
diff
changeset
|
82 |
(MenuItem |
a4f790013a99
UI: add "Copy Backtrace to Clipboard" menu item
Jan Vrany <jan.vrany@labware.com>
parents:
60
diff
changeset
|
83 |
enabled: canCopyBacktrace |
a4f790013a99
UI: add "Copy Backtrace to Clipboard" menu item
Jan Vrany <jan.vrany@labware.com>
parents:
60
diff
changeset
|
84 |
label: 'Copy Backtrace To Clipboard' |
a4f790013a99
UI: add "Copy Backtrace to Clipboard" menu item
Jan Vrany <jan.vrany@labware.com>
parents:
60
diff
changeset
|
85 |
itemValue: doCopyBacktraceToClipboard |
a4f790013a99
UI: add "Copy Backtrace to Clipboard" menu item
Jan Vrany <jan.vrany@labware.com>
parents:
60
diff
changeset
|
86 |
isVisible: true |
a4f790013a99
UI: add "Copy Backtrace to Clipboard" menu item
Jan Vrany <jan.vrany@labware.com>
parents:
60
diff
changeset
|
87 |
) |
a4f790013a99
UI: add "Copy Backtrace to Clipboard" menu item
Jan Vrany <jan.vrany@labware.com>
parents:
60
diff
changeset
|
88 |
) nil |
a4f790013a99
UI: add "Copy Backtrace to Clipboard" menu item
Jan Vrany <jan.vrany@labware.com>
parents:
60
diff
changeset
|
89 |
nil |
a4f790013a99
UI: add "Copy Backtrace to Clipboard" menu item
Jan Vrany <jan.vrany@labware.com>
parents:
60
diff
changeset
|
90 |
) |
a4f790013a99
UI: add "Copy Backtrace to Clipboard" menu item
Jan Vrany <jan.vrany@labware.com>
parents:
60
diff
changeset
|
91 |
! ! |
a4f790013a99
UI: add "Copy Backtrace to Clipboard" menu item
Jan Vrany <jan.vrany@labware.com>
parents:
60
diff
changeset
|
92 |
|
23
ed5f4b55cee5
Added toolbar and icons. Show all thread groups and threads in stack view.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
22
diff
changeset
|
93 |
!VDBThreadPresenter methodsFor:'accessing'! |
22
6684f4d82301
Temporary commit: reworking VDBStackApplication to support multiple threads and inferiors
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff
changeset
|
94 |
|
24 | 95 |
icon |
96 |
thread isRunning ifTrue:[ ^ VDBIconLibrary threadRunning16x16 ]. |
|
97 |
thread isStopped ifTrue:[ ^ VDBIconLibrary threadStopped16x16 ]. |
|
98 |
thread isTerminated ifTrue:[ ^ VDBIconLibrary threadTerminated16x16 ]. |
|
99 |
||
100 |
^ nil |
|
101 |
||
102 |
"Created: / 22-09-2014 / 22:00:20 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
|
103 |
! |
|
104 |
||
23
ed5f4b55cee5
Added toolbar and icons. Show all thread groups and threads in stack view.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
22
diff
changeset
|
105 |
label |
45 | 106 |
name isNil ifTrue:[ |
107 |
thread isRunning ifFalse:[ |
|
207
27e7fa4229b3
UI: show thread name (instead of id) in stack view
Jan Vrany <jan.vrany@labware.com>
parents:
197
diff
changeset
|
108 |
name := '"' , thread name , '"' |
45 | 109 |
] |
110 |
]. |
|
207
27e7fa4229b3
UI: show thread name (instead of id) in stack view
Jan Vrany <jan.vrany@labware.com>
parents:
197
diff
changeset
|
111 |
^ 'Thread %1 [%2] %3' bindWith: (thread id printStringRadix: 10 size: 2 fill: Character space) with: thread status with: name ? '' |
22
6684f4d82301
Temporary commit: reworking VDBStackApplication to support multiple threads and inferiors
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff
changeset
|
112 |
|
23
ed5f4b55cee5
Added toolbar and icons. Show all thread groups and threads in stack view.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
22
diff
changeset
|
113 |
"Created: / 22-09-2014 / 00:14:11 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
45 | 114 |
"Modified: / 12-07-2017 / 14:23:23 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
207
27e7fa4229b3
UI: show thread name (instead of id) in stack view
Jan Vrany <jan.vrany@labware.com>
parents:
197
diff
changeset
|
115 |
"Modified: / 27-11-2020 / 13:44:36 / Jan Vrany <jan.vrany@labware.com>" |
23
ed5f4b55cee5
Added toolbar and icons. Show all thread groups and threads in stack view.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
22
diff
changeset
|
116 |
! |
ed5f4b55cee5
Added toolbar and icons. Show all thread groups and threads in stack view.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
22
diff
changeset
|
117 |
|
60
bcdb393c956f
Cleanup of (former) `VDBModelPresenter`
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
49
diff
changeset
|
118 |
subject |
bcdb393c956f
Cleanup of (former) `VDBModelPresenter`
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
49
diff
changeset
|
119 |
"Return an instance of GDB object that this presenter displays." |
bcdb393c956f
Cleanup of (former) `VDBModelPresenter`
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
49
diff
changeset
|
120 |
|
bcdb393c956f
Cleanup of (former) `VDBModelPresenter`
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
49
diff
changeset
|
121 |
^ thread |
bcdb393c956f
Cleanup of (former) `VDBModelPresenter`
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
49
diff
changeset
|
122 |
|
bcdb393c956f
Cleanup of (former) `VDBModelPresenter`
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
49
diff
changeset
|
123 |
"Modified: / 05-02-2018 / 13:08:44 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
bcdb393c956f
Cleanup of (former) `VDBModelPresenter`
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
49
diff
changeset
|
124 |
! |
bcdb393c956f
Cleanup of (former) `VDBModelPresenter`
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
49
diff
changeset
|
125 |
|
23
ed5f4b55cee5
Added toolbar and icons. Show all thread groups and threads in stack view.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
22
diff
changeset
|
126 |
thread |
ed5f4b55cee5
Added toolbar and icons. Show all thread groups and threads in stack view.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
22
diff
changeset
|
127 |
^ thread |
22
6684f4d82301
Temporary commit: reworking VDBStackApplication to support multiple threads and inferiors
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff
changeset
|
128 |
! ! |
6684f4d82301
Temporary commit: reworking VDBStackApplication to support multiple threads and inferiors
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff
changeset
|
129 |
|
219
6ab12a17ca3b
UX: selectively update stack tree to minimize changes
Jan Vrany <jan.vrany@labware.com>
parents:
212
diff
changeset
|
130 |
!VDBThreadPresenter methodsFor:'change & update'! |
6ab12a17ca3b
UX: selectively update stack tree to minimize changes
Jan Vrany <jan.vrany@labware.com>
parents:
212
diff
changeset
|
131 |
|
6ab12a17ca3b
UX: selectively update stack tree to minimize changes
Jan Vrany <jan.vrany@labware.com>
parents:
212
diff
changeset
|
132 |
updateChildren |
6ab12a17ca3b
UX: selectively update stack tree to minimize changes
Jan Vrany <jan.vrany@labware.com>
parents:
212
diff
changeset
|
133 |
children isNil ifTrue: [ |
6ab12a17ca3b
UX: selectively update stack tree to minimize changes
Jan Vrany <jan.vrany@labware.com>
parents:
212
diff
changeset
|
134 |
^ self |
6ab12a17ca3b
UX: selectively update stack tree to minimize changes
Jan Vrany <jan.vrany@labware.com>
parents:
212
diff
changeset
|
135 |
]. |
6ab12a17ca3b
UX: selectively update stack tree to minimize changes
Jan Vrany <jan.vrany@labware.com>
parents:
212
diff
changeset
|
136 |
|
260
be963ee78dba
UX: do not update stacktrace for threads that are collapsed
Jan Vrany <jan.vrany@labware.com>
parents:
219
diff
changeset
|
137 |
self isExpanded ifFalse: [ |
be963ee78dba
UX: do not update stacktrace for threads that are collapsed
Jan Vrany <jan.vrany@labware.com>
parents:
219
diff
changeset
|
138 |
"/ If the thread is not expanded (that is, frames are not |
be963ee78dba
UX: do not update stacktrace for threads that are collapsed
Jan Vrany <jan.vrany@labware.com>
parents:
219
diff
changeset
|
139 |
"/ visible), then just arrange for children to be updated upon |
be963ee78dba
UX: do not update stacktrace for threads that are collapsed
Jan Vrany <jan.vrany@labware.com>
parents:
219
diff
changeset
|
140 |
"/ expand and return. |
be963ee78dba
UX: do not update stacktrace for threads that are collapsed
Jan Vrany <jan.vrany@labware.com>
parents:
219
diff
changeset
|
141 |
children := nil. |
be963ee78dba
UX: do not update stacktrace for threads that are collapsed
Jan Vrany <jan.vrany@labware.com>
parents:
219
diff
changeset
|
142 |
^ self |
be963ee78dba
UX: do not update stacktrace for threads that are collapsed
Jan Vrany <jan.vrany@labware.com>
parents:
219
diff
changeset
|
143 |
]. |
be963ee78dba
UX: do not update stacktrace for threads that are collapsed
Jan Vrany <jan.vrany@labware.com>
parents:
219
diff
changeset
|
144 |
|
219
6ab12a17ca3b
UX: selectively update stack tree to minimize changes
Jan Vrany <jan.vrany@labware.com>
parents:
212
diff
changeset
|
145 |
children isEmpty ifTrue: [ |
6ab12a17ca3b
UX: selectively update stack tree to minimize changes
Jan Vrany <jan.vrany@labware.com>
parents:
212
diff
changeset
|
146 |
super updateChildren. |
6ab12a17ca3b
UX: selectively update stack tree to minimize changes
Jan Vrany <jan.vrany@labware.com>
parents:
212
diff
changeset
|
147 |
^ self |
6ab12a17ca3b
UX: selectively update stack tree to minimize changes
Jan Vrany <jan.vrany@labware.com>
parents:
212
diff
changeset
|
148 |
]. |
6ab12a17ca3b
UX: selectively update stack tree to minimize changes
Jan Vrany <jan.vrany@labware.com>
parents:
212
diff
changeset
|
149 |
|
6ab12a17ca3b
UX: selectively update stack tree to minimize changes
Jan Vrany <jan.vrany@labware.com>
parents:
212
diff
changeset
|
150 |
(children size = thread stack size and: [ children first frame == thread stack first ]) ifTrue: [ |
6ab12a17ca3b
UX: selectively update stack tree to minimize changes
Jan Vrany <jan.vrany@labware.com>
parents:
212
diff
changeset
|
151 |
^ self |
6ab12a17ca3b
UX: selectively update stack tree to minimize changes
Jan Vrany <jan.vrany@labware.com>
parents:
212
diff
changeset
|
152 |
]. |
6ab12a17ca3b
UX: selectively update stack tree to minimize changes
Jan Vrany <jan.vrany@labware.com>
parents:
212
diff
changeset
|
153 |
|
6ab12a17ca3b
UX: selectively update stack tree to minimize changes
Jan Vrany <jan.vrany@labware.com>
parents:
212
diff
changeset
|
154 |
super updateChildren. |
6ab12a17ca3b
UX: selectively update stack tree to minimize changes
Jan Vrany <jan.vrany@labware.com>
parents:
212
diff
changeset
|
155 |
|
6ab12a17ca3b
UX: selectively update stack tree to minimize changes
Jan Vrany <jan.vrany@labware.com>
parents:
212
diff
changeset
|
156 |
"Created: / 17-05-2021 / 19:45:32 / Jan Vrany <jan.vrany@labware.com>" |
260
be963ee78dba
UX: do not update stacktrace for threads that are collapsed
Jan Vrany <jan.vrany@labware.com>
parents:
219
diff
changeset
|
157 |
"Modified (format): / 25-05-2022 / 17:33:42 / Jan Vrany <jan.vrany@labware.com>" |
219
6ab12a17ca3b
UX: selectively update stack tree to minimize changes
Jan Vrany <jan.vrany@labware.com>
parents:
212
diff
changeset
|
158 |
! ! |
6ab12a17ca3b
UX: selectively update stack tree to minimize changes
Jan Vrany <jan.vrany@labware.com>
parents:
212
diff
changeset
|
159 |
|
22
6684f4d82301
Temporary commit: reworking VDBStackApplication to support multiple threads and inferiors
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff
changeset
|
160 |
!VDBThreadPresenter methodsFor:'initialization'! |
6684f4d82301
Temporary commit: reworking VDBStackApplication to support multiple threads and inferiors
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff
changeset
|
161 |
|
6684f4d82301
Temporary commit: reworking VDBStackApplication to support multiple threads and inferiors
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff
changeset
|
162 |
setThread: aGDBThread |
45 | 163 |
thread := aGDBThread. |
22
6684f4d82301
Temporary commit: reworking VDBStackApplication to support multiple threads and inferiors
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff
changeset
|
164 |
|
6684f4d82301
Temporary commit: reworking VDBStackApplication to support multiple threads and inferiors
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff
changeset
|
165 |
"Created: / 21-09-2014 / 23:39:18 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
45 | 166 |
"Modified: / 12-07-2017 / 14:21:06 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
22
6684f4d82301
Temporary commit: reworking VDBStackApplication to support multiple threads and inferiors
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff
changeset
|
167 |
! ! |
6684f4d82301
Temporary commit: reworking VDBStackApplication to support multiple threads and inferiors
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff
changeset
|
168 |
|
197
a4f790013a99
UI: add "Copy Backtrace to Clipboard" menu item
Jan Vrany <jan.vrany@labware.com>
parents:
60
diff
changeset
|
169 |
!VDBThreadPresenter methodsFor:'menu actions'! |
a4f790013a99
UI: add "Copy Backtrace to Clipboard" menu item
Jan Vrany <jan.vrany@labware.com>
parents:
60
diff
changeset
|
170 |
|
a4f790013a99
UI: add "Copy Backtrace to Clipboard" menu item
Jan Vrany <jan.vrany@labware.com>
parents:
60
diff
changeset
|
171 |
doCopyBacktraceToClipboard |
a4f790013a99
UI: add "Copy Backtrace to Clipboard" menu item
Jan Vrany <jan.vrany@labware.com>
parents:
60
diff
changeset
|
172 |
| backtrace | |
a4f790013a99
UI: add "Copy Backtrace to Clipboard" menu item
Jan Vrany <jan.vrany@labware.com>
parents:
60
diff
changeset
|
173 |
|
a4f790013a99
UI: add "Copy Backtrace to Clipboard" menu item
Jan Vrany <jan.vrany@labware.com>
parents:
60
diff
changeset
|
174 |
backtrace := String streamContents:[:s| |
a4f790013a99
UI: add "Copy Backtrace to Clipboard" menu item
Jan Vrany <jan.vrany@labware.com>
parents:
60
diff
changeset
|
175 |
thread stack |
a4f790013a99
UI: add "Copy Backtrace to Clipboard" menu item
Jan Vrany <jan.vrany@labware.com>
parents:
60
diff
changeset
|
176 |
do: [:frame | frame dumpOn: s ] |
a4f790013a99
UI: add "Copy Backtrace to Clipboard" menu item
Jan Vrany <jan.vrany@labware.com>
parents:
60
diff
changeset
|
177 |
separatedBy: [ s cr; nextPutAll: '--'; cr ] |
a4f790013a99
UI: add "Copy Backtrace to Clipboard" menu item
Jan Vrany <jan.vrany@labware.com>
parents:
60
diff
changeset
|
178 |
]. |
a4f790013a99
UI: add "Copy Backtrace to Clipboard" menu item
Jan Vrany <jan.vrany@labware.com>
parents:
60
diff
changeset
|
179 |
self doCopy: backtrace |
a4f790013a99
UI: add "Copy Backtrace to Clipboard" menu item
Jan Vrany <jan.vrany@labware.com>
parents:
60
diff
changeset
|
180 |
|
a4f790013a99
UI: add "Copy Backtrace to Clipboard" menu item
Jan Vrany <jan.vrany@labware.com>
parents:
60
diff
changeset
|
181 |
"Modified: / 09-08-2020 / 07:15:42 / Jan Vrany <jan.vrany@labware.com>" |
a4f790013a99
UI: add "Copy Backtrace to Clipboard" menu item
Jan Vrany <jan.vrany@labware.com>
parents:
60
diff
changeset
|
182 |
! ! |
a4f790013a99
UI: add "Copy Backtrace to Clipboard" menu item
Jan Vrany <jan.vrany@labware.com>
parents:
60
diff
changeset
|
183 |
|
a4f790013a99
UI: add "Copy Backtrace to Clipboard" menu item
Jan Vrany <jan.vrany@labware.com>
parents:
60
diff
changeset
|
184 |
!VDBThreadPresenter methodsFor:'menu queries'! |
a4f790013a99
UI: add "Copy Backtrace to Clipboard" menu item
Jan Vrany <jan.vrany@labware.com>
parents:
60
diff
changeset
|
185 |
|
a4f790013a99
UI: add "Copy Backtrace to Clipboard" menu item
Jan Vrany <jan.vrany@labware.com>
parents:
60
diff
changeset
|
186 |
canCopyBacktrace |
a4f790013a99
UI: add "Copy Backtrace to Clipboard" menu item
Jan Vrany <jan.vrany@labware.com>
parents:
60
diff
changeset
|
187 |
^ [ thread isStopped ] |
a4f790013a99
UI: add "Copy Backtrace to Clipboard" menu item
Jan Vrany <jan.vrany@labware.com>
parents:
60
diff
changeset
|
188 |
|
a4f790013a99
UI: add "Copy Backtrace to Clipboard" menu item
Jan Vrany <jan.vrany@labware.com>
parents:
60
diff
changeset
|
189 |
"Modified: / 09-08-2020 / 07:01:35 / Jan Vrany <jan.vrany@labware.com>" |
a4f790013a99
UI: add "Copy Backtrace to Clipboard" menu item
Jan Vrany <jan.vrany@labware.com>
parents:
60
diff
changeset
|
190 |
! ! |
a4f790013a99
UI: add "Copy Backtrace to Clipboard" menu item
Jan Vrany <jan.vrany@labware.com>
parents:
60
diff
changeset
|
191 |
|
212
62bb14c71a71
Add `#printOn:` to thread group, thread and frame presenters
Jan Vrany <jan.vrany@labware.com>
parents:
208
diff
changeset
|
192 |
!VDBThreadPresenter methodsFor:'printing & storing'! |
62bb14c71a71
Add `#printOn:` to thread group, thread and frame presenters
Jan Vrany <jan.vrany@labware.com>
parents:
208
diff
changeset
|
193 |
|
62bb14c71a71
Add `#printOn:` to thread group, thread and frame presenters
Jan Vrany <jan.vrany@labware.com>
parents:
208
diff
changeset
|
194 |
printOn:aStream |
62bb14c71a71
Add `#printOn:` to thread group, thread and frame presenters
Jan Vrany <jan.vrany@labware.com>
parents:
208
diff
changeset
|
195 |
"append a printed representation of the receiver to the argument, aStream" |
62bb14c71a71
Add `#printOn:` to thread group, thread and frame presenters
Jan Vrany <jan.vrany@labware.com>
parents:
208
diff
changeset
|
196 |
|
62bb14c71a71
Add `#printOn:` to thread group, thread and frame presenters
Jan Vrany <jan.vrany@labware.com>
parents:
208
diff
changeset
|
197 |
super printOn:aStream. |
62bb14c71a71
Add `#printOn:` to thread group, thread and frame presenters
Jan Vrany <jan.vrany@labware.com>
parents:
208
diff
changeset
|
198 |
aStream nextPut:$(. |
62bb14c71a71
Add `#printOn:` to thread group, thread and frame presenters
Jan Vrany <jan.vrany@labware.com>
parents:
208
diff
changeset
|
199 |
thread printOn:aStream. |
62bb14c71a71
Add `#printOn:` to thread group, thread and frame presenters
Jan Vrany <jan.vrany@labware.com>
parents:
208
diff
changeset
|
200 |
aStream nextPut:$). |
62bb14c71a71
Add `#printOn:` to thread group, thread and frame presenters
Jan Vrany <jan.vrany@labware.com>
parents:
208
diff
changeset
|
201 |
|
62bb14c71a71
Add `#printOn:` to thread group, thread and frame presenters
Jan Vrany <jan.vrany@labware.com>
parents:
208
diff
changeset
|
202 |
"Created: / 14-05-2021 / 14:33:55 / Jan Vrany <jan.vrany@labware.com>" |
62bb14c71a71
Add `#printOn:` to thread group, thread and frame presenters
Jan Vrany <jan.vrany@labware.com>
parents:
208
diff
changeset
|
203 |
! ! |
62bb14c71a71
Add `#printOn:` to thread group, thread and frame presenters
Jan Vrany <jan.vrany@labware.com>
parents:
208
diff
changeset
|
204 |
|
22
6684f4d82301
Temporary commit: reworking VDBStackApplication to support multiple threads and inferiors
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff
changeset
|
205 |
!VDBThreadPresenter methodsFor:'protocol-accessing'! |
6684f4d82301
Temporary commit: reworking VDBStackApplication to support multiple threads and inferiors
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff
changeset
|
206 |
|
6684f4d82301
Temporary commit: reworking VDBStackApplication to support multiple threads and inferiors
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff
changeset
|
207 |
fetchChildren |
6684f4d82301
Temporary commit: reworking VDBStackApplication to support multiple threads and inferiors
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff
changeset
|
208 |
"should compute the list of children via the model. |
6684f4d82301
Temporary commit: reworking VDBStackApplication to support multiple threads and inferiors
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff
changeset
|
209 |
Be aware, that the somewhat stupid 'optimization' of how the model is fetched may lead to |
6684f4d82301
Temporary commit: reworking VDBStackApplication to support multiple threads and inferiors
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff
changeset
|
210 |
a O(n*log n) or even O(n^2) behavior here. |
6684f4d82301
Temporary commit: reworking VDBStackApplication to support multiple threads and inferiors
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff
changeset
|
211 |
*** to optimize: redefine by subClass" |
6684f4d82301
Temporary commit: reworking VDBStackApplication to support multiple threads and inferiors
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff
changeset
|
212 |
|
23
ed5f4b55cee5
Added toolbar and icons. Show all thread groups and threads in stack view.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
22
diff
changeset
|
213 |
thread isDead ifTrue:[ ^ #() ]. |
31
00f6de198c7f
Minor fixes in the UI - redraw stack list when execution state changes.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
24
diff
changeset
|
214 |
thread isRunning ifTrue:[ ^ #() ]. |
23
ed5f4b55cee5
Added toolbar and icons. Show all thread groups and threads in stack view.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
22
diff
changeset
|
215 |
^ thread stack collect:[ :f | VDBFramePresenter new setFrame: f; parent: self ] |
22
6684f4d82301
Temporary commit: reworking VDBStackApplication to support multiple threads and inferiors
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff
changeset
|
216 |
|
6684f4d82301
Temporary commit: reworking VDBStackApplication to support multiple threads and inferiors
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff
changeset
|
217 |
"Created: / 21-09-2014 / 23:42:26 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
31
00f6de198c7f
Minor fixes in the UI - redraw stack list when execution state changes.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
24
diff
changeset
|
218 |
"Modified: / 30-09-2014 / 00:04:46 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
22
6684f4d82301
Temporary commit: reworking VDBStackApplication to support multiple threads and inferiors
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff
changeset
|
219 |
! ! |
6684f4d82301
Temporary commit: reworking VDBStackApplication to support multiple threads and inferiors
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff
changeset
|
220 |
|
208
719dfb28b819
UX: avoid round trip to GDB until thread node is expanded
Jan Vrany <jan.vrany@labware.com>
parents:
207
diff
changeset
|
221 |
!VDBThreadPresenter methodsFor:'protocol-queries'! |
719dfb28b819
UX: avoid round trip to GDB until thread node is expanded
Jan Vrany <jan.vrany@labware.com>
parents:
207
diff
changeset
|
222 |
|
719dfb28b819
UX: avoid round trip to GDB until thread node is expanded
Jan Vrany <jan.vrany@labware.com>
parents:
207
diff
changeset
|
223 |
hasChildren |
719dfb28b819
UX: avoid round trip to GDB until thread node is expanded
Jan Vrany <jan.vrany@labware.com>
parents:
207
diff
changeset
|
224 |
|
719dfb28b819
UX: avoid round trip to GDB until thread node is expanded
Jan Vrany <jan.vrany@labware.com>
parents:
207
diff
changeset
|
225 |
"/ Here we assume a thread has at least one frame. |
719dfb28b819
UX: avoid round trip to GDB until thread node is expanded
Jan Vrany <jan.vrany@labware.com>
parents:
207
diff
changeset
|
226 |
"/ This is NOT true is certain corner cases, however, |
719dfb28b819
UX: avoid round trip to GDB until thread node is expanded
Jan Vrany <jan.vrany@labware.com>
parents:
207
diff
changeset
|
227 |
"/ unconditionally answering `true` here avoids round-trip |
719dfb28b819
UX: avoid round trip to GDB until thread node is expanded
Jan Vrany <jan.vrany@labware.com>
parents:
207
diff
changeset
|
228 |
"/ to GDB until thread node is actually "expanded". |
719dfb28b819
UX: avoid round trip to GDB until thread node is expanded
Jan Vrany <jan.vrany@labware.com>
parents:
207
diff
changeset
|
229 |
^ true |
719dfb28b819
UX: avoid round trip to GDB until thread node is expanded
Jan Vrany <jan.vrany@labware.com>
parents:
207
diff
changeset
|
230 |
|
719dfb28b819
UX: avoid round trip to GDB until thread node is expanded
Jan Vrany <jan.vrany@labware.com>
parents:
207
diff
changeset
|
231 |
"Created: / 10-12-2020 / 00:05:41 / Jan Vrany <jan.vrany@labware.com>" |
719dfb28b819
UX: avoid round trip to GDB until thread node is expanded
Jan Vrany <jan.vrany@labware.com>
parents:
207
diff
changeset
|
232 |
"Modified (comment): / 10-12-2020 / 20:17:56 / Jan Vrany <jan.vrany@labware.com>" |
719dfb28b819
UX: avoid round trip to GDB until thread node is expanded
Jan Vrany <jan.vrany@labware.com>
parents:
207
diff
changeset
|
233 |
! ! |
207
27e7fa4229b3
UI: show thread name (instead of id) in stack view
Jan Vrany <jan.vrany@labware.com>
parents:
197
diff
changeset
|
234 |
|
23
ed5f4b55cee5
Added toolbar and icons. Show all thread groups and threads in stack view.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
22
diff
changeset
|
235 |
!VDBThreadPresenter methodsFor:'testing'! |
ed5f4b55cee5
Added toolbar and icons. Show all thread groups and threads in stack view.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
22
diff
changeset
|
236 |
|
ed5f4b55cee5
Added toolbar and icons. Show all thread groups and threads in stack view.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
22
diff
changeset
|
237 |
isThreadPresenter |
ed5f4b55cee5
Added toolbar and icons. Show all thread groups and threads in stack view.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
22
diff
changeset
|
238 |
^ true |
ed5f4b55cee5
Added toolbar and icons. Show all thread groups and threads in stack view.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
22
diff
changeset
|
239 |
|
ed5f4b55cee5
Added toolbar and icons. Show all thread groups and threads in stack view.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
22
diff
changeset
|
240 |
"Created: / 21-09-2014 / 23:54:28 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
ed5f4b55cee5
Added toolbar and icons. Show all thread groups and threads in stack view.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
22
diff
changeset
|
241 |
! ! |
ed5f4b55cee5
Added toolbar and icons. Show all thread groups and threads in stack view.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
22
diff
changeset
|
242 |
|
38
9b861cb882c8
Show al thread groupd, even terminated ones
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
31
diff
changeset
|
243 |
!VDBThreadPresenter class methodsFor:'documentation'! |
9b861cb882c8
Show al thread groupd, even terminated ones
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
31
diff
changeset
|
244 |
|
9b861cb882c8
Show al thread groupd, even terminated ones
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
31
diff
changeset
|
245 |
version_HG |
9b861cb882c8
Show al thread groupd, even terminated ones
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
31
diff
changeset
|
246 |
|
9b861cb882c8
Show al thread groupd, even terminated ones
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
31
diff
changeset
|
247 |
^ '$Changeset: <not expanded> $' |
9b861cb882c8
Show al thread groupd, even terminated ones
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
31
diff
changeset
|
248 |
! ! |
9b861cb882c8
Show al thread groupd, even terminated ones
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
31
diff
changeset
|
249 |