GDBProcess.st
changeset 79 303c4edc75ad
parent 78 c24e7d8bc881
child 91 472a4841a8b6
--- a/GDBProcess.st	Fri May 26 08:05:28 2017 +0100
+++ b/GDBProcess.st	Thu Jun 01 12:15:43 2017 +0100
@@ -3,12 +3,13 @@
 "{ NameSpace: Smalltalk }"
 
 Object subclass:#GDBProcess
-	instanceVariableNames:'pid debuggerInput debuggerOutput connection'
+	instanceVariableNames:'pid connection'
 	classVariableNames:''
 	poolDictionaries:''
 	category:'GDB-Private'
 !
 
+
 !GDBProcess class methodsFor:'instance creation'!
 
 new
@@ -33,32 +34,41 @@
     connection := aGDBConnection.
 !
 
+consoleInput
+    ^ self subclassResponsibility
+
+    "Created: / 02-06-2017 / 23:35:43 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
+consoleOutput
+    ^ self subclassResponsibility
+
+    "Created: / 02-06-2017 / 23:35:39 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
 debuggerInput
-    ^ debuggerInput
+    "raise an error: must be redefined in concrete subclass(es)"
+
+    ^ self subclassResponsibility
 !
 
 debuggerOutput
-    ^ debuggerOutput
+    "raise an error: must be redefined in concrete subclass(es)"
+
+    ^ self subclassResponsibility
 !
 
 pid
     ^ pid
 ! !
 
-!GDBProcess methodsFor:'initialization'!
+!GDBProcess methodsFor:'initialization & release'!
 
 release
     pid := connection := nil.
-    debuggerInput notNil ifTrue:[ 
-        debuggerInput close.
-        debuggerInput := nil.
-    ].
-    debuggerOutput notNil ifTrue:[ 
-        debuggerOutput close.
-        debuggerOutput := nil.
-    ].
 
     "Created: / 20-06-2014 / 21:35:25 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 02-06-2017 / 23:33:03 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
 !GDBProcess methodsFor:'private'!
@@ -67,5 +77,13 @@
     connection released: status
 
     "Created: / 20-06-2014 / 21:35:09 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 31-05-2017 / 21:48:24 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
+!GDBProcess class methodsFor:'documentation'!
+
+version_HG
+
+    ^ '$Changeset: <not expanded> $'
+! !
+