equal
deleted
inserted
replaced
1 " |
1 " |
2 jv:libgdbs - GNU Debugger Interface Library |
2 jv:libgdbs - GNU Debugger Interface Library |
3 Copyright (C) 2015-now Jan Vrany |
3 Copyright (C) 2015-now Jan Vrany |
4 Copyright (C) 2021 LabWare |
4 Copyright (C) 2021-2022 LabWare |
5 |
5 |
6 This library is free software; you can redistribute it and/or |
6 This library is free software; you can redistribute it and/or |
7 modify it under the terms of the GNU Lesser General Public |
7 modify it under the terms of the GNU Lesser General Public |
8 License as published by the Free Software Foundation; either |
8 License as published by the Free Software Foundation; either |
9 version 2.1 of the License. |
9 version 2.1 of the License. |
32 |
32 |
33 copyright |
33 copyright |
34 " |
34 " |
35 jv:libgdbs - GNU Debugger Interface Library |
35 jv:libgdbs - GNU Debugger Interface Library |
36 Copyright (C) 2015-now Jan Vrany |
36 Copyright (C) 2015-now Jan Vrany |
37 Copyright (C) 2021 LabWare |
37 Copyright (C) 2021-2022 LabWare |
38 |
38 |
39 This library is free software; you can redistribute it and/or |
39 This library is free software; you can redistribute it and/or |
40 modify it under the terms of the GNU Lesser General Public |
40 modify it under the terms of the GNU Lesser General Public |
41 License as published by the Free Software Foundation; either |
41 License as published by the Free Software Foundation; either |
42 version 2.1 of the License. |
42 version 2.1 of the License. |
106 |
106 |
107 "Created: / 31-05-2014 / 00:01:10 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
107 "Created: / 31-05-2014 / 00:01:10 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
108 "Modified: / 20-06-2014 / 09:05:34 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
108 "Modified: / 20-06-2014 / 09:05:34 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
109 ! ! |
109 ! ! |
110 |
110 |
|
111 !GDBEvent methodsFor:'printing & storing'! |
|
112 |
|
113 printDetailOn: aStream |
|
114 "Nothing special, to be overriden by subclasses" |
|
115 |
|
116 "Created: / 22-02-2022 / 11:52:38 / Jan Vrany <jan.vrany@labware.com>" |
|
117 ! |
|
118 |
|
119 printOn:aStream |
|
120 "append a printed representation of the receiver to the argument, aStream" |
|
121 |
|
122 super printOn:aStream. |
|
123 aStream nextPut: $(. |
|
124 token notNil ifTrue: [ |
|
125 token printOn: aStream base: 10 size: 3 fill: Character space. |
|
126 ] ifFalse: [ |
|
127 aStream nextPutAll: '???'. |
|
128 ]. |
|
129 aStream nextPutAll: ', '. |
|
130 self printDetailOn: aStream. |
|
131 aStream nextPut: $). |
|
132 |
|
133 "Created: / 22-02-2022 / 11:52:11 / Jan Vrany <jan.vrany@labware.com>" |
|
134 ! ! |
|
135 |
111 !GDBEvent methodsFor:'private - dispatching'! |
136 !GDBEvent methodsFor:'private - dispatching'! |
112 |
137 |
113 dispatchUsing: aGDBEventDispatcher |
138 dispatchUsing: aGDBEventDispatcher |
114 "Dispatch the event using given event dispatcher. |
139 "Dispatch the event using given event dispatcher. |
115 |
140 |