| 123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107 | smalltalk.addPackage('Kernel-Announcements', {});smalltalk.addClass('Announcer', smalltalk.Object, ['registry', 'subscriptions'], 'Kernel-Announcements');smalltalk.addMethod(unescape('_announce_'),smalltalk.method({selector: unescape('announce%3A'),fn: function (anAnnouncement){var self=this;smalltalk.send(self['@subscriptions'], "_do_", [(function(each){return smalltalk.send(each, "_deliver_", [anAnnouncement]);})]);return self;}}),smalltalk.Announcer);smalltalk.addMethod(unescape('_initialize'),smalltalk.method({selector: unescape('initialize'),fn: function (){var self=this;smalltalk.send(self, "_initialize", [], smalltalk.Object);(self['@subscriptions']=smalltalk.send((smalltalk.OrderedCollection || OrderedCollection), "_new", []));return self;}}),smalltalk.Announcer);smalltalk.addMethod(unescape('_on_do_'),smalltalk.method({selector: unescape('on%3Ado%3A'),fn: function (aClass, aBlock){var self=this;smalltalk.send(self['@subscriptions'], "_add_", [(function($rec){smalltalk.send($rec, "_block_", [aBlock]);smalltalk.send($rec, "_announcementClass_", [aClass]);return smalltalk.send($rec, "_yourself", []);})(smalltalk.send((smalltalk.AnnouncementSubscription || AnnouncementSubscription), "_new", []))]);return self;}}),smalltalk.Announcer);smalltalk.addClass('AnnouncementSubscription', smalltalk.Object, ['block', 'announcementClass'], 'Kernel-Announcements');smalltalk.addMethod(unescape('_announcementClass'),smalltalk.method({selector: unescape('announcementClass'),fn: function (){var self=this;return self['@announcementClass'];return self;}}),smalltalk.AnnouncementSubscription);smalltalk.addMethod(unescape('_announcementClass_'),smalltalk.method({selector: unescape('announcementClass%3A'),fn: function (aClass){var self=this;(self['@announcementClass']=aClass);return self;}}),smalltalk.AnnouncementSubscription);smalltalk.addMethod(unescape('_block'),smalltalk.method({selector: unescape('block'),fn: function (){var self=this;return self['@block'];return self;}}),smalltalk.AnnouncementSubscription);smalltalk.addMethod(unescape('_block_'),smalltalk.method({selector: unescape('block%3A'),fn: function (aBlock){var self=this;(self['@block']=aBlock);return self;}}),smalltalk.AnnouncementSubscription);smalltalk.addMethod(unescape('_deliver_'),smalltalk.method({selector: unescape('deliver%3A'),fn: function (anAnnouncement){var self=this;((($receiver = smalltalk.send(self, "_handlesAnnouncement_", [anAnnouncement])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(smalltalk.send(self, "_block", []), "_value_", [anAnnouncement]);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return smalltalk.send(smalltalk.send(self, "_block", []), "_value_", [anAnnouncement]);})]));return self;}}),smalltalk.AnnouncementSubscription);smalltalk.addMethod(unescape('_handlesAnnouncement_'),smalltalk.method({selector: unescape('handlesAnnouncement%3A'),fn: function (anAnnouncement){var self=this;return smalltalk.send(anAnnouncement, "_isKindOf_", [smalltalk.send(self, "_announcementClass", [])]);return self;}}),smalltalk.AnnouncementSubscription);
 |