--- a/GDBCommandResult.st	Thu Jun 19 10:10:52 2014 +0100
+++ b/GDBCommandResult.st	Thu Jun 19 22:16:26 2014 +0100
@@ -1,7 +1,7 @@
 "{ Package: 'jv:libgdbs' }"
 
-Object subclass:#GDBCommandResult
-	instanceVariableNames:'status value'
+GDBObject subclass:#GDBCommandResult
+	instanceVariableNames:'command status'
 	classVariableNames:''
 	poolDictionaries:''
 	category:'GDB-Core-Commands'
@@ -10,20 +10,20 @@
 
 !GDBCommandResult methodsFor:'accessing'!
 
+command
+    ^ command
+!
+
+command:something
+    command := something.
+!
+
 status
     ^ status
 !
 
 status:something
     status := something.
-!
-
-value
-    ^ value
-!
-
-value:something
-    value := something.
 ! !
 
 !GDBCommandResult class methodsFor:'documentation'!