GDBThreadGroupStartedEvent.st
changeset 35 c17ecf90e446
parent 13 45ec9353003f
child 45 deb908479a37
--- a/GDBThreadGroupStartedEvent.st	Sun Sep 07 08:20:01 2014 +0100
+++ b/GDBThreadGroupStartedEvent.st	Sun Sep 07 14:42:02 2014 +0100
@@ -1,14 +1,28 @@
 "{ Package: 'jv:libgdbs' }"
 
-GDBNotificationEvent subclass:#GDBThreadGroupStartedEvent
-	instanceVariableNames:''
+GDBThreadGroupEvent subclass:#GDBThreadGroupStartedEvent
+	instanceVariableNames:'pid'
 	classVariableNames:''
 	poolDictionaries:''
 	category:'GDB-Core-Events'
 !
 
+!GDBThreadGroupStartedEvent class methodsFor:'accessing - GDB value descriptors'!
+
+gdbValueDescriptor
+    ^ (super gdbValueDescriptor)
+        define: #pid as: Integer;
+        yourself
+
+    "Created: / 06-09-2014 / 02:10:24 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+! !
+
 !GDBThreadGroupStartedEvent methodsFor:'accessing'!
 
+pid
+    ^ pid
+!
+
 type
 	^  'thread-group-started'
 ! !