GDBThread.st
changeset 53 63669c2c0f9e
parent 51 2fa20404923c
child 55 437ee6413c74
--- a/GDBThread.st	Wed Oct 01 09:38:44 2014 +0100
+++ b/GDBThread.st	Fri Feb 27 12:48:56 2015 +0100
@@ -1,5 +1,7 @@
 "{ Package: 'jv:libgdbs' }"
 
+"{ NameSpace: Smalltalk }"
+
 GDBDebuggerObject subclass:#GDBThread
 	instanceVariableNames:'id group status stack'
 	classVariableNames:''
@@ -77,27 +79,28 @@
 setId: tid
     self assert: id isNil.
     id := tid.
-    status := GDBThreadStatusRunning theOneAndOnlyInstance
+    status := GDBThreadStateRunning theOneAndOnlyInstance
 
     "Created: / 07-09-2014 / 21:31:30 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-    "Modified: / 07-09-2014 / 23:27:56 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 27-02-2015 / 09:36:21 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
-setStatus: aGDBThreadStatus
-    status := aGDBThreadStatus.
+setStatus: aGDBThreadState
+    status := aGDBThreadState.
     status isStopped ifFalse:[
         stack := nil.
     ].
 
     "Created: / 07-09-2014 / 23:25:52 / Jan Vrany <jan.vrany@fit.cvut.cz>"
     "Modified: / 09-09-2014 / 00:04:54 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified (format): / 27-02-2015 / 09:36:16 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 setTerminated
-    status := GDBThreadStatusTerminated theOneAndOnlyInstance
+    status := GDBThreadStateTerminated theOneAndOnlyInstance
 
     "Created: / 07-09-2014 / 21:37:37 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-    "Modified: / 07-09-2014 / 23:21:05 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 27-02-2015 / 09:36:05 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
 !GDBThread methodsFor:'printing & storing'!