--- a/GDBConnection.st Mon Jun 23 09:45:16 2014 +0100
+++ b/GDBConnection.st Tue Jun 24 00:55:57 2014 +0100
@@ -45,18 +45,18 @@
send: command
| commandString |
- command token notNil ifTrue:[
- process debuggerInput nextPutAll: command token printString.
- ].
+ commandString := command token notNil
+ ifTrue:[ command token printString , command asString ]
+ ifFalse:[ commandString := command asString ].
+
outstandingCommands add: command.
- commandString := command asString.
recorder notNil ifTrue:[
- recorder recordCommand: commandString
+ recorder recordCommand: commandString
].
process debuggerInput nextPutLine: commandString.
"Created: / 20-06-2014 / 22:09:38 / Jan Vrany <jan.vrany@fit.cvut.cz>"
- "Modified: / 23-06-2014 / 09:36:36 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+ "Modified: / 23-06-2014 / 23:31:53 / Jan Vrany <jan.vrany@fit.cvut.cz>"
! !
!GDBConnection methodsFor:'event dispatching'!