2
0

Helios-Announcements.js 16 KB

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