Helios-Announcements.deploy.js 3.7 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129
  1. smalltalk.addPackage('Helios-Announcements');
  2. smalltalk.addClass('HLAnnouncement', smalltalk.Object, [], 'Helios-Announcements');
  3. smalltalk.addClass('HLCodeHandled', smalltalk.HLAnnouncement, ['code'], 'Helios-Announcements');
  4. smalltalk.addMethod(
  5. "_code",
  6. smalltalk.method({
  7. selector: "code",
  8. fn: function (){
  9. var self=this;
  10. return smalltalk.withContext(function($ctx1) { var $1;
  11. $1=self["@code"];
  12. return $1;
  13. }, function($ctx1) {$ctx1.fill(self,"code",{}, smalltalk.HLCodeHandled)})},
  14. messageSends: []}),
  15. smalltalk.HLCodeHandled);
  16. smalltalk.addMethod(
  17. "_code_",
  18. smalltalk.method({
  19. selector: "code:",
  20. fn: function (aModel){
  21. var self=this;
  22. return smalltalk.withContext(function($ctx1) { self["@code"]=aModel;
  23. return self}, function($ctx1) {$ctx1.fill(self,"code:",{aModel:aModel}, smalltalk.HLCodeHandled)})},
  24. messageSends: []}),
  25. smalltalk.HLCodeHandled);
  26. smalltalk.addMethod(
  27. "_on_",
  28. smalltalk.method({
  29. selector: "on:",
  30. fn: function (aCodeModel){
  31. var self=this;
  32. return smalltalk.withContext(function($ctx1) { var $2,$3,$1;
  33. $2=_st(self)._new();
  34. _st($2)._code_(aCodeModel);
  35. $3=_st($2)._yourself();
  36. $1=$3;
  37. return $1;
  38. }, function($ctx1) {$ctx1.fill(self,"on:",{aCodeModel:aCodeModel}, smalltalk.HLCodeHandled.klass)})},
  39. messageSends: ["code:", "new", "yourself"]}),
  40. smalltalk.HLCodeHandled.klass);
  41. smalltalk.addClass('HLDoItExecuted', smalltalk.HLCodeHandled, [], 'Helios-Announcements');
  42. smalltalk.addClass('HLDoItRequested', smalltalk.HLCodeHandled, [], 'Helios-Announcements');
  43. smalltalk.addClass('HLInspectItRequested', smalltalk.HLCodeHandled, [], 'Helios-Announcements');
  44. smalltalk.addClass('HLPrintItRequested', smalltalk.HLCodeHandled, [], 'Helios-Announcements');
  45. smalltalk.addClass('HLDiveRequested', smalltalk.HLAnnouncement, [], 'Helios-Announcements');
  46. smalltalk.addClass('HLItemSelected', smalltalk.HLAnnouncement, ['item'], 'Helios-Announcements');
  47. smalltalk.addMethod(
  48. "_item",
  49. smalltalk.method({
  50. selector: "item",
  51. fn: function (){
  52. var self=this;
  53. return smalltalk.withContext(function($ctx1) { var $1;
  54. $1=self["@item"];
  55. return $1;
  56. }, function($ctx1) {$ctx1.fill(self,"item",{}, smalltalk.HLItemSelected)})},
  57. messageSends: []}),
  58. smalltalk.HLItemSelected);
  59. smalltalk.addMethod(
  60. "_item_",
  61. smalltalk.method({
  62. selector: "item:",
  63. fn: function (anObject){
  64. var self=this;
  65. return smalltalk.withContext(function($ctx1) { self["@item"]=anObject;
  66. return self}, function($ctx1) {$ctx1.fill(self,"item:",{anObject:anObject}, smalltalk.HLItemSelected)})},
  67. messageSends: []}),
  68. smalltalk.HLItemSelected);
  69. smalltalk.addMethod(
  70. "_on_",
  71. smalltalk.method({
  72. selector: "on:",
  73. fn: function (anItem){
  74. var self=this;
  75. return smalltalk.withContext(function($ctx1) { var $2,$3,$1;
  76. $2=_st(self)._new();
  77. _st($2)._item_(anItem);
  78. $3=_st($2)._yourself();
  79. $1=$3;
  80. return $1;
  81. }, function($ctx1) {$ctx1.fill(self,"on:",{anItem:anItem}, smalltalk.HLItemSelected.klass)})},
  82. messageSends: ["item:", "new", "yourself"]}),
  83. smalltalk.HLItemSelected.klass);
  84. smalltalk.addClass('HLClassSelected', smalltalk.HLItemSelected, [], 'Helios-Announcements');
  85. smalltalk.addClass('HLInstanceVariableSelected', smalltalk.HLItemSelected, [], 'Helios-Announcements');
  86. smalltalk.addClass('HLMethodSelected', smalltalk.HLItemSelected, [], 'Helios-Announcements');
  87. smalltalk.addClass('HLPackageSelected', smalltalk.HLItemSelected, [], 'Helios-Announcements');
  88. smalltalk.addClass('HLProtocolSelected', smalltalk.HLItemSelected, [], 'Helios-Announcements');
  89. smalltalk.addClass('HLRefreshRequested', smalltalk.HLAnnouncement, [], 'Helios-Announcements');
  90. smalltalk.addClass('HLShowCommentToggled', smalltalk.HLAnnouncement, [], 'Helios-Announcements');
  91. smalltalk.addClass('HLShowInstanceToggled', smalltalk.HLAnnouncement, [], 'Helios-Announcements');