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. |
33 |
33 |
34 copyright |
34 copyright |
35 " |
35 " |
36 jv:libgdbs - GNU Debugger Interface Library |
36 jv:libgdbs - GNU Debugger Interface Library |
37 Copyright (C) 2015-now Jan Vrany |
37 Copyright (C) 2015-now Jan Vrany |
38 Copyright (C) 2021 LabWare |
38 Copyright (C) 2021-2022 LabWare |
39 |
39 |
40 This library is free software; you can redistribute it and/or |
40 This library is free software; you can redistribute it and/or |
41 modify it under the terms of the GNU Lesser General Public |
41 modify it under the terms of the GNU Lesser General Public |
42 License as published by the Free Software Foundation; either |
42 License as published by the Free Software Foundation; either |
43 version 2.1 of the License. |
43 version 2.1 of the License. |
350 printOn:aStream |
350 printOn:aStream |
351 "append a printed representation if the receiver to the argument, aStream" |
351 "append a printed representation if the receiver to the argument, aStream" |
352 |
352 |
353 super printOn: aStream. |
353 super printOn: aStream. |
354 aStream nextPutAll:'('. |
354 aStream nextPutAll:'('. |
355 level printOn:aStream base: 10 size: 2 fill: Character space. |
355 "/ In rare occations, level may be nil, for example if frame object |
|
356 "/ comes from stopped event. sigh... |
|
357 level isNil ifTrue: [ |
|
358 aStream nextPutAll: ' ?' |
|
359 ] ifFalse: [ |
|
360 level printOn:aStream base: 10 size: 2 fill: Character space. |
|
361 ]. |
356 aStream nextPutAll:' '. |
362 aStream nextPutAll:' '. |
357 addr printOn:aStream. |
363 addr printOn:aStream. |
358 aStream nextPutAll:' '. |
364 aStream nextPutAll:' '. |
359 func printOn:aStream. |
365 func printOn:aStream. |
360 aStream nextPutAll:' - '. |
366 aStream nextPutAll:' - '. |
362 aStream nextPutAll:':'. |
368 aStream nextPutAll:':'. |
363 line printOn:aStream. |
369 line printOn:aStream. |
364 aStream nextPutAll:')'. |
370 aStream nextPutAll:')'. |
365 |
371 |
366 "Modified: / 27-02-2015 / 15:21:13 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
372 "Modified: / 27-02-2015 / 15:21:13 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
|
373 "Modified: / 22-02-2022 / 11:24:30 / Jan Vrany <jan.vrany@labware.com>" |
367 ! ! |
374 ! ! |
368 |
375 |
369 !GDBFrame methodsFor:'private'! |
376 !GDBFrame methodsFor:'private'! |
370 |
377 |
371 invalidate |
378 invalidate |