| 123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127 | smalltalk.addPackage('Helios-Announcements', {});smalltalk.addClass('HLAnnouncement', smalltalk.Object, [], 'Helios-Announcements');smalltalk.addClass('HLCodeHandled', smalltalk.HLAnnouncement, ['code'], 'Helios-Announcements');smalltalk.addMethod("_code",smalltalk.method({selector: "code",fn: function () {    var self = this;    return self['@code'];}}),smalltalk.HLCodeHandled);smalltalk.addMethod("_code_",smalltalk.method({selector: "code:",fn: function (aModel) {    var self = this;    self['@code'] = aModel;    return self;}}),smalltalk.HLCodeHandled);smalltalk.addMethod("_on_",smalltalk.method({selector: "on:",fn: function (aCodeModel) {    var self = this;    var $2, $3, $1;    $2 = smalltalk.send(self, "_new", []);    smalltalk.send($2, "_code_", [aCodeModel]);    $3 = smalltalk.send($2, "_yourself", []);    $1 = $3;    return $1;}}),smalltalk.HLCodeHandled.klass);smalltalk.addClass('HLDoItExecuted', smalltalk.HLCodeHandled, [], 'Helios-Announcements');smalltalk.addClass('HLDoItRequested', smalltalk.HLCodeHandled, [], 'Helios-Announcements');smalltalk.addClass('HLInspectItRequested', smalltalk.HLCodeHandled, [], 'Helios-Announcements');smalltalk.addClass('HLPrintItRequested', smalltalk.HLCodeHandled, [], 'Helios-Announcements');smalltalk.addClass('HLDiveRequested', smalltalk.HLAnnouncement, [], 'Helios-Announcements');smalltalk.addClass('HLItemSelected', smalltalk.HLAnnouncement, ['item'], 'Helios-Announcements');smalltalk.addMethod("_item",smalltalk.method({selector: "item",fn: function () {    var self = this;    return self['@item'];}}),smalltalk.HLItemSelected);smalltalk.addMethod("_item_",smalltalk.method({selector: "item:",fn: function (anObject) {    var self = this;    self['@item'] = anObject;    return self;}}),smalltalk.HLItemSelected);smalltalk.addMethod("_on_",smalltalk.method({selector: "on:",fn: function (anItem) {    var self = this;    var $2, $3, $1;    $2 = smalltalk.send(self, "_new", []);    smalltalk.send($2, "_item_", [anItem]);    $3 = smalltalk.send($2, "_yourself", []);    $1 = $3;    return $1;}}),smalltalk.HLItemSelected.klass);smalltalk.addClass('HLClassSelected', smalltalk.HLItemSelected, [], 'Helios-Announcements');smalltalk.addClass('HLInstanceVariableSelected', smalltalk.HLItemSelected, [], 'Helios-Announcements');smalltalk.addClass('HLMethodSelected', smalltalk.HLItemSelected, [], 'Helios-Announcements');smalltalk.addClass('HLPackageSelected', smalltalk.HLItemSelected, [], 'Helios-Announcements');smalltalk.addClass('HLProtocolSelected', smalltalk.HLItemSelected, [], 'Helios-Announcements');smalltalk.addClass('HLRefreshRequested', smalltalk.HLAnnouncement, [], 'Helios-Announcements');smalltalk.addClass('HLShowCommentToggled', smalltalk.HLAnnouncement, [], 'Helios-Announcements');smalltalk.addClass('HLShowInstanceToggled', smalltalk.HLAnnouncement, [], 'Helios-Announcements');
 |