--- 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'!