Helios-Announcements.js 16 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580
  1. (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('HLDebuggerAnnouncement', 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.HLDebuggerAnnouncement)})},
  127. args: [],
  128. source: "context\x0a\x09^ context",
  129. messageSends: [],
  130. referencedClasses: []
  131. }),
  132. smalltalk.HLDebuggerAnnouncement);
  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.HLDebuggerAnnouncement)})},
  142. args: ["aContext"],
  143. source: "context: aContext\x0a\x09context := aContext",
  144. messageSends: [],
  145. referencedClasses: []
  146. }),
  147. smalltalk.HLDebuggerAnnouncement);
  148. smalltalk.addClass('HLDebuggerContextSelected', smalltalk.HLDebuggerAnnouncement, [], 'Helios-Announcements');
  149. smalltalk.addMethod(
  150. smalltalk.method({
  151. selector: "context",
  152. category: 'accessing',
  153. fn: function (){
  154. var self=this;
  155. return smalltalk.withContext(function($ctx1) {
  156. var $1;
  157. $1=self["@context"];
  158. return $1;
  159. }, function($ctx1) {$ctx1.fill(self,"context",{},smalltalk.HLDebuggerContextSelected)})},
  160. args: [],
  161. source: "context\x0a\x09^ context",
  162. messageSends: [],
  163. referencedClasses: []
  164. }),
  165. smalltalk.HLDebuggerContextSelected);
  166. smalltalk.addMethod(
  167. smalltalk.method({
  168. selector: "context:",
  169. category: 'accessing',
  170. fn: function (aContext){
  171. var self=this;
  172. return smalltalk.withContext(function($ctx1) {
  173. self["@context"]=aContext;
  174. return self}, function($ctx1) {$ctx1.fill(self,"context:",{aContext:aContext},smalltalk.HLDebuggerContextSelected)})},
  175. args: ["aContext"],
  176. source: "context: aContext\x0a\x09context := aContext",
  177. messageSends: [],
  178. referencedClasses: []
  179. }),
  180. smalltalk.HLDebuggerContextSelected);
  181. smalltalk.addClass('HLDebuggerStepped', smalltalk.HLDebuggerAnnouncement, [], 'Helios-Announcements');
  182. smalltalk.addClass('HLDebuggerWhere', smalltalk.HLDebuggerAnnouncement, [], 'Helios-Announcements');
  183. smalltalk.addClass('HLDiveRequested', smalltalk.HLAnnouncement, [], 'Helios-Announcements');
  184. smalltalk.addClass('HLEditComment', smalltalk.HLAnnouncement, [], 'Helios-Announcements');
  185. smalltalk.addClass('HLErrorRaised', smalltalk.HLAnnouncement, ['error'], 'Helios-Announcements');
  186. smalltalk.addMethod(
  187. smalltalk.method({
  188. selector: "error",
  189. category: 'accessing',
  190. fn: function (){
  191. var self=this;
  192. return smalltalk.withContext(function($ctx1) {
  193. var $1;
  194. $1=self["@error"];
  195. return $1;
  196. }, function($ctx1) {$ctx1.fill(self,"error",{},smalltalk.HLErrorRaised)})},
  197. args: [],
  198. source: "error\x0a\x09^ error",
  199. messageSends: [],
  200. referencedClasses: []
  201. }),
  202. smalltalk.HLErrorRaised);
  203. smalltalk.addMethod(
  204. smalltalk.method({
  205. selector: "error:",
  206. category: 'accessing',
  207. fn: function (anError){
  208. var self=this;
  209. return smalltalk.withContext(function($ctx1) {
  210. self["@error"]=anError;
  211. return self}, function($ctx1) {$ctx1.fill(self,"error:",{anError:anError},smalltalk.HLErrorRaised)})},
  212. args: ["anError"],
  213. source: "error: anError\x0a\x09error := anError",
  214. messageSends: [],
  215. referencedClasses: []
  216. }),
  217. smalltalk.HLErrorRaised);
  218. smalltalk.addClass('HLCompileErrorRaised', smalltalk.HLErrorRaised, [], 'Helios-Announcements');
  219. smalltalk.addClass('HLParseErrorRaised', smalltalk.HLErrorRaised, ['line', 'column', 'message'], 'Helios-Announcements');
  220. smalltalk.addMethod(
  221. smalltalk.method({
  222. selector: "column",
  223. category: 'accessing',
  224. fn: function (){
  225. var self=this;
  226. return smalltalk.withContext(function($ctx1) {
  227. var $1;
  228. $1=self["@column"];
  229. return $1;
  230. }, function($ctx1) {$ctx1.fill(self,"column",{},smalltalk.HLParseErrorRaised)})},
  231. args: [],
  232. source: "column\x0a\x09^ column",
  233. messageSends: [],
  234. referencedClasses: []
  235. }),
  236. smalltalk.HLParseErrorRaised);
  237. smalltalk.addMethod(
  238. smalltalk.method({
  239. selector: "column:",
  240. category: 'accessing',
  241. fn: function (anInteger){
  242. var self=this;
  243. return smalltalk.withContext(function($ctx1) {
  244. self["@column"]=anInteger;
  245. return self}, function($ctx1) {$ctx1.fill(self,"column:",{anInteger:anInteger},smalltalk.HLParseErrorRaised)})},
  246. args: ["anInteger"],
  247. source: "column: anInteger\x0a\x09column := anInteger",
  248. messageSends: [],
  249. referencedClasses: []
  250. }),
  251. smalltalk.HLParseErrorRaised);
  252. smalltalk.addMethod(
  253. smalltalk.method({
  254. selector: "line",
  255. category: 'accessing',
  256. fn: function (){
  257. var self=this;
  258. return smalltalk.withContext(function($ctx1) {
  259. var $1;
  260. $1=self["@line"];
  261. return $1;
  262. }, function($ctx1) {$ctx1.fill(self,"line",{},smalltalk.HLParseErrorRaised)})},
  263. args: [],
  264. source: "line\x0a\x09^ line",
  265. messageSends: [],
  266. referencedClasses: []
  267. }),
  268. smalltalk.HLParseErrorRaised);
  269. smalltalk.addMethod(
  270. smalltalk.method({
  271. selector: "line:",
  272. category: 'accessing',
  273. fn: function (anInteger){
  274. var self=this;
  275. return smalltalk.withContext(function($ctx1) {
  276. self["@line"]=anInteger;
  277. return self}, function($ctx1) {$ctx1.fill(self,"line:",{anInteger:anInteger},smalltalk.HLParseErrorRaised)})},
  278. args: ["anInteger"],
  279. source: "line: anInteger\x0a\x09line := anInteger",
  280. messageSends: [],
  281. referencedClasses: []
  282. }),
  283. smalltalk.HLParseErrorRaised);
  284. smalltalk.addMethod(
  285. smalltalk.method({
  286. selector: "message",
  287. category: 'accessing',
  288. fn: function (){
  289. var self=this;
  290. return smalltalk.withContext(function($ctx1) {
  291. var $1;
  292. $1=self["@message"];
  293. return $1;
  294. }, function($ctx1) {$ctx1.fill(self,"message",{},smalltalk.HLParseErrorRaised)})},
  295. args: [],
  296. source: "message\x0a\x09^ message",
  297. messageSends: [],
  298. referencedClasses: []
  299. }),
  300. smalltalk.HLParseErrorRaised);
  301. smalltalk.addMethod(
  302. smalltalk.method({
  303. selector: "message:",
  304. category: 'accessing',
  305. fn: function (aString){
  306. var self=this;
  307. return smalltalk.withContext(function($ctx1) {
  308. self["@message"]=aString;
  309. return self}, function($ctx1) {$ctx1.fill(self,"message:",{aString:aString},smalltalk.HLParseErrorRaised)})},
  310. args: ["aString"],
  311. source: "message: aString\x0a\x09message := aString",
  312. messageSends: [],
  313. referencedClasses: []
  314. }),
  315. smalltalk.HLParseErrorRaised);
  316. smalltalk.addClass('HLUnknownVariableErrorRaised', smalltalk.HLErrorRaised, [], 'Helios-Announcements');
  317. smalltalk.addClass('HLFocusRequested', smalltalk.HLAnnouncement, [], 'Helios-Announcements');
  318. smalltalk.addClass('HLClassesFocusRequested', smalltalk.HLFocusRequested, [], 'Helios-Announcements');
  319. smalltalk.addClass('HLMethodsFocusRequested', smalltalk.HLFocusRequested, [], 'Helios-Announcements');
  320. smalltalk.addClass('HLPackagesFocusRequested', smalltalk.HLFocusRequested, [], 'Helios-Announcements');
  321. smalltalk.addClass('HLProtocolsFocusRequested', smalltalk.HLFocusRequested, [], 'Helios-Announcements');
  322. smalltalk.addClass('HLSourceCodeFocusRequested', smalltalk.HLFocusRequested, [], 'Helios-Announcements');
  323. smalltalk.addClass('HLInstVarAdded', smalltalk.HLAnnouncement, ['theClass', 'variableName'], 'Helios-Announcements');
  324. smalltalk.addMethod(
  325. smalltalk.method({
  326. selector: "theClass",
  327. category: 'accessing',
  328. fn: function (){
  329. var self=this;
  330. return smalltalk.withContext(function($ctx1) {
  331. var $1;
  332. $1=self["@theClass"];
  333. return $1;
  334. }, function($ctx1) {$ctx1.fill(self,"theClass",{},smalltalk.HLInstVarAdded)})},
  335. args: [],
  336. source: "theClass\x0a\x09^ theClass",
  337. messageSends: [],
  338. referencedClasses: []
  339. }),
  340. smalltalk.HLInstVarAdded);
  341. smalltalk.addMethod(
  342. smalltalk.method({
  343. selector: "theClass:",
  344. category: 'accessing',
  345. fn: function (aClass){
  346. var self=this;
  347. return smalltalk.withContext(function($ctx1) {
  348. self["@theClass"]=aClass;
  349. return self}, function($ctx1) {$ctx1.fill(self,"theClass:",{aClass:aClass},smalltalk.HLInstVarAdded)})},
  350. args: ["aClass"],
  351. source: "theClass: aClass\x0a\x09theClass := aClass",
  352. messageSends: [],
  353. referencedClasses: []
  354. }),
  355. smalltalk.HLInstVarAdded);
  356. smalltalk.addMethod(
  357. smalltalk.method({
  358. selector: "variableName",
  359. category: 'accessing',
  360. fn: function (){
  361. var self=this;
  362. return smalltalk.withContext(function($ctx1) {
  363. var $1;
  364. $1=self["@variableName"];
  365. return $1;
  366. }, function($ctx1) {$ctx1.fill(self,"variableName",{},smalltalk.HLInstVarAdded)})},
  367. args: [],
  368. source: "variableName\x0a\x09^ variableName",
  369. messageSends: [],
  370. referencedClasses: []
  371. }),
  372. smalltalk.HLInstVarAdded);
  373. smalltalk.addMethod(
  374. smalltalk.method({
  375. selector: "variableName:",
  376. category: 'accessing',
  377. fn: function (aString){
  378. var self=this;
  379. return smalltalk.withContext(function($ctx1) {
  380. self["@variableName"]=aString;
  381. return self}, function($ctx1) {$ctx1.fill(self,"variableName:",{aString:aString},smalltalk.HLInstVarAdded)})},
  382. args: ["aString"],
  383. source: "variableName: aString\x0a\x09variableName := aString",
  384. messageSends: [],
  385. referencedClasses: []
  386. }),
  387. smalltalk.HLInstVarAdded);
  388. smalltalk.addClass('HLItemSelected', smalltalk.HLAnnouncement, ['item'], 'Helios-Announcements');
  389. smalltalk.addMethod(
  390. smalltalk.method({
  391. selector: "item",
  392. category: 'accessing',
  393. fn: function (){
  394. var self=this;
  395. return smalltalk.withContext(function($ctx1) {
  396. var $1;
  397. $1=self["@item"];
  398. return $1;
  399. }, function($ctx1) {$ctx1.fill(self,"item",{},smalltalk.HLItemSelected)})},
  400. args: [],
  401. source: "item\x0a\x09^ item",
  402. messageSends: [],
  403. referencedClasses: []
  404. }),
  405. smalltalk.HLItemSelected);
  406. smalltalk.addMethod(
  407. smalltalk.method({
  408. selector: "item:",
  409. category: 'accessing',
  410. fn: function (anObject){
  411. var self=this;
  412. return smalltalk.withContext(function($ctx1) {
  413. self["@item"]=anObject;
  414. return self}, function($ctx1) {$ctx1.fill(self,"item:",{anObject:anObject},smalltalk.HLItemSelected)})},
  415. args: ["anObject"],
  416. source: "item: anObject\x0a\x09item := anObject",
  417. messageSends: [],
  418. referencedClasses: []
  419. }),
  420. smalltalk.HLItemSelected);
  421. smalltalk.addMethod(
  422. smalltalk.method({
  423. selector: "on:",
  424. category: 'instance creation',
  425. fn: function (anItem){
  426. var self=this;
  427. return smalltalk.withContext(function($ctx1) {
  428. var $2,$3,$1;
  429. $2=self._new();
  430. _st($2)._item_(anItem);
  431. $3=_st($2)._yourself();
  432. $1=$3;
  433. return $1;
  434. }, function($ctx1) {$ctx1.fill(self,"on:",{anItem:anItem},smalltalk.HLItemSelected.klass)})},
  435. args: ["anItem"],
  436. source: "on: anItem\x0a\x09^ self new\x0a \x09item: anItem;\x0a yourself",
  437. messageSends: ["item:", "new", "yourself"],
  438. referencedClasses: []
  439. }),
  440. smalltalk.HLItemSelected.klass);
  441. smalltalk.addClass('HLClassSelected', smalltalk.HLItemSelected, [], 'Helios-Announcements');
  442. smalltalk.addClass('HLInstanceVariableSelected', smalltalk.HLItemSelected, [], 'Helios-Announcements');
  443. smalltalk.addClass('HLMethodSelected', smalltalk.HLItemSelected, [], 'Helios-Announcements');
  444. smalltalk.addClass('HLPackageSelected', smalltalk.HLItemSelected, [], 'Helios-Announcements');
  445. smalltalk.addClass('HLProtocolSelected', smalltalk.HLItemSelected, [], 'Helios-Announcements');
  446. smalltalk.addClass('HLSaveSourceCode', smalltalk.HLAnnouncement, [], 'Helios-Announcements');
  447. smalltalk.addClass('HLSearchReferences', smalltalk.HLAnnouncement, ['searchString'], 'Helios-Announcements');
  448. smalltalk.addMethod(
  449. smalltalk.method({
  450. selector: "searchString",
  451. category: 'accessing',
  452. fn: function (){
  453. var self=this;
  454. return smalltalk.withContext(function($ctx1) {
  455. var $1;
  456. $1=self["@searchString"];
  457. return $1;
  458. }, function($ctx1) {$ctx1.fill(self,"searchString",{},smalltalk.HLSearchReferences)})},
  459. args: [],
  460. source: "searchString\x0a\x09^ searchString",
  461. messageSends: [],
  462. referencedClasses: []
  463. }),
  464. smalltalk.HLSearchReferences);
  465. smalltalk.addMethod(
  466. smalltalk.method({
  467. selector: "searchString:",
  468. category: 'accessing',
  469. fn: function (aString){
  470. var self=this;
  471. return smalltalk.withContext(function($ctx1) {
  472. self["@searchString"]=aString;
  473. return self}, function($ctx1) {$ctx1.fill(self,"searchString:",{aString:aString},smalltalk.HLSearchReferences)})},
  474. args: ["aString"],
  475. source: "searchString: aString\x0a\x09searchString := aString",
  476. messageSends: [],
  477. referencedClasses: []
  478. }),
  479. smalltalk.HLSearchReferences);
  480. smalltalk.addClass('HLShowCommentToggled', smalltalk.HLAnnouncement, [], 'Helios-Announcements');
  481. smalltalk.addClass('HLShowInstanceToggled', smalltalk.HLAnnouncement, [], 'Helios-Announcements');
  482. smalltalk.addClass('HLSourceCodeSaved', smalltalk.HLAnnouncement, [], 'Helios-Announcements');
  483. })(global_smalltalk,global_nil,global__st);