GDBThreadEvent.st
author Jan Vrany <jan.vrany@fit.cvut.cz>
Wed, 12 Jul 2017 16:27:29 +0200
changeset 86 7f53d51a0a65
parent 78 c24e7d8bc881
child 91 472a4841a8b6
permissions -rw-r--r--
Cache thread status and update it on `=stopped` and `=running` events ...rather than asking thread info each time. This saves us the need to issue `-thread-info` each time *some* threas stops/runs.

"{ Package: 'jv:libgdbs' }"

"{ NameSpace: Smalltalk }"

GDBNotificationEvent subclass:#GDBThreadEvent
	instanceVariableNames:'thread id group_id'
	classVariableNames:''
	poolDictionaries:''
	category:'GDB-Core-Events'
!


!GDBThreadEvent class methodsFor:'accessing - GDB value descriptors'!

description
    ^ (super description)
        define:#id as:Integer;
        define:#'group-id' as:String;
        yourself

    "Created: / 06-09-2014 / 02:08:34 / Jan Vrany <jan.vrany@fit.cvut.cz>"
! !

!GDBThreadEvent methodsFor:'accessing'!

thread
    ^ thread
!

threadGroup
    ^ thread threadGroup

    "Created: / 07-09-2014 / 18:07:35 / Jan Vrany <jan.vrany@fit.cvut.cz>"
!

threadGroupId
    ^ group_id

    "Created: / 07-09-2014 / 18:07:19 / Jan Vrany <jan.vrany@fit.cvut.cz>"
!

threadId
    ^ id

    "Created: / 07-09-2014 / 18:07:04 / Jan Vrany <jan.vrany@fit.cvut.cz>"
! !

!GDBThreadEvent methodsFor:'initialization'!

setThread: aGDBThread
    thread := aGDBThread

    "Created: / 07-09-2014 / 15:05:24 / Jan Vrany <jan.vrany@fit.cvut.cz>"
! !

!GDBThreadEvent class methodsFor:'documentation'!

version_HG

    ^ '$Changeset: <not expanded> $'
! !