Helios-Announcements.deploy.js 2.7 KB

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