--- a/GDBCommandResultEvent.st Sun Mar 01 08:28:30 2015 +0000
+++ b/GDBCommandResultEvent.st Mon Mar 02 06:14:49 2015 +0000
@@ -1,5 +1,9 @@
+"{ Encoding: utf8 }"
+
"{ Package: 'jv:libgdbs' }"
+"{ NameSpace: Smalltalk }"
+
GDBEvent subclass:#GDBCommandResultEvent
instanceVariableNames:'result'
classVariableNames:''
@@ -7,6 +11,7 @@
category:'GDB-Core-Events'
!
+
!GDBCommandResultEvent methodsFor:'accessing'!
result
@@ -23,9 +28,24 @@
"Created: / 04-06-2014 / 09:30:32 / Jan Vrany <jan.vrany@fit.cvut.cz>"
! !
+!GDBCommandResultEvent methodsFor:'displaying'!
+
+displayString
+ ^ '%1 [finished, %2]' bindWith: result command asString with: result status
+
+ "Created: / 01-03-2015 / 08:56:04 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+! !
+
!GDBCommandResultEvent methodsFor:'testing'!
isCommandResultEvent
^ true
! !
+!GDBCommandResultEvent class methodsFor:'documentation'!
+
+version_HG
+
+ ^ '$Changeset: <not expanded> $'
+! !
+