GDBThreadGroup.st
changeset 37 a85f0c91f164
parent 36 095c4b0b74d3
child 43 22236b6d1d9a
--- a/GDBThreadGroup.st	Sun Sep 07 22:44:55 2014 +0100
+++ b/GDBThreadGroup.st	Mon Sep 08 10:02:31 2014 +0100
@@ -62,24 +62,28 @@
 
 !GDBThreadGroup methodsFor:'event handling'!
 
-onThreadCreated:aGDBThreadCreatedEvent
+onThreadCreatedEvent:aGDBThreadCreatedEvent 
     | thread |
-    threads isNil ifTrue:[ 
+
+    threads isNil ifTrue:[
         threads := List new.
     ].
-    thread := GDBThread newWithDebugger: debugger id: aGDBThreadCreatedEvent threadId group: self.
-    threads add: thread.
-    aGDBThreadCreatedEvent setThread: thread.
+    thread := GDBThread 
+            newWithDebugger:debugger
+            id:aGDBThreadCreatedEvent threadId
+            group:self.
+    threads add:thread.
+    aGDBThreadCreatedEvent setThread:thread.
 
     "Created: / 07-09-2014 / 21:25:08 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
-onThreadExited:aGDBThreadExitedEvent
+onThreadExitedEvent:aGDBThreadExitedEvent 
     | thread |
 
     thread := self threadWithId:aGDBThreadExitedEvent threadId.
     thread setTerminated.
-    aGDBThreadExitedEvent setThread: thread
+    aGDBThreadExitedEvent setThread:thread
 
     "Created: / 07-09-2014 / 21:25:24 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !