GDBStoppedEvent.st
changeset 95 f417138e9c48
parent 91 472a4841a8b6
child 135 6efae6456f14
--- a/GDBStoppedEvent.st	Mon Jan 08 19:43:49 2018 +0000
+++ b/GDBStoppedEvent.st	Thu Jan 11 23:53:06 2018 +0000
@@ -65,10 +65,12 @@
 !GDBStoppedEvent methodsFor:'accessing'!
 
 stoppedThread
+    thread_id isNil ifTrue:[ ^ nil ].
     ^ threads detect:[:thread | thread id = thread_id ]
 
     "Created: / 22-09-2014 / 23:24:47 / Jan Vrany <jan.vrany@fit.cvut.cz>"
     "Modified: / 27-02-2015 / 12:36:35 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 15-01-2018 / 11:52:17 / jv"
 !
 
 stoppedThreadId
@@ -79,12 +81,20 @@
 !
 
 stoppedThreadIds
-    ^ stopped_threads
+    ^ stopped_threads ? 'all'
 
     "Created: / 08-09-2014 / 22:15:38 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 15-01-2018 / 11:50:38 / jv"
 !
 
 type
 	^  'stopped'
 ! !
 
+!GDBStoppedEvent class methodsFor:'documentation'!
+
+version_HG
+
+    ^ '$Changeset: <not expanded> $'
+! !
+