2
0

Helios-Announcements.js 15 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537
  1. define(["smalltalk","nil","_st"], function(smalltalk,nil,_st){
  2. smalltalk.addPackage('Helios-Announcements');
  3. smalltalk.addClass('HLAboutToChange', smalltalk.Object, ['actionBlock'], 'Helios-Announcements');
  4. smalltalk.addMethod(
  5. smalltalk.method({
  6. selector: "actionBlock",
  7. category: 'accessing',
  8. fn: function (){
  9. var self=this;
  10. return smalltalk.withContext(function($ctx1) {
  11. var $1;
  12. $1=self["@actionBlock"];
  13. return $1;
  14. }, function($ctx1) {$ctx1.fill(self,"actionBlock",{},smalltalk.HLAboutToChange)})},
  15. args: [],
  16. source: "actionBlock\x0a\x09^ actionBlock",
  17. messageSends: [],
  18. referencedClasses: []
  19. }),
  20. smalltalk.HLAboutToChange);
  21. smalltalk.addMethod(
  22. smalltalk.method({
  23. selector: "actionBlock:",
  24. category: 'accessing',
  25. fn: function (aBlock){
  26. var self=this;
  27. return smalltalk.withContext(function($ctx1) {
  28. self["@actionBlock"]=aBlock;
  29. return self}, function($ctx1) {$ctx1.fill(self,"actionBlock:",{aBlock:aBlock},smalltalk.HLAboutToChange)})},
  30. args: ["aBlock"],
  31. source: "actionBlock: aBlock\x0a\x09actionBlock := aBlock",
  32. messageSends: [],
  33. referencedClasses: []
  34. }),
  35. smalltalk.HLAboutToChange);
  36. smalltalk.addClass('HLAnnouncement', smalltalk.Object, [], 'Helios-Announcements');
  37. smalltalk.HLAnnouncement.comment="I am the root of the announcement class hierarchy used in the Helios UI.";
  38. smalltalk.addMethod(
  39. smalltalk.method({
  40. selector: "heliosClass",
  41. category: 'helios',
  42. fn: function (){
  43. var self=this;
  44. return smalltalk.withContext(function($ctx1) {
  45. return "announcement";
  46. }, function($ctx1) {$ctx1.fill(self,"heliosClass",{},smalltalk.HLAnnouncement.klass)})},
  47. args: [],
  48. source: "heliosClass\x0a\x09^ 'announcement'",
  49. messageSends: [],
  50. referencedClasses: []
  51. }),
  52. smalltalk.HLAnnouncement.klass);
  53. smalltalk.addClass('HLCodeHandled', smalltalk.HLAnnouncement, ['code'], 'Helios-Announcements');
  54. smalltalk.HLCodeHandled.comment="I am the root class of announcements emitted by `HLCodeWidget`s";
  55. smalltalk.addMethod(
  56. smalltalk.method({
  57. selector: "code",
  58. category: 'accessing',
  59. fn: function (){
  60. var self=this;
  61. return smalltalk.withContext(function($ctx1) {
  62. var $1;
  63. $1=self["@code"];
  64. return $1;
  65. }, function($ctx1) {$ctx1.fill(self,"code",{},smalltalk.HLCodeHandled)})},
  66. args: [],
  67. source: "code\x0a\x0a\x09^ code",
  68. messageSends: [],
  69. referencedClasses: []
  70. }),
  71. smalltalk.HLCodeHandled);
  72. smalltalk.addMethod(
  73. smalltalk.method({
  74. selector: "code:",
  75. category: 'accessing',
  76. fn: function (aModel){
  77. var self=this;
  78. return smalltalk.withContext(function($ctx1) {
  79. self["@code"]=aModel;
  80. return self}, function($ctx1) {$ctx1.fill(self,"code:",{aModel:aModel},smalltalk.HLCodeHandled)})},
  81. args: ["aModel"],
  82. source: "code: aModel\x0a\x0a\x09code := aModel",
  83. messageSends: [],
  84. referencedClasses: []
  85. }),
  86. smalltalk.HLCodeHandled);
  87. smalltalk.addMethod(
  88. smalltalk.method({
  89. selector: "on:",
  90. category: 'actions',
  91. fn: function (aCodeModel){
  92. var self=this;
  93. return smalltalk.withContext(function($ctx1) {
  94. var $2,$3,$1;
  95. $2=self._new();
  96. _st($2)._code_(aCodeModel);
  97. $3=_st($2)._yourself();
  98. $1=$3;
  99. return $1;
  100. }, function($ctx1) {$ctx1.fill(self,"on:",{aCodeModel:aCodeModel},smalltalk.HLCodeHandled.klass)})},
  101. args: ["aCodeModel"],
  102. source: "on: aCodeModel\x0a\x0a\x09^ self new \x0a \x09code: aCodeModel;\x0a yourself",
  103. messageSends: ["code:", "new", "yourself"],
  104. referencedClasses: []
  105. }),
  106. smalltalk.HLCodeHandled.klass);
  107. smalltalk.addClass('HLDoItExecuted', smalltalk.HLCodeHandled, [], 'Helios-Announcements');
  108. smalltalk.HLDoItExecuted.comment="I am emitted by a `HLCodeWidget` after a DoIt has been executed.";
  109. smalltalk.addClass('HLDoItRequested', smalltalk.HLCodeHandled, [], 'Helios-Announcements');
  110. smalltalk.HLDoItRequested.comment="I am emitted by a `HLCodeWidget` before a DoIt is executed.";
  111. smalltalk.addClass('HLInspectItRequested', smalltalk.HLCodeHandled, [], 'Helios-Announcements');
  112. smalltalk.HLInspectItRequested.comment="I am emitted by a `HLCodeWidget` before an object is inspected.";
  113. smalltalk.addClass('HLPrintItRequested', smalltalk.HLCodeHandled, [], 'Helios-Announcements');
  114. smalltalk.HLPrintItRequested.comment="I am emitted by a `HLCodeWidget` before an object is printed.";
  115. smalltalk.addClass('HLDebuggerContextSelected', smalltalk.HLAnnouncement, ['context'], 'Helios-Announcements');
  116. smalltalk.addMethod(
  117. smalltalk.method({
  118. selector: "context",
  119. category: 'accessing',
  120. fn: function (){
  121. var self=this;
  122. return smalltalk.withContext(function($ctx1) {
  123. var $1;
  124. $1=self["@context"];
  125. return $1;
  126. }, function($ctx1) {$ctx1.fill(self,"context",{},smalltalk.HLDebuggerContextSelected)})},
  127. args: [],
  128. source: "context\x0a\x09^ context",
  129. messageSends: [],
  130. referencedClasses: []
  131. }),
  132. smalltalk.HLDebuggerContextSelected);
  133. smalltalk.addMethod(
  134. smalltalk.method({
  135. selector: "context:",
  136. category: 'accessing',
  137. fn: function (aContext){
  138. var self=this;
  139. return smalltalk.withContext(function($ctx1) {
  140. self["@context"]=aContext;
  141. return self}, function($ctx1) {$ctx1.fill(self,"context:",{aContext:aContext},smalltalk.HLDebuggerContextSelected)})},
  142. args: ["aContext"],
  143. source: "context: aContext\x0a\x09context := aContext",
  144. messageSends: [],
  145. referencedClasses: []
  146. }),
  147. smalltalk.HLDebuggerContextSelected);
  148. smalltalk.addClass('HLDiveRequested', smalltalk.HLAnnouncement, [], 'Helios-Announcements');
  149. smalltalk.addClass('HLEditComment', smalltalk.HLAnnouncement, [], 'Helios-Announcements');
  150. smalltalk.addClass('HLErrorRaised', smalltalk.HLAnnouncement, ['error'], 'Helios-Announcements');
  151. smalltalk.addMethod(
  152. smalltalk.method({
  153. selector: "error",
  154. category: 'accessing',
  155. fn: function (){
  156. var self=this;
  157. return smalltalk.withContext(function($ctx1) {
  158. var $1;
  159. $1=self["@error"];
  160. return $1;
  161. }, function($ctx1) {$ctx1.fill(self,"error",{},smalltalk.HLErrorRaised)})},
  162. args: [],
  163. source: "error\x0a\x09^ error",
  164. messageSends: [],
  165. referencedClasses: []
  166. }),
  167. smalltalk.HLErrorRaised);
  168. smalltalk.addMethod(
  169. smalltalk.method({
  170. selector: "error:",
  171. category: 'accessing',
  172. fn: function (anError){
  173. var self=this;
  174. return smalltalk.withContext(function($ctx1) {
  175. self["@error"]=anError;
  176. return self}, function($ctx1) {$ctx1.fill(self,"error:",{anError:anError},smalltalk.HLErrorRaised)})},
  177. args: ["anError"],
  178. source: "error: anError\x0a\x09error := anError",
  179. messageSends: [],
  180. referencedClasses: []
  181. }),
  182. smalltalk.HLErrorRaised);
  183. smalltalk.addClass('HLCompileErrorRaised', smalltalk.HLErrorRaised, [], 'Helios-Announcements');
  184. smalltalk.addClass('HLParseErrorRaised', smalltalk.HLErrorRaised, ['line', 'column', 'message'], 'Helios-Announcements');
  185. smalltalk.addMethod(
  186. smalltalk.method({
  187. selector: "column",
  188. category: 'accessing',
  189. fn: function (){
  190. var self=this;
  191. return smalltalk.withContext(function($ctx1) {
  192. var $1;
  193. $1=self["@column"];
  194. return $1;
  195. }, function($ctx1) {$ctx1.fill(self,"column",{},smalltalk.HLParseErrorRaised)})},
  196. args: [],
  197. source: "column\x0a\x09^ column",
  198. messageSends: [],
  199. referencedClasses: []
  200. }),
  201. smalltalk.HLParseErrorRaised);
  202. smalltalk.addMethod(
  203. smalltalk.method({
  204. selector: "column:",
  205. category: 'accessing',
  206. fn: function (anInteger){
  207. var self=this;
  208. return smalltalk.withContext(function($ctx1) {
  209. self["@column"]=anInteger;
  210. return self}, function($ctx1) {$ctx1.fill(self,"column:",{anInteger:anInteger},smalltalk.HLParseErrorRaised)})},
  211. args: ["anInteger"],
  212. source: "column: anInteger\x0a\x09column := anInteger",
  213. messageSends: [],
  214. referencedClasses: []
  215. }),
  216. smalltalk.HLParseErrorRaised);
  217. smalltalk.addMethod(
  218. smalltalk.method({
  219. selector: "line",
  220. category: 'accessing',
  221. fn: function (){
  222. var self=this;
  223. return smalltalk.withContext(function($ctx1) {
  224. var $1;
  225. $1=self["@line"];
  226. return $1;
  227. }, function($ctx1) {$ctx1.fill(self,"line",{},smalltalk.HLParseErrorRaised)})},
  228. args: [],
  229. source: "line\x0a\x09^ line",
  230. messageSends: [],
  231. referencedClasses: []
  232. }),
  233. smalltalk.HLParseErrorRaised);
  234. smalltalk.addMethod(
  235. smalltalk.method({
  236. selector: "line:",
  237. category: 'accessing',
  238. fn: function (anInteger){
  239. var self=this;
  240. return smalltalk.withContext(function($ctx1) {
  241. self["@line"]=anInteger;
  242. return self}, function($ctx1) {$ctx1.fill(self,"line:",{anInteger:anInteger},smalltalk.HLParseErrorRaised)})},
  243. args: ["anInteger"],
  244. source: "line: anInteger\x0a\x09line := anInteger",
  245. messageSends: [],
  246. referencedClasses: []
  247. }),
  248. smalltalk.HLParseErrorRaised);
  249. smalltalk.addMethod(
  250. smalltalk.method({
  251. selector: "message",
  252. category: 'accessing',
  253. fn: function (){
  254. var self=this;
  255. return smalltalk.withContext(function($ctx1) {
  256. var $1;
  257. $1=self["@message"];
  258. return $1;
  259. }, function($ctx1) {$ctx1.fill(self,"message",{},smalltalk.HLParseErrorRaised)})},
  260. args: [],
  261. source: "message\x0a\x09^ message",
  262. messageSends: [],
  263. referencedClasses: []
  264. }),
  265. smalltalk.HLParseErrorRaised);
  266. smalltalk.addMethod(
  267. smalltalk.method({
  268. selector: "message:",
  269. category: 'accessing',
  270. fn: function (aString){
  271. var self=this;
  272. return smalltalk.withContext(function($ctx1) {
  273. self["@message"]=aString;
  274. return self}, function($ctx1) {$ctx1.fill(self,"message:",{aString:aString},smalltalk.HLParseErrorRaised)})},
  275. args: ["aString"],
  276. source: "message: aString\x0a\x09message := aString",
  277. messageSends: [],
  278. referencedClasses: []
  279. }),
  280. smalltalk.HLParseErrorRaised);
  281. smalltalk.addClass('HLUnknownVariableErrorRaised', smalltalk.HLErrorRaised, [], 'Helios-Announcements');
  282. smalltalk.addClass('HLFocusRequested', smalltalk.HLAnnouncement, [], 'Helios-Announcements');
  283. smalltalk.addClass('HLClassesFocusRequested', smalltalk.HLFocusRequested, [], 'Helios-Announcements');
  284. smalltalk.addClass('HLMethodsFocusRequested', smalltalk.HLFocusRequested, [], 'Helios-Announcements');
  285. smalltalk.addClass('HLPackagesFocusRequested', smalltalk.HLFocusRequested, [], 'Helios-Announcements');
  286. smalltalk.addClass('HLProtocolsFocusRequested', smalltalk.HLFocusRequested, [], 'Helios-Announcements');
  287. smalltalk.addClass('HLSourceCodeFocusRequested', smalltalk.HLFocusRequested, [], 'Helios-Announcements');
  288. smalltalk.addClass('HLInstVarAdded', smalltalk.HLAnnouncement, ['theClass', 'variableName'], 'Helios-Announcements');
  289. smalltalk.addMethod(
  290. smalltalk.method({
  291. selector: "theClass",
  292. category: 'accessing',
  293. fn: function (){
  294. var self=this;
  295. return smalltalk.withContext(function($ctx1) {
  296. var $1;
  297. $1=self["@theClass"];
  298. return $1;
  299. }, function($ctx1) {$ctx1.fill(self,"theClass",{},smalltalk.HLInstVarAdded)})},
  300. args: [],
  301. source: "theClass\x0a\x09^ theClass",
  302. messageSends: [],
  303. referencedClasses: []
  304. }),
  305. smalltalk.HLInstVarAdded);
  306. smalltalk.addMethod(
  307. smalltalk.method({
  308. selector: "theClass:",
  309. category: 'accessing',
  310. fn: function (aClass){
  311. var self=this;
  312. return smalltalk.withContext(function($ctx1) {
  313. self["@theClass"]=aClass;
  314. return self}, function($ctx1) {$ctx1.fill(self,"theClass:",{aClass:aClass},smalltalk.HLInstVarAdded)})},
  315. args: ["aClass"],
  316. source: "theClass: aClass\x0a\x09theClass := aClass",
  317. messageSends: [],
  318. referencedClasses: []
  319. }),
  320. smalltalk.HLInstVarAdded);
  321. smalltalk.addMethod(
  322. smalltalk.method({
  323. selector: "variableName",
  324. category: 'accessing',
  325. fn: function (){
  326. var self=this;
  327. return smalltalk.withContext(function($ctx1) {
  328. var $1;
  329. $1=self["@variableName"];
  330. return $1;
  331. }, function($ctx1) {$ctx1.fill(self,"variableName",{},smalltalk.HLInstVarAdded)})},
  332. args: [],
  333. source: "variableName\x0a\x09^ variableName",
  334. messageSends: [],
  335. referencedClasses: []
  336. }),
  337. smalltalk.HLInstVarAdded);
  338. smalltalk.addMethod(
  339. smalltalk.method({
  340. selector: "variableName:",
  341. category: 'accessing',
  342. fn: function (aString){
  343. var self=this;
  344. return smalltalk.withContext(function($ctx1) {
  345. self["@variableName"]=aString;
  346. return self}, function($ctx1) {$ctx1.fill(self,"variableName:",{aString:aString},smalltalk.HLInstVarAdded)})},
  347. args: ["aString"],
  348. source: "variableName: aString\x0a\x09variableName := aString",
  349. messageSends: [],
  350. referencedClasses: []
  351. }),
  352. smalltalk.HLInstVarAdded);
  353. smalltalk.addClass('HLItemSelected', smalltalk.HLAnnouncement, ['item'], 'Helios-Announcements');
  354. smalltalk.addMethod(
  355. smalltalk.method({
  356. selector: "item",
  357. category: 'accessing',
  358. fn: function (){
  359. var self=this;
  360. return smalltalk.withContext(function($ctx1) {
  361. var $1;
  362. $1=self["@item"];
  363. return $1;
  364. }, function($ctx1) {$ctx1.fill(self,"item",{},smalltalk.HLItemSelected)})},
  365. args: [],
  366. source: "item\x0a\x09^ item",
  367. messageSends: [],
  368. referencedClasses: []
  369. }),
  370. smalltalk.HLItemSelected);
  371. smalltalk.addMethod(
  372. smalltalk.method({
  373. selector: "item:",
  374. category: 'accessing',
  375. fn: function (anObject){
  376. var self=this;
  377. return smalltalk.withContext(function($ctx1) {
  378. self["@item"]=anObject;
  379. return self}, function($ctx1) {$ctx1.fill(self,"item:",{anObject:anObject},smalltalk.HLItemSelected)})},
  380. args: ["anObject"],
  381. source: "item: anObject\x0a\x09item := anObject",
  382. messageSends: [],
  383. referencedClasses: []
  384. }),
  385. smalltalk.HLItemSelected);
  386. smalltalk.addMethod(
  387. smalltalk.method({
  388. selector: "on:",
  389. category: 'instance creation',
  390. fn: function (anItem){
  391. var self=this;
  392. return smalltalk.withContext(function($ctx1) {
  393. var $2,$3,$1;
  394. $2=self._new();
  395. _st($2)._item_(anItem);
  396. $3=_st($2)._yourself();
  397. $1=$3;
  398. return $1;
  399. }, function($ctx1) {$ctx1.fill(self,"on:",{anItem:anItem},smalltalk.HLItemSelected.klass)})},
  400. args: ["anItem"],
  401. source: "on: anItem\x0a\x09^ self new\x0a \x09item: anItem;\x0a yourself",
  402. messageSends: ["item:", "new", "yourself"],
  403. referencedClasses: []
  404. }),
  405. smalltalk.HLItemSelected.klass);
  406. smalltalk.addClass('HLClassSelected', smalltalk.HLItemSelected, [], 'Helios-Announcements');
  407. smalltalk.addClass('HLInstanceVariableSelected', smalltalk.HLItemSelected, [], 'Helios-Announcements');
  408. smalltalk.addClass('HLMethodSelected', smalltalk.HLItemSelected, [], 'Helios-Announcements');
  409. smalltalk.addClass('HLPackageSelected', smalltalk.HLItemSelected, [], 'Helios-Announcements');
  410. smalltalk.addClass('HLProtocolSelected', smalltalk.HLItemSelected, [], 'Helios-Announcements');
  411. smalltalk.addClass('HLSaveSourceCode', smalltalk.HLAnnouncement, [], 'Helios-Announcements');
  412. smalltalk.addClass('HLSearchReferences', smalltalk.HLAnnouncement, ['searchString'], 'Helios-Announcements');
  413. smalltalk.addMethod(
  414. smalltalk.method({
  415. selector: "searchString",
  416. category: 'accessing',
  417. fn: function (){
  418. var self=this;
  419. return smalltalk.withContext(function($ctx1) {
  420. var $1;
  421. $1=self["@searchString"];
  422. return $1;
  423. }, function($ctx1) {$ctx1.fill(self,"searchString",{},smalltalk.HLSearchReferences)})},
  424. args: [],
  425. source: "searchString\x0a\x09^ searchString",
  426. messageSends: [],
  427. referencedClasses: []
  428. }),
  429. smalltalk.HLSearchReferences);
  430. smalltalk.addMethod(
  431. smalltalk.method({
  432. selector: "searchString:",
  433. category: 'accessing',
  434. fn: function (aString){
  435. var self=this;
  436. return smalltalk.withContext(function($ctx1) {
  437. self["@searchString"]=aString;
  438. return self}, function($ctx1) {$ctx1.fill(self,"searchString:",{aString:aString},smalltalk.HLSearchReferences)})},
  439. args: ["aString"],
  440. source: "searchString: aString\x0a\x09searchString := aString",
  441. messageSends: [],
  442. referencedClasses: []
  443. }),
  444. smalltalk.HLSearchReferences);
  445. smalltalk.addClass('HLShowCommentToggled', smalltalk.HLAnnouncement, [], 'Helios-Announcements');
  446. smalltalk.addClass('HLShowInstanceToggled', smalltalk.HLAnnouncement, [], 'Helios-Announcements');
  447. smalltalk.addClass('HLSourceCodeSaved', smalltalk.HLAnnouncement, [], 'Helios-Announcements');
  448. });