GDBThread.st
changeset 70 6d7285bb1703
parent 67 c4ac76afe03d
child 72 eb4eea3ebf4c
--- a/GDBThread.st	Tue Mar 10 09:55:23 2015 +0000
+++ b/GDBThread.st	Tue Mar 10 09:57:21 2015 +0000
@@ -11,6 +11,7 @@
 	category:'GDB-Core'
 !
 
+
 !GDBThread class methodsFor:'instance creation'!
 
 newWithDebugger: debugger id: id group: group
@@ -45,6 +46,12 @@
     "Created: / 07-09-2014 / 22:41:29 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
+name
+    ^ self targetId
+
+    "Created: / 10-03-2015 / 00:32:37 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
 stack
     self ensureIsStopped.
     stack isNil ifTrue:[
@@ -71,6 +78,12 @@
     ^ self info state
 
     "Modified: / 08-03-2015 / 09:10:40 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
+targetId
+    ^ self info targetId
+
+    "Created: / 10-03-2015 / 00:32:18 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
 !GDBThread methodsFor:'accessing-private'!
@@ -92,6 +105,14 @@
     "Modified: / 08-03-2015 / 12:35:54 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
+!GDBThread methodsFor:'displaying'!
+
+displayString
+    ^ '%1 [%2]' bindWith: self name with: self status
+
+    "Created: / 10-03-2015 / 00:32:47 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+! !
+
 !GDBThread methodsFor:'initialization'!
 
 setGroup: aGDBThreadGroup
@@ -175,3 +196,10 @@
     "Modified: / 08-03-2015 / 09:08:55 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
+!GDBThread class methodsFor:'documentation'!
+
+version_HG
+
+    ^ '$Changeset: <not expanded> $'
+! !
+