equal
deleted
inserted
replaced
1 " |
1 " |
2 jv:vdb - Visual / VM Debugger |
2 jv:vdb - Visual / VM Debugger |
3 Copyright (C) 2015-now Jan Vrany |
3 Copyright (C) 2015-now Jan Vrany |
|
4 Copyright (C) 2020 LabWare |
4 |
5 |
5 This software is licensed under 'Creative Commons Attribution-NonCommercial 4.0 International License' |
6 This software is licensed under 'Creative Commons Attribution-NonCommercial 4.0 International License' |
6 |
7 |
7 You may find a full license text in LICENSE.txt or at http://creativecommons.org/licenses/by-nc/4.0/ |
8 You may find a full license text in LICENSE.txt or at http://creativecommons.org/licenses/by-nc/4.0/ |
8 " |
9 " |
21 |
22 |
22 copyright |
23 copyright |
23 " |
24 " |
24 jv:vdb - Visual / VM Debugger |
25 jv:vdb - Visual / VM Debugger |
25 Copyright (C) 2015-now Jan Vrany |
26 Copyright (C) 2015-now Jan Vrany |
|
27 Copyright (C) 2020 LabWare |
26 |
28 |
27 This software is licensed under 'Creative Commons Attribution-NonCommercial 4.0 International License' |
29 This software is licensed under 'Creative Commons Attribution-NonCommercial 4.0 International License' |
28 |
30 |
29 You may find a full license text in LICENSE.txt or at http://creativecommons.org/licenses/by-nc/4.0/ |
31 You may find a full license text in LICENSE.txt or at http://creativecommons.org/licenses/by-nc/4.0/ |
30 " |
32 " |
285 ! ! |
287 ! ! |
286 |
288 |
287 !VDBSettingsApplication methodsFor:'actions'! |
289 !VDBSettingsApplication methodsFor:'actions'! |
288 |
290 |
289 doEditGDBinit |
291 doEditGDBinit |
290 VDBScatchPadApplication openOnFile:VDBDebuggerApplication gdbUserInitFile |
292 | file | |
|
293 |
|
294 file := VDBDebuggerApplication gdbUserInitFile. |
|
295 file exists ifFalse: [ |
|
296 file directory isWritable ifTrue: [ |
|
297 file createAsEmptyFile. |
|
298 ]. |
|
299 ]. |
|
300 VDBScatchPadApplication openOnFile:file |
291 |
301 |
292 "Modified: / 21-06-2019 / 10:10:53 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
302 "Modified: / 21-06-2019 / 10:10:53 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
|
303 "Modified: / 16-11-2020 / 22:17:14 / Jan Vrany <jan.vrany@labware.com>" |
293 ! |
304 ! |
294 |
305 |
295 doEditVDBinit |
306 doEditVDBinit |
296 | user default userEditor defaultEditor workspaceView workspace | |
307 | user default userEditor defaultEditor workspaceView workspace | |
297 |
308 |
319 workspace := VDBScatchPadApplication new. |
330 workspace := VDBScatchPadApplication new. |
320 workspace workspaces add:workspaceView. |
331 workspace workspaces add:workspaceView. |
321 workspace syntax:SmalltalkLanguage instance. |
332 workspace syntax:SmalltalkLanguage instance. |
322 workspace open. |
333 workspace open. |
323 workspace window |
334 workspace window |
324 label:(resources string:'.vdbinit.st - User : vdbinit.st - Default') |
335 label:(resources string:'.vdbinit.st - User : vdbinit.st - Default') |
|
336 |
|
337 "Modified: / 16-11-2020 / 22:21:11 / Jan Vrany <jan.vrany@labware.com>" |
325 ! |
338 ! |
326 |
339 |
327 doSelectExecutable |
340 doSelectExecutable |
328 | guess executable | |
341 | guess executable | |
329 |
342 |