equal
deleted
inserted
replaced
29 ! ! |
29 ! ! |
30 |
30 |
31 !GDBCommand methodsFor:'converting'! |
31 !GDBCommand methodsFor:'converting'! |
32 |
32 |
33 asString |
33 asString |
34 ^ self subclassResponsibility |
34 ^ String streamContents: [ :s | (GDBMIPrinter on: s) printCommand: self ] |
35 |
35 |
36 "Created: / 02-06-2014 / 23:34:21 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
36 "Created: / 09-06-2014 / 18:42:11 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
|
37 "Modified: / 11-07-2017 / 23:14:14 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
|
38 ! ! |
|
39 |
|
40 !GDBCommand methodsFor:'printing & storing'! |
|
41 |
|
42 printOn: aStream |
|
43 super printOn: aStream. |
|
44 aStream nextPut: $(; nextPutAll: self asString; nextPut:$) |
|
45 |
|
46 "Created: / 11-07-2017 / 23:23:19 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
37 ! ! |
47 ! ! |
38 |
48 |
39 !GDBCommand methodsFor:'testing'! |
49 !GDBCommand methodsFor:'testing'! |
40 |
50 |
41 isCLICommand |
51 isCLICommand |