Mercurial Mercurial > hg > jv-libgdbs / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | zip | gz | bz2 | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Fixed SubscriptionCollection >> value:
authorJan Vrany <jan.vrany@fit.cvut.cz>
Sat, 03 Feb 2018 21:32:37 +0000
changeset 100 aab8dd376f29
parent 99 56b66436a713
child 101 d8fee2af20b2
Fixed SubscriptionCollection >> value: to hangle (garbage) collected handlers. This should really be fixed in `stx:goodies/announcements` but that package is not (yet) forked.
GDBThreadInfo.st file | annotate | diff | comparison | revisions
GDBVariableObject.st file | annotate | diff | comparison | revisions
Make.proto file | annotate | diff | comparison | revisions
abbrev.stc file | annotate | diff | comparison | revisions
bc.mak file | annotate | diff | comparison | revisions
extensions.st file | annotate | diff | comparison | revisions
jv_libgdbs.st file | annotate | diff | comparison | revisions 
--- a/GDBThreadInfo.st	Fri Feb 02 09:46:51 2018 +0000
+++ b/GDBThreadInfo.st	Sat Feb 03 21:32:37 2018 +0000
@@ -97,3 +97,10 @@
     "Created: / 08-03-2015 / 10:27:09 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
+!GDBThreadInfo class methodsFor:'documentation'!
+
+version_HG
+
+    ^ '$Changeset: <not expanded> $'
+! !
+
--- a/GDBVariableObject.st	Fri Feb 02 09:46:51 2018 +0000
+++ b/GDBVariableObject.st	Sat Feb 03 21:32:37 2018 +0000
@@ -78,6 +78,7 @@
     "Modified: / 27-02-2015 / 17:10:31 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
+
 !GDBVariableObject methodsFor:'printing & storing'!
 
 printOn:aStream
--- a/Make.proto	Fri Feb 02 09:46:51 2018 +0000
+++ b/Make.proto	Sat Feb 03 21:32:37 2018 +0000
@@ -317,7 +317,7 @@
 $(OUTDIR)GDBThreadGroupAddedEvent.$(O) GDBThreadGroupAddedEvent.$(C) GDBThreadGroupAddedEvent.$(H): GDBThreadGroupAddedEvent.st $(INCLUDE_TOP)/jv/libgdbs/GDBAsyncEvent.$(H) $(INCLUDE_TOP)/jv/libgdbs/GDBEvent.$(H) $(INCLUDE_TOP)/jv/libgdbs/GDBNotificationEvent.$(H) $(INCLUDE_TOP)/jv/libgdbs/GDBThreadGroupEvent.$(H) $(INCLUDE_TOP)/stx/goodies/announcements/Announcement.$(H) $(INCLUDE_TOP)/stx/libbasic/Object.$(H) $(STCHDR)
 $(OUTDIR)GDBThreadGroupExitedEvent.$(O) GDBThreadGroupExitedEvent.$(C) GDBThreadGroupExitedEvent.$(H): GDBThreadGroupExitedEvent.st $(INCLUDE_TOP)/jv/libgdbs/GDBAsyncEvent.$(H) $(INCLUDE_TOP)/jv/libgdbs/GDBEvent.$(H) $(INCLUDE_TOP)/jv/libgdbs/GDBNotificationEvent.$(H) $(INCLUDE_TOP)/jv/libgdbs/GDBThreadGroupEvent.$(H) $(INCLUDE_TOP)/stx/goodies/announcements/Announcement.$(H) $(INCLUDE_TOP)/stx/libbasic/Object.$(H) $(STCHDR)
 $(OUTDIR)GDBThreadGroupStartedEvent.$(O) GDBThreadGroupStartedEvent.$(C) GDBThreadGroupStartedEvent.$(H): GDBThreadGroupStartedEvent.st $(INCLUDE_TOP)/jv/libgdbs/GDBAsyncEvent.$(H) $(INCLUDE_TOP)/jv/libgdbs/GDBEvent.$(H) $(INCLUDE_TOP)/jv/libgdbs/GDBNotificationEvent.$(H) $(INCLUDE_TOP)/jv/libgdbs/GDBThreadGroupEvent.$(H) $(INCLUDE_TOP)/stx/goodies/announcements/Announcement.$(H) $(INCLUDE_TOP)/stx/libbasic/Object.$(H) $(STCHDR)
-$(OUTDIR)extensions.$(O): extensions.st $(INCLUDE_TOP)/stx/goodies/magritte/Magritte__MABooleanDescription.$(H) $(INCLUDE_TOP)/stx/goodies/magritte/Magritte__MADescription.$(H) $(INCLUDE_TOP)/stx/goodies/magritte/Magritte__MAElementDescription.$(H) $(INCLUDE_TOP)/stx/goodies/magritte/Magritte__MAMagnitudeDescription.$(H) $(INCLUDE_TOP)/stx/goodies/magritte/Magritte__MANumberDescription.$(H) $(INCLUDE_TOP)/stx/goodies/magritte/Magritte__MAObject.$(H) $(INCLUDE_TOP)/stx/goodies/magritte/Magritte__MAOptionDescription.$(H) $(INCLUDE_TOP)/stx/goodies/magritte/Magritte__MAReferenceDescription.$(H) $(INCLUDE_TOP)/stx/goodies/magritte/Magritte__MARelationDescription.$(H) $(INCLUDE_TOP)/stx/goodies/magritte/Magritte__MASingleOptionDescription.$(H) $(INCLUDE_TOP)/stx/goodies/magritte/Magritte__MAStringDescription.$(H) $(INCLUDE_TOP)/stx/goodies/magritte/Magritte__MAToManyRelationDescription.$(H) $(INCLUDE_TOP)/stx/libbasic/Object.$(H) $(STCHDR)
+$(OUTDIR)extensions.$(O): extensions.st $(INCLUDE_TOP)/stx/goodies/announcements/SubscriptionCollection.$(H) $(INCLUDE_TOP)/stx/goodies/magritte/Magritte__MABooleanDescription.$(H) $(INCLUDE_TOP)/stx/goodies/magritte/Magritte__MADescription.$(H) $(INCLUDE_TOP)/stx/goodies/magritte/Magritte__MAElementDescription.$(H) $(INCLUDE_TOP)/stx/goodies/magritte/Magritte__MAMagnitudeDescription.$(H) $(INCLUDE_TOP)/stx/goodies/magritte/Magritte__MANumberDescription.$(H) $(INCLUDE_TOP)/stx/goodies/magritte/Magritte__MAObject.$(H) $(INCLUDE_TOP)/stx/goodies/magritte/Magritte__MAOptionDescription.$(H) $(INCLUDE_TOP)/stx/goodies/magritte/Magritte__MAReferenceDescription.$(H) $(INCLUDE_TOP)/stx/goodies/magritte/Magritte__MARelationDescription.$(H) $(INCLUDE_TOP)/stx/goodies/magritte/Magritte__MASingleOptionDescription.$(H) $(INCLUDE_TOP)/stx/goodies/magritte/Magritte__MAStringDescription.$(H) $(INCLUDE_TOP)/stx/goodies/magritte/Magritte__MAToManyRelationDescription.$(H) $(INCLUDE_TOP)/stx/libbasic/Collection.$(H) $(INCLUDE_TOP)/stx/libbasic/Object.$(H) $(INCLUDE_TOP)/stx/libbasic/OrderedCollection.$(H) $(INCLUDE_TOP)/stx/libbasic/SequenceableCollection.$(H) $(STCHDR)
 
 # ENDMAKEDEPEND --- do not remove this line
 
--- a/abbrev.stc	Fri Feb 02 09:46:51 2018 +0000
+++ b/abbrev.stc	Sat Feb 03 21:32:37 2018 +0000
@@ -53,6 +53,7 @@
 GDBEventSetEvent GDBEventSetEvent jv:libgdbs 'GDB-Core-Events' 0
 GDBExecutionEvent GDBExecutionEvent jv:libgdbs 'GDB-Core-Events' 0
 GDBExitEvent GDBExitEvent jv:libgdbs 'GDB-Core-Events' 0
+GDBFrame GDBFrame jv:libgdbs 'GDB-Core' 0
 GDBLogOutputEvent GDBLogOutputEvent jv:libgdbs 'GDB-Core-Events' 0
 GDBMI_ada_task_info GDBMI_ada_task_info jv:libgdbs 'GDB-Core-Commands-MI' 0
 GDBMI_add_inferior GDBMI_add_inferior jv:libgdbs 'GDB-Core-Commands-MI' 0
@@ -175,7 +176,6 @@
 GDBCmdParamChangedEvent GDBCmdParamChangedEvent jv:libgdbs 'GDB-Core-Events' 0
 GDBEventSetProcessingFinished GDBEventSetProcessingFinished jv:libgdbs 'GDB-Core-Events' 0
 GDBEventSetProcessingStarted GDBEventSetProcessingStarted jv:libgdbs 'GDB-Core-Events' 0
-GDBFrame GDBFrame jv:libgdbs 'GDB-Core' 0
 GDBLibraryLoadedEvent GDBLibraryLoadedEvent jv:libgdbs 'GDB-Core-Events' 0
 GDBLibraryUnloadedEvent GDBLibraryUnloadedEvent jv:libgdbs 'GDB-Core-Events' 0
 GDBRunningEvent GDBRunningEvent jv:libgdbs 'GDB-Core-Events' 0
--- a/bc.mak	Fri Feb 02 09:46:51 2018 +0000
+++ b/bc.mak	Sat Feb 03 21:32:37 2018 +0000
@@ -264,7 +264,7 @@
 $(OUTDIR)GDBThreadGroupAddedEvent.$(O) GDBThreadGroupAddedEvent.$(C) GDBThreadGroupAddedEvent.$(H): GDBThreadGroupAddedEvent.st $(INCLUDE_TOP)\jv\libgdbs\GDBAsyncEvent.$(H) $(INCLUDE_TOP)\jv\libgdbs\GDBEvent.$(H) $(INCLUDE_TOP)\jv\libgdbs\GDBNotificationEvent.$(H) $(INCLUDE_TOP)\jv\libgdbs\GDBThreadGroupEvent.$(H) $(INCLUDE_TOP)\stx\goodies\announcements\Announcement.$(H) $(INCLUDE_TOP)\stx\libbasic\Object.$(H) $(STCHDR)
 $(OUTDIR)GDBThreadGroupExitedEvent.$(O) GDBThreadGroupExitedEvent.$(C) GDBThreadGroupExitedEvent.$(H): GDBThreadGroupExitedEvent.st $(INCLUDE_TOP)\jv\libgdbs\GDBAsyncEvent.$(H) $(INCLUDE_TOP)\jv\libgdbs\GDBEvent.$(H) $(INCLUDE_TOP)\jv\libgdbs\GDBNotificationEvent.$(H) $(INCLUDE_TOP)\jv\libgdbs\GDBThreadGroupEvent.$(H) $(INCLUDE_TOP)\stx\goodies\announcements\Announcement.$(H) $(INCLUDE_TOP)\stx\libbasic\Object.$(H) $(STCHDR)
 $(OUTDIR)GDBThreadGroupStartedEvent.$(O) GDBThreadGroupStartedEvent.$(C) GDBThreadGroupStartedEvent.$(H): GDBThreadGroupStartedEvent.st $(INCLUDE_TOP)\jv\libgdbs\GDBAsyncEvent.$(H) $(INCLUDE_TOP)\jv\libgdbs\GDBEvent.$(H) $(INCLUDE_TOP)\jv\libgdbs\GDBNotificationEvent.$(H) $(INCLUDE_TOP)\jv\libgdbs\GDBThreadGroupEvent.$(H) $(INCLUDE_TOP)\stx\goodies\announcements\Announcement.$(H) $(INCLUDE_TOP)\stx\libbasic\Object.$(H) $(STCHDR)
-$(OUTDIR)extensions.$(O): extensions.st $(INCLUDE_TOP)\stx\goodies\magritte\Magritte__MABooleanDescription.$(H) $(INCLUDE_TOP)\stx\goodies\magritte\Magritte__MADescription.$(H) $(INCLUDE_TOP)\stx\goodies\magritte\Magritte__MAElementDescription.$(H) $(INCLUDE_TOP)\stx\goodies\magritte\Magritte__MAMagnitudeDescription.$(H) $(INCLUDE_TOP)\stx\goodies\magritte\Magritte__MANumberDescription.$(H) $(INCLUDE_TOP)\stx\goodies\magritte\Magritte__MAObject.$(H) $(INCLUDE_TOP)\stx\goodies\magritte\Magritte__MAOptionDescription.$(H) $(INCLUDE_TOP)\stx\goodies\magritte\Magritte__MAReferenceDescription.$(H) $(INCLUDE_TOP)\stx\goodies\magritte\Magritte__MARelationDescription.$(H) $(INCLUDE_TOP)\stx\goodies\magritte\Magritte__MASingleOptionDescription.$(H) $(INCLUDE_TOP)\stx\goodies\magritte\Magritte__MAStringDescription.$(H) $(INCLUDE_TOP)\stx\goodies\magritte\Magritte__MAToManyRelationDescription.$(H) $(INCLUDE_TOP)\stx\libbasic\Object.$(H) $(STCHDR)
+$(OUTDIR)extensions.$(O): extensions.st $(INCLUDE_TOP)\stx\goodies\announcements\SubscriptionCollection.$(H) $(INCLUDE_TOP)\stx\goodies\magritte\Magritte__MABooleanDescription.$(H) $(INCLUDE_TOP)\stx\goodies\magritte\Magritte__MADescription.$(H) $(INCLUDE_TOP)\stx\goodies\magritte\Magritte__MAElementDescription.$(H) $(INCLUDE_TOP)\stx\goodies\magritte\Magritte__MAMagnitudeDescription.$(H) $(INCLUDE_TOP)\stx\goodies\magritte\Magritte__MANumberDescription.$(H) $(INCLUDE_TOP)\stx\goodies\magritte\Magritte__MAObject.$(H) $(INCLUDE_TOP)\stx\goodies\magritte\Magritte__MAOptionDescription.$(H) $(INCLUDE_TOP)\stx\goodies\magritte\Magritte__MAReferenceDescription.$(H) $(INCLUDE_TOP)\stx\goodies\magritte\Magritte__MARelationDescription.$(H) $(INCLUDE_TOP)\stx\goodies\magritte\Magritte__MASingleOptionDescription.$(H) $(INCLUDE_TOP)\stx\goodies\magritte\Magritte__MAStringDescription.$(H) $(INCLUDE_TOP)\stx\goodies\magritte\Magritte__MAToManyRelationDescription.$(H) $(INCLUDE_TOP)\stx\libbasic\Collection.$(H) $(INCLUDE_TOP)\stx\libbasic\Object.$(H) $(INCLUDE_TOP)\stx\libbasic\OrderedCollection.$(H) $(INCLUDE_TOP)\stx\libbasic\SequenceableCollection.$(H) $(STCHDR)
 
 # ENDMAKEDEPEND --- do not remove this line
 
--- a/extensions.st	Fri Feb 02 09:46:51 2018 +0000
+++ b/extensions.st	Sat Feb 03 21:32:37 2018 +0000
@@ -80,6 +80,15 @@
     "Created: / 11-11-2017 / 12:11:40 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
+!SubscriptionCollection methodsFor:'private'!
+
+value: anAnnouncement
+
+        self do: [ :each | each notNil ifTrue:[each value: anAnnouncement]]
+
+    "Modified: / 03-02-2018 / 21:26:34 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+! !
+
 !jv_libgdbs class methodsFor:'documentation'!
 
 extensionsVersion_HG
--- a/jv_libgdbs.st	Fri Feb 02 09:46:51 2018 +0000
+++ b/jv_libgdbs.st	Sat Feb 03 21:32:37 2018 +0000
@@ -73,7 +73,7 @@
     ^ #(
         #'stx:goodies/announcements'    "Announcement - superclass of GDBAsyncEvent"
         #'stx:goodies/magritte'    "Magritte::MAAccessor - superclass of GDBMAPropertyAccessor"
-        #'stx:libbasic'    "Collection - superclass of GDBEventSet"
+        #'stx:libbasic'    "Collection - extended"
     )
 !
 
@@ -168,6 +168,7 @@
         GDBEventSetEvent
         GDBExecutionEvent
         GDBExitEvent
+        GDBFrame
         GDBLogOutputEvent
         #'GDBMI_ada_task_info'
         #'GDBMI_add_inferior'
@@ -290,7 +291,6 @@
         GDBCmdParamChangedEvent
         GDBEventSetProcessingFinished
         GDBEventSetProcessingStarted
-        GDBFrame
         GDBLibraryLoadedEvent
         GDBLibraryUnloadedEvent
         GDBRunningEvent
@@ -326,6 +326,7 @@
         #'Magritte::MAToManyRelationDescription' allowOmmitedBrackets
         #'Magritte::MAToManyRelationDescription' allowOmmitedBrackets:
         'Magritte::MAToManyRelationDescription class' defaultAllowOmmitedBrackets
+        SubscriptionCollection value:
     )
 ! !
hg/jv-libgdbs