| 123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377 | smalltalk.addPackage('Kernel-Announcements');smalltalk.addClass('AnnouncementSubscription', smalltalk.Object, ['block', 'announcementClass'], 'Kernel-Announcements');smalltalk.addMethod("_announcementClass",smalltalk.method({selector: "announcementClass",fn: function (){var self=this;return smalltalk.withContext(function($ctx1) { 
var $1;$1=self["@announcementClass"];return $1;}, function($ctx1) {$ctx1.fill(self,"announcementClass",{},smalltalk.AnnouncementSubscription)})},messageSends: []}),smalltalk.AnnouncementSubscription);smalltalk.addMethod("_announcementClass_",smalltalk.method({selector: "announcementClass:",fn: function (aClass){var self=this;return smalltalk.withContext(function($ctx1) { 
self["@announcementClass"]=aClass;return self}, function($ctx1) {$ctx1.fill(self,"announcementClass:",{aClass:aClass},smalltalk.AnnouncementSubscription)})},messageSends: []}),smalltalk.AnnouncementSubscription);smalltalk.addMethod("_block",smalltalk.method({selector: "block",fn: function (){var self=this;return smalltalk.withContext(function($ctx1) { 
var $1;$1=self["@block"];return $1;}, function($ctx1) {$ctx1.fill(self,"block",{},smalltalk.AnnouncementSubscription)})},messageSends: []}),smalltalk.AnnouncementSubscription);smalltalk.addMethod("_block_",smalltalk.method({selector: "block:",fn: function (aBlock){var self=this;return smalltalk.withContext(function($ctx1) { 
self["@block"]=aBlock;return self}, function($ctx1) {$ctx1.fill(self,"block:",{aBlock:aBlock},smalltalk.AnnouncementSubscription)})},messageSends: []}),smalltalk.AnnouncementSubscription);smalltalk.addMethod("_deliver_",smalltalk.method({selector: "deliver:",fn: function (anAnnouncement){var self=this;return smalltalk.withContext(function($ctx1) { 
var $1;$1=_st(self)._handlesAnnouncement_(anAnnouncement);if(smalltalk.assert($1)){_st(_st(self)._block())._value_(anAnnouncement);};return self}, function($ctx1) {$ctx1.fill(self,"deliver:",{anAnnouncement:anAnnouncement},smalltalk.AnnouncementSubscription)})},messageSends: ["ifTrue:", "value:", "block", "handlesAnnouncement:"]}),smalltalk.AnnouncementSubscription);smalltalk.addMethod("_handlesAnnouncement_",smalltalk.method({selector: "handlesAnnouncement:",fn: function (anAnnouncement){var self=this;return smalltalk.withContext(function($ctx1) { 
var $1;$1=_st(anAnnouncement)._isKindOf_(_st(self)._announcementClass());return $1;}, function($ctx1) {$ctx1.fill(self,"handlesAnnouncement:",{anAnnouncement:anAnnouncement},smalltalk.AnnouncementSubscription)})},messageSends: ["isKindOf:", "announcementClass"]}),smalltalk.AnnouncementSubscription);smalltalk.addClass('Announcer', smalltalk.Object, ['registry', 'subscriptions'], 'Kernel-Announcements');smalltalk.addMethod("_announce_",smalltalk.method({selector: "announce:",fn: function (anAnnouncement){var self=this;return smalltalk.withContext(function($ctx1) { 
_st(self["@subscriptions"])._do_((function(each){return smalltalk.withContext(function($ctx2) {
return _st(each)._deliver_(anAnnouncement);}, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1)})}));return self}, function($ctx1) {$ctx1.fill(self,"announce:",{anAnnouncement:anAnnouncement},smalltalk.Announcer)})},messageSends: ["do:", "deliver:"]}),smalltalk.Announcer);smalltalk.addMethod("_initialize",smalltalk.method({selector: "initialize",fn: function (){var self=this;return smalltalk.withContext(function($ctx1) { 
smalltalk.Object.fn.prototype._initialize.apply(_st(self), []);self["@subscriptions"]=_st((smalltalk.Array || Array))._new();return self}, function($ctx1) {$ctx1.fill(self,"initialize",{},smalltalk.Announcer)})},messageSends: ["initialize", "new"]}),smalltalk.Announcer);smalltalk.addMethod("_on_do_",smalltalk.method({selector: "on:do:",fn: function (aClass,aBlock){var self=this;return smalltalk.withContext(function($ctx1) { 
var $1,$2;$1=_st((smalltalk.AnnouncementSubscription || AnnouncementSubscription))._new();_st($1)._block_(aBlock);_st($1)._announcementClass_(aClass);$2=_st($1)._yourself();_st(self["@subscriptions"])._add_($2);return self}, function($ctx1) {$ctx1.fill(self,"on:do:",{aClass:aClass,aBlock:aBlock},smalltalk.Announcer)})},messageSends: ["add:", "block:", "new", "announcementClass:", "yourself"]}),smalltalk.Announcer);smalltalk.addClass('SystemAnnouncer', smalltalk.Announcer, [], 'Kernel-Announcements');smalltalk.SystemAnnouncer.klass.iVarNames = ['current'];smalltalk.addMethod("_current",smalltalk.method({selector: "current",fn: function (){var self=this;return smalltalk.withContext(function($ctx1) { 
var $2,$1;$2=self["@current"];if(($receiver = $2) == nil || $receiver == undefined){self["@current"]=smalltalk.Announcer.klass.fn.prototype._new.apply(_st(self), []);$1=self["@current"];} else {$1=$2;};return $1;}, function($ctx1) {$ctx1.fill(self,"current",{},smalltalk.SystemAnnouncer.klass)})},messageSends: ["ifNil:", "new"]}),smalltalk.SystemAnnouncer.klass);smalltalk.addMethod("_new",smalltalk.method({selector: "new",fn: function (){var self=this;return smalltalk.withContext(function($ctx1) { 
_st(self)._shouldNotImplement();return self}, function($ctx1) {$ctx1.fill(self,"new",{},smalltalk.SystemAnnouncer.klass)})},messageSends: ["shouldNotImplement"]}),smalltalk.SystemAnnouncer.klass);smalltalk.addClass('SystemAnnouncement', smalltalk.Object, ['theClass'], 'Kernel-Announcements');smalltalk.addMethod("_theClass",smalltalk.method({selector: "theClass",fn: function (){var self=this;return smalltalk.withContext(function($ctx1) { 
var $1;$1=self["@theClass"];return $1;}, function($ctx1) {$ctx1.fill(self,"theClass",{},smalltalk.SystemAnnouncement)})},messageSends: []}),smalltalk.SystemAnnouncement);smalltalk.addMethod("_theClass_",smalltalk.method({selector: "theClass:",fn: function (aClass){var self=this;return smalltalk.withContext(function($ctx1) { 
self["@theClass"]=aClass;return self}, function($ctx1) {$ctx1.fill(self,"theClass:",{aClass:aClass},smalltalk.SystemAnnouncement)})},messageSends: []}),smalltalk.SystemAnnouncement);smalltalk.addClass('ClassAnnouncement', smalltalk.SystemAnnouncement, ['theClass'], 'Kernel-Announcements');smalltalk.addMethod("_theClass",smalltalk.method({selector: "theClass",fn: function (){var self=this;return smalltalk.withContext(function($ctx1) { 
var $1;$1=self["@theClass"];return $1;}, function($ctx1) {$ctx1.fill(self,"theClass",{},smalltalk.ClassAnnouncement)})},messageSends: []}),smalltalk.ClassAnnouncement);smalltalk.addMethod("_theClass_",smalltalk.method({selector: "theClass:",fn: function (aClass){var self=this;return smalltalk.withContext(function($ctx1) { 
self["@theClass"]=aClass;return self}, function($ctx1) {$ctx1.fill(self,"theClass:",{aClass:aClass},smalltalk.ClassAnnouncement)})},messageSends: []}),smalltalk.ClassAnnouncement);smalltalk.addClass('ClassAdded', smalltalk.ClassAnnouncement, [], 'Kernel-Announcements');smalltalk.addClass('ClassCommentChanged', smalltalk.ClassAnnouncement, [], 'Kernel-Announcements');smalltalk.addClass('ClassDefinitionChanged', smalltalk.ClassAnnouncement, [], 'Kernel-Announcements');smalltalk.addClass('ClassRemoved', smalltalk.ClassAnnouncement, [], 'Kernel-Announcements');smalltalk.addClass('ClassRenamed', smalltalk.ClassAnnouncement, [], 'Kernel-Announcements');smalltalk.addClass('MethodAnnouncement', smalltalk.SystemAnnouncement, ['method'], 'Kernel-Announcements');smalltalk.addMethod("_method",smalltalk.method({selector: "method",fn: function (){var self=this;return smalltalk.withContext(function($ctx1) { 
var $1;$1=self["@method"];return $1;}, function($ctx1) {$ctx1.fill(self,"method",{},smalltalk.MethodAnnouncement)})},messageSends: []}),smalltalk.MethodAnnouncement);smalltalk.addMethod("_method_",smalltalk.method({selector: "method:",fn: function (aCompiledMethod){var self=this;return smalltalk.withContext(function($ctx1) { 
self["@method"]=aCompiledMethod;return self}, function($ctx1) {$ctx1.fill(self,"method:",{aCompiledMethod:aCompiledMethod},smalltalk.MethodAnnouncement)})},messageSends: []}),smalltalk.MethodAnnouncement);smalltalk.addClass('MethodAdded', smalltalk.MethodAnnouncement, [], 'Kernel-Announcements');smalltalk.addClass('MethodModified', smalltalk.MethodAnnouncement, ['oldMethod'], 'Kernel-Announcements');smalltalk.addMethod("_oldMethod",smalltalk.method({selector: "oldMethod",fn: function (){var self=this;return smalltalk.withContext(function($ctx1) { 
var $1;$1=self["@oldMethod"];return $1;}, function($ctx1) {$ctx1.fill(self,"oldMethod",{},smalltalk.MethodModified)})},messageSends: []}),smalltalk.MethodModified);smalltalk.addMethod("_oldMethod_",smalltalk.method({selector: "oldMethod:",fn: function (aMethod){var self=this;return smalltalk.withContext(function($ctx1) { 
self["@oldMethod"]=aMethod;return self}, function($ctx1) {$ctx1.fill(self,"oldMethod:",{aMethod:aMethod},smalltalk.MethodModified)})},messageSends: []}),smalltalk.MethodModified);smalltalk.addClass('MethodRemoved', smalltalk.MethodAnnouncement, [], 'Kernel-Announcements');smalltalk.addClass('PackageAnnouncement', smalltalk.SystemAnnouncement, ['package'], 'Kernel-Announcements');smalltalk.addMethod("_package",smalltalk.method({selector: "package",fn: function (){var self=this;return smalltalk.withContext(function($ctx1) { 
var $1;$1=self["@package"];return $1;}, function($ctx1) {$ctx1.fill(self,"package",{},smalltalk.PackageAnnouncement)})},messageSends: []}),smalltalk.PackageAnnouncement);smalltalk.addMethod("_package_",smalltalk.method({selector: "package:",fn: function (aPackage){var self=this;return smalltalk.withContext(function($ctx1) { 
self["@package"]=aPackage;return self}, function($ctx1) {$ctx1.fill(self,"package:",{aPackage:aPackage},smalltalk.PackageAnnouncement)})},messageSends: []}),smalltalk.PackageAnnouncement);smalltalk.addClass('PackageAdded', smalltalk.PackageAnnouncement, [], 'Kernel-Announcements');smalltalk.addClass('PackageRemoved', smalltalk.PackageAnnouncement, [], 'Kernel-Announcements');smalltalk.addClass('ProtocolAnnouncement', smalltalk.SystemAnnouncement, ['theClass', 'protocol'], 'Kernel-Announcements');smalltalk.addMethod("_protocol",smalltalk.method({selector: "protocol",fn: function (){var self=this;return smalltalk.withContext(function($ctx1) { 
var $1;$1=self["@protocol"];return $1;}, function($ctx1) {$ctx1.fill(self,"protocol",{},smalltalk.ProtocolAnnouncement)})},messageSends: []}),smalltalk.ProtocolAnnouncement);smalltalk.addMethod("_protocol_",smalltalk.method({selector: "protocol:",fn: function (aString){var self=this;return smalltalk.withContext(function($ctx1) { 
self["@protocol"]=aString;return self}, function($ctx1) {$ctx1.fill(self,"protocol:",{aString:aString},smalltalk.ProtocolAnnouncement)})},messageSends: []}),smalltalk.ProtocolAnnouncement);smalltalk.addMethod("_theClass",smalltalk.method({selector: "theClass",fn: function (){var self=this;return smalltalk.withContext(function($ctx1) { 
var $1;$1=self["@theClass"];return $1;}, function($ctx1) {$ctx1.fill(self,"theClass",{},smalltalk.ProtocolAnnouncement)})},messageSends: []}),smalltalk.ProtocolAnnouncement);smalltalk.addMethod("_theClass_",smalltalk.method({selector: "theClass:",fn: function (aClass){var self=this;return smalltalk.withContext(function($ctx1) { 
self["@theClass"]=aClass;return self}, function($ctx1) {$ctx1.fill(self,"theClass:",{aClass:aClass},smalltalk.ProtocolAnnouncement)})},messageSends: []}),smalltalk.ProtocolAnnouncement);smalltalk.addClass('ProtocolAdded', smalltalk.ProtocolAnnouncement, [], 'Kernel-Announcements');smalltalk.addClass('ProtocolRemoved', smalltalk.ProtocolAnnouncement, [], 'Kernel-Announcements');
 |