equal
deleted
inserted
replaced
24 |
24 |
25 status:something |
25 status:something |
26 status := something. |
26 status := something. |
27 ! ! |
27 ! ! |
28 |
28 |
|
29 !GDBCommandResult methodsFor:'accessing-properties'! |
|
30 |
|
31 properties |
|
32 ^ GDBObject getPropertiesOf: self. |
|
33 |
|
34 "Modified: / 20-06-2014 / 09:04:23 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
|
35 ! |
|
36 |
|
37 propertyAt: name |
|
38 ^ GDBObject getProperty: name of: self |
|
39 |
|
40 "Created: / 31-05-2014 / 00:00:33 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
|
41 "Modified: / 20-06-2014 / 09:05:05 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
|
42 ! |
|
43 |
|
44 propertyAt: name put: value |
|
45 ^ GDBObject setProperty: name of: self to: value |
|
46 |
|
47 "Created: / 31-05-2014 / 00:01:10 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
|
48 "Modified: / 20-06-2014 / 09:05:34 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
|
49 ! ! |
|
50 |
29 !GDBCommandResult class methodsFor:'documentation'! |
51 !GDBCommandResult class methodsFor:'documentation'! |
30 |
52 |
31 version_HG |
53 version_HG |
32 |
54 |
33 ^ '$Changeset: <not expanded> $' |
55 ^ '$Changeset: <not expanded> $' |