GDBEventSubscription.st
author Jan Vrany <jan.vrany@fit.cvut.cz>
Mon, 28 Jan 2019 14:56:14 +0000
changeset 173 02546d4fbe6d
parent 145 1256a03213cf
child 176 e734c17e7c37
permissions -rw-r--r--
Fix frame of `GDBThreadSelectedEvent` if inferior is running When ifnferior is running at time we get `=thread-selected` event, we should at least make that frame kind of usable by fixing up it's debugger and thread. This allow clients to use (to some extent) event's frame without worring (too much) about these details.
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
91
472a4841a8b6 License this package under 'GNU Lesser General Public License'
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 78
diff changeset
     1
"
472a4841a8b6 License this package under 'GNU Lesser General Public License'
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 78
diff changeset
     2
jv:libgdbs - GNU Debugger Interface Library
472a4841a8b6 License this package under 'GNU Lesser General Public License'
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 78
diff changeset
     3
Copyright (C) 2015-now Jan Vrany
472a4841a8b6 License this package under 'GNU Lesser General Public License'
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 78
diff changeset
     4
472a4841a8b6 License this package under 'GNU Lesser General Public License'
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 78
diff changeset
     5
This library is free software; you can redistribute it and/or
472a4841a8b6 License this package under 'GNU Lesser General Public License'
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 78
diff changeset
     6
modify it under the terms of the GNU Lesser General Public
472a4841a8b6 License this package under 'GNU Lesser General Public License'
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 78
diff changeset
     7
License as published by the Free Software Foundation; either
472a4841a8b6 License this package under 'GNU Lesser General Public License'
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 78
diff changeset
     8
version 2.1 of the License. 
472a4841a8b6 License this package under 'GNU Lesser General Public License'
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 78
diff changeset
     9
472a4841a8b6 License this package under 'GNU Lesser General Public License'
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 78
diff changeset
    10
This library is distributed in the hope that it will be useful,
472a4841a8b6 License this package under 'GNU Lesser General Public License'
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 78
diff changeset
    11
but WITHOUT ANY WARRANTY; without even the implied warranty of
472a4841a8b6 License this package under 'GNU Lesser General Public License'
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 78
diff changeset
    12
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
472a4841a8b6 License this package under 'GNU Lesser General Public License'
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 78
diff changeset
    13
Lesser General Public License for more details.
472a4841a8b6 License this package under 'GNU Lesser General Public License'
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 78
diff changeset
    14
472a4841a8b6 License this package under 'GNU Lesser General Public License'
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 78
diff changeset
    15
You should have received a copy of the GNU Lesser General Public
472a4841a8b6 License this package under 'GNU Lesser General Public License'
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 78
diff changeset
    16
License along with this library; if not, write to the Free Software
472a4841a8b6 License this package under 'GNU Lesser General Public License'
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 78
diff changeset
    17
Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
472a4841a8b6 License this package under 'GNU Lesser General Public License'
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 78
diff changeset
    18
"
41
fb48207b6104 Fixes in thread's stack mangement. Dispatch events to applications using their UI event loop.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    19
"{ Package: 'jv:libgdbs' }"
fb48207b6104 Fixes in thread's stack mangement. Dispatch events to applications using their UI event loop.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    20
78
c24e7d8bc881 BUpdated build files.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 41
diff changeset
    21
"{ NameSpace: Smalltalk }"
c24e7d8bc881 BUpdated build files.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 41
diff changeset
    22
41
fb48207b6104 Fixes in thread's stack mangement. Dispatch events to applications using their UI event loop.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    23
StrongSubscription subclass:#GDBEventSubscription
fb48207b6104 Fixes in thread's stack mangement. Dispatch events to applications using their UI event loop.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    24
	instanceVariableNames:''
fb48207b6104 Fixes in thread's stack mangement. Dispatch events to applications using their UI event loop.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    25
	classVariableNames:''
fb48207b6104 Fixes in thread's stack mangement. Dispatch events to applications using their UI event loop.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    26
	poolDictionaries:''
fb48207b6104 Fixes in thread's stack mangement. Dispatch events to applications using their UI event loop.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    27
	category:'GDB-Private'
fb48207b6104 Fixes in thread's stack mangement. Dispatch events to applications using their UI event loop.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    28
!
fb48207b6104 Fixes in thread's stack mangement. Dispatch events to applications using their UI event loop.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    29
91
472a4841a8b6 License this package under 'GNU Lesser General Public License'
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 78
diff changeset
    30
!GDBEventSubscription class methodsFor:'documentation'!
472a4841a8b6 License this package under 'GNU Lesser General Public License'
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 78
diff changeset
    31
472a4841a8b6 License this package under 'GNU Lesser General Public License'
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 78
diff changeset
    32
copyright
472a4841a8b6 License this package under 'GNU Lesser General Public License'
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 78
diff changeset
    33
"
472a4841a8b6 License this package under 'GNU Lesser General Public License'
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 78
diff changeset
    34
jv:libgdbs - GNU Debugger Interface Library
472a4841a8b6 License this package under 'GNU Lesser General Public License'
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 78
diff changeset
    35
Copyright (C) 2015-now Jan Vrany
472a4841a8b6 License this package under 'GNU Lesser General Public License'
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 78
diff changeset
    36
472a4841a8b6 License this package under 'GNU Lesser General Public License'
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 78
diff changeset
    37
This library is free software; you can redistribute it and/or
472a4841a8b6 License this package under 'GNU Lesser General Public License'
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 78
diff changeset
    38
modify it under the terms of the GNU Lesser General Public
472a4841a8b6 License this package under 'GNU Lesser General Public License'
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 78
diff changeset
    39
License as published by the Free Software Foundation; either
472a4841a8b6 License this package under 'GNU Lesser General Public License'
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 78
diff changeset
    40
version 2.1 of the License. 
472a4841a8b6 License this package under 'GNU Lesser General Public License'
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 78
diff changeset
    41
472a4841a8b6 License this package under 'GNU Lesser General Public License'
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 78
diff changeset
    42
This library is distributed in the hope that it will be useful,
472a4841a8b6 License this package under 'GNU Lesser General Public License'
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 78
diff changeset
    43
but WITHOUT ANY WARRANTY; without even the implied warranty of
472a4841a8b6 License this package under 'GNU Lesser General Public License'
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 78
diff changeset
    44
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
472a4841a8b6 License this package under 'GNU Lesser General Public License'
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 78
diff changeset
    45
Lesser General Public License for more details.
472a4841a8b6 License this package under 'GNU Lesser General Public License'
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 78
diff changeset
    46
472a4841a8b6 License this package under 'GNU Lesser General Public License'
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 78
diff changeset
    47
You should have received a copy of the GNU Lesser General Public
472a4841a8b6 License this package under 'GNU Lesser General Public License'
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 78
diff changeset
    48
License along with this library; if not, write to the Free Software
472a4841a8b6 License this package under 'GNU Lesser General Public License'
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 78
diff changeset
    49
Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
472a4841a8b6 License this package under 'GNU Lesser General Public License'
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 78
diff changeset
    50
"
472a4841a8b6 License this package under 'GNU Lesser General Public License'
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 78
diff changeset
    51
! !
472a4841a8b6 License this package under 'GNU Lesser General Public License'
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 78
diff changeset
    52
41
fb48207b6104 Fixes in thread's stack mangement. Dispatch events to applications using their UI event loop.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    53
!GDBEventSubscription class methodsFor:'private'!
fb48207b6104 Fixes in thread's stack mangement. Dispatch events to applications using their UI event loop.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    54
fb48207b6104 Fixes in thread's stack mangement. Dispatch events to applications using their UI event loop.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    55
blockFor: anObject withSelector: aSelector
fb48207b6104 Fixes in thread's stack mangement. Dispatch events to applications using their UI event loop.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    56
fb48207b6104 Fixes in thread's stack mangement. Dispatch events to applications using their UI event loop.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    57
    | args |
fb48207b6104 Fixes in thread's stack mangement. Dispatch events to applications using their UI event loop.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    58
    args := aSelector numArgs.      
fb48207b6104 Fixes in thread's stack mangement. Dispatch events to applications using their UI event loop.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    59
fb48207b6104 Fixes in thread's stack mangement. Dispatch events to applications using their UI event loop.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    60
    anObject isView ifTrue:[ 
fb48207b6104 Fixes in thread's stack mangement. Dispatch events to applications using their UI event loop.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    61
        args = 0 ifTrue: [ ^[ anObject sensor pushUserEvent: aSelector for: anObject ] ].
fb48207b6104 Fixes in thread's stack mangement. Dispatch events to applications using their UI event loop.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    62
        args = 1 ifTrue: [ ^[ :anAnnouncement | anObject sensor pushUserEvent: aSelector for: anObject withArgument: anAnnouncement ] ].
fb48207b6104 Fixes in thread's stack mangement. Dispatch events to applications using their UI event loop.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    63
        args = 2 ifTrue: [ ^[ :anAnnouncement :anAnnouncer | anObject sensor pushUserEvent: aSelector for: anObject withArguments: (Array with: anAnnouncement with: anAnnouncer) ] ].
fb48207b6104 Fixes in thread's stack mangement. Dispatch events to applications using their UI event loop.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    64
        self error: 'Couldn''t create block'.        
fb48207b6104 Fixes in thread's stack mangement. Dispatch events to applications using their UI event loop.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    65
    ].
145
1256a03213cf Fix `GDBEventSubscription` w.r.t. uninitialized / partially initialized applications
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 91
diff changeset
    66
1256a03213cf Fix `GDBEventSubscription` w.r.t. uninitialized / partially initialized applications
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 91
diff changeset
    67
    "/ If the observer (receiver of events) is an application,
1256a03213cf Fix `GDBEventSubscription` w.r.t. uninitialized / partially initialized applications
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 91
diff changeset
    68
    "/ then push the event processing to application's event
1256a03213cf Fix `GDBEventSubscription` w.r.t. uninitialized / partially initialized applications
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 91
diff changeset
    69
    "/ queue. This avoids blocking of event dispatcher and ensures
1256a03213cf Fix `GDBEventSubscription` w.r.t. uninitialized / partially initialized applications
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 91
diff changeset
    70
    "/ that UI is synchronized.
1256a03213cf Fix `GDBEventSubscription` w.r.t. uninitialized / partially initialized applications
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 91
diff changeset
    71
    "/
1256a03213cf Fix `GDBEventSubscription` w.r.t. uninitialized / partially initialized applications
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 91
diff changeset
    72
    "/ However, we must be carefull since application windows may 
1256a03213cf Fix `GDBEventSubscription` w.r.t. uninitialized / partially initialized applications
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 91
diff changeset
    73
    "/ not yet be opened or fully initialized so we have to check
1256a03213cf Fix `GDBEventSubscription` w.r.t. uninitialized / partially initialized applications
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 91
diff changeset
    74
    "/ for existence of sensor. If application/window is not fully 
1256a03213cf Fix `GDBEventSubscription` w.r.t. uninitialized / partially initialized applications
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 91
diff changeset
    75
    "/ initialized, process the event as usual.
1256a03213cf Fix `GDBEventSubscription` w.r.t. uninitialized / partially initialized applications
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 91
diff changeset
    76
    (anObject isKindOf: ApplicationModel) ifTrue:[
1256a03213cf Fix `GDBEventSubscription` w.r.t. uninitialized / partially initialized applications
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 91
diff changeset
    77
        args = 0 ifTrue: [  ^[  | window |
1256a03213cf Fix `GDBEventSubscription` w.r.t. uninitialized / partially initialized applications
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 91
diff changeset
    78
1256a03213cf Fix `GDBEventSubscription` w.r.t. uninitialized / partially initialized applications
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 91
diff changeset
    79
                                window := anObject window.
1256a03213cf Fix `GDBEventSubscription` w.r.t. uninitialized / partially initialized applications
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 91
diff changeset
    80
                                window notNil 
1256a03213cf Fix `GDBEventSubscription` w.r.t. uninitialized / partially initialized applications
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 91
diff changeset
    81
                                    ifTrue:[ window sensor pushUserEvent: aSelector for: anObject ]
1256a03213cf Fix `GDBEventSubscription` w.r.t. uninitialized / partially initialized applications
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 91
diff changeset
    82
                                    ifFalse:[ anObject perform: aSelector ]
1256a03213cf Fix `GDBEventSubscription` w.r.t. uninitialized / partially initialized applications
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 91
diff changeset
    83
                             ]
1256a03213cf Fix `GDBEventSubscription` w.r.t. uninitialized / partially initialized applications
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 91
diff changeset
    84
        ].
1256a03213cf Fix `GDBEventSubscription` w.r.t. uninitialized / partially initialized applications
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 91
diff changeset
    85
        args = 1 ifTrue: [  ^[ :anAnnouncement | | window |
1256a03213cf Fix `GDBEventSubscription` w.r.t. uninitialized / partially initialized applications
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 91
diff changeset
    86
1256a03213cf Fix `GDBEventSubscription` w.r.t. uninitialized / partially initialized applications
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 91
diff changeset
    87
                                window := anObject window.
1256a03213cf Fix `GDBEventSubscription` w.r.t. uninitialized / partially initialized applications
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 91
diff changeset
    88
                                window notNil 
1256a03213cf Fix `GDBEventSubscription` w.r.t. uninitialized / partially initialized applications
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 91
diff changeset
    89
                                    ifTrue:[ window sensor pushUserEvent: aSelector for: anObject withArgument: anAnnouncement ]
1256a03213cf Fix `GDBEventSubscription` w.r.t. uninitialized / partially initialized applications
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 91
diff changeset
    90
                                    ifFalse:[ anObject perform: aSelector with: anAnnouncement ]
1256a03213cf Fix `GDBEventSubscription` w.r.t. uninitialized / partially initialized applications
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 91
diff changeset
    91
                             ]
1256a03213cf Fix `GDBEventSubscription` w.r.t. uninitialized / partially initialized applications
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 91
diff changeset
    92
        ].
1256a03213cf Fix `GDBEventSubscription` w.r.t. uninitialized / partially initialized applications
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 91
diff changeset
    93
        args = 1 ifTrue: [  ^[ :anAnnouncement :anAnnouncer | | window |
1256a03213cf Fix `GDBEventSubscription` w.r.t. uninitialized / partially initialized applications
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 91
diff changeset
    94
        
1256a03213cf Fix `GDBEventSubscription` w.r.t. uninitialized / partially initialized applications
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 91
diff changeset
    95
                                window := anObject window.
1256a03213cf Fix `GDBEventSubscription` w.r.t. uninitialized / partially initialized applications
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 91
diff changeset
    96
                                window notNil 
1256a03213cf Fix `GDBEventSubscription` w.r.t. uninitialized / partially initialized applications
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 91
diff changeset
    97
                                    ifTrue:[ window sensor pushUserEvent: aSelector for: anObject withArguments: (Array with: anAnnouncement with: anAnnouncer) ]
1256a03213cf Fix `GDBEventSubscription` w.r.t. uninitialized / partially initialized applications
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 91
diff changeset
    98
                                    ifFalse:[ anObject perform: aSelector with: anAnnouncement with: anAnnouncer ]
1256a03213cf Fix `GDBEventSubscription` w.r.t. uninitialized / partially initialized applications
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 91
diff changeset
    99
                             ].
1256a03213cf Fix `GDBEventSubscription` w.r.t. uninitialized / partially initialized applications
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 91
diff changeset
   100
        ].
41
fb48207b6104 Fixes in thread's stack mangement. Dispatch events to applications using their UI event loop.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   101
        self error: 'Couldn''t create block'.        
fb48207b6104 Fixes in thread's stack mangement. Dispatch events to applications using their UI event loop.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   102
    ].
fb48207b6104 Fixes in thread's stack mangement. Dispatch events to applications using their UI event loop.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   103
    ^ super blockFor: anObject withSelector: aSelector
fb48207b6104 Fixes in thread's stack mangement. Dispatch events to applications using their UI event loop.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   104
fb48207b6104 Fixes in thread's stack mangement. Dispatch events to applications using their UI event loop.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   105
    "Created: / 18-09-2014 / 00:10:31 / Jan Vrany <jan.vrany@fit.cvut.cz>"
145
1256a03213cf Fix `GDBEventSubscription` w.r.t. uninitialized / partially initialized applications
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 91
diff changeset
   106
    "Modified: / 01-10-2018 / 17:30:56 / jv"
41
fb48207b6104 Fixes in thread's stack mangement. Dispatch events to applications using their UI event loop.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   107
! !
fb48207b6104 Fixes in thread's stack mangement. Dispatch events to applications using their UI event loop.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   108
145
1256a03213cf Fix `GDBEventSubscription` w.r.t. uninitialized / partially initialized applications
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 91
diff changeset
   109
!GDBEventSubscription class methodsFor:'documentation'!
1256a03213cf Fix `GDBEventSubscription` w.r.t. uninitialized / partially initialized applications
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 91
diff changeset
   110
1256a03213cf Fix `GDBEventSubscription` w.r.t. uninitialized / partially initialized applications
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 91
diff changeset
   111
version_HG
1256a03213cf Fix `GDBEventSubscription` w.r.t. uninitialized / partially initialized applications
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 91
diff changeset
   112
1256a03213cf Fix `GDBEventSubscription` w.r.t. uninitialized / partially initialized applications
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 91
diff changeset
   113
    ^ '$Changeset: <not expanded> $'
1256a03213cf Fix `GDBEventSubscription` w.r.t. uninitialized / partially initialized applications
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 91
diff changeset
   114
! !
1256a03213cf Fix `GDBEventSubscription` w.r.t. uninitialized / partially initialized applications
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 91
diff changeset
   115