--- a/GDBCommandResult.st	Thu Jun 19 22:27:00 2014 +0100
+++ b/GDBCommandResult.st	Fri Jun 20 09:26:41 2014 +0100
@@ -26,6 +26,28 @@
     status := something.
 ! !
 
+!GDBCommandResult methodsFor:'accessing-properties'!
+
+properties
+    ^ GDBObject getPropertiesOf: self.
+
+    "Modified: / 20-06-2014 / 09:04:23 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
+propertyAt: name
+    ^ GDBObject getProperty: name of: self
+
+    "Created: / 31-05-2014 / 00:00:33 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 20-06-2014 / 09:05:05 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
+propertyAt: name put: value
+    ^ GDBObject setProperty: name of: self to: value
+
+    "Created: / 31-05-2014 / 00:01:10 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 20-06-2014 / 09:05:34 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+! !
+
 !GDBCommandResult class methodsFor:'documentation'!
 
 version_HG