Helios-Commands-Browser.deploy.js 26 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869
  1. smalltalk.addPackage('Helios-Commands-Browser');
  2. smalltalk.addClass('HLBrowserCommand', smalltalk.HLModelCommand, [], 'Helios-Commands-Browser');
  3. smalltalk.addMethod(
  4. "_for_",
  5. smalltalk.method({
  6. selector: "for:",
  7. fn: function (aBrowserModel){
  8. var self=this;
  9. return smalltalk.withContext(function($ctx1) { var $2,$3,$1;
  10. $2=_st(self)._new();
  11. _st($2)._model_(aBrowserModel);
  12. $3=_st($2)._yourself();
  13. $1=$3;
  14. return $1;
  15. }, function($ctx1) {$ctx1.fill(self,"for:",{aBrowserModel:aBrowserModel},smalltalk.HLBrowserCommand.klass)})},
  16. messageSends: ["model:", "new", "yourself"]}),
  17. smalltalk.HLBrowserCommand.klass);
  18. smalltalk.addClass('HLBrowserGoToCommand', smalltalk.HLBrowserCommand, [], 'Helios-Commands-Browser');
  19. smalltalk.addMethod(
  20. "_key",
  21. smalltalk.method({
  22. selector: "key",
  23. fn: function (){
  24. var self=this;
  25. return smalltalk.withContext(function($ctx1) { return (71);
  26. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLGoToCommand.klass)})},
  27. messageSends: []}),
  28. smalltalk.HLBrowserGoToCommand.klass);
  29. smalltalk.addMethod(
  30. "_label",
  31. smalltalk.method({
  32. selector: "label",
  33. fn: function (){
  34. var self=this;
  35. return smalltalk.withContext(function($ctx1) { return "Go to";
  36. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLGoToCommand.klass)})},
  37. messageSends: []}),
  38. smalltalk.HLBrowserGoToCommand.klass);
  39. smalltalk.addClass('HLGoToClassesCommand', smalltalk.HLBrowserGoToCommand, [], 'Helios-Commands-Browser');
  40. smalltalk.addMethod(
  41. "_execute",
  42. smalltalk.method({
  43. selector: "execute",
  44. fn: function (){
  45. var self=this;
  46. return smalltalk.withContext(function($ctx1) { _st(_st(self)._model())._focusOnClasses();
  47. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLGoToClassesCommand)})},
  48. messageSends: ["focusOnClasses", "model"]}),
  49. smalltalk.HLGoToClassesCommand);
  50. smalltalk.addMethod(
  51. "_key",
  52. smalltalk.method({
  53. selector: "key",
  54. fn: function (){
  55. var self=this;
  56. return smalltalk.withContext(function($ctx1) { return (67);
  57. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLGoToClassesCommand.klass)})},
  58. messageSends: []}),
  59. smalltalk.HLGoToClassesCommand.klass);
  60. smalltalk.addMethod(
  61. "_label",
  62. smalltalk.method({
  63. selector: "label",
  64. fn: function (){
  65. var self=this;
  66. return smalltalk.withContext(function($ctx1) { return "Classes";
  67. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLGoToClassesCommand.klass)})},
  68. messageSends: []}),
  69. smalltalk.HLGoToClassesCommand.klass);
  70. smalltalk.addClass('HLGoToMethodsCommand', smalltalk.HLBrowserGoToCommand, [], 'Helios-Commands-Browser');
  71. smalltalk.addMethod(
  72. "_execute",
  73. smalltalk.method({
  74. selector: "execute",
  75. fn: function (){
  76. var self=this;
  77. return smalltalk.withContext(function($ctx1) { _st(_st(self)._model())._focusOnMethods();
  78. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLGoToMethodsCommand)})},
  79. messageSends: ["focusOnMethods", "model"]}),
  80. smalltalk.HLGoToMethodsCommand);
  81. smalltalk.addMethod(
  82. "_key",
  83. smalltalk.method({
  84. selector: "key",
  85. fn: function (){
  86. var self=this;
  87. return smalltalk.withContext(function($ctx1) { return (77);
  88. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLGoToMethodsCommand.klass)})},
  89. messageSends: []}),
  90. smalltalk.HLGoToMethodsCommand.klass);
  91. smalltalk.addMethod(
  92. "_label",
  93. smalltalk.method({
  94. selector: "label",
  95. fn: function (){
  96. var self=this;
  97. return smalltalk.withContext(function($ctx1) { return "Methods";
  98. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLGoToMethodsCommand.klass)})},
  99. messageSends: []}),
  100. smalltalk.HLGoToMethodsCommand.klass);
  101. smalltalk.addClass('HLGoToPackagesCommand', smalltalk.HLBrowserGoToCommand, [], 'Helios-Commands-Browser');
  102. smalltalk.addMethod(
  103. "_execute",
  104. smalltalk.method({
  105. selector: "execute",
  106. fn: function (){
  107. var self=this;
  108. return smalltalk.withContext(function($ctx1) { _st(_st(self)._model())._focusOnPackages();
  109. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLGoToPackagesCommand)})},
  110. messageSends: ["focusOnPackages", "model"]}),
  111. smalltalk.HLGoToPackagesCommand);
  112. smalltalk.addMethod(
  113. "_key",
  114. smalltalk.method({
  115. selector: "key",
  116. fn: function (){
  117. var self=this;
  118. return smalltalk.withContext(function($ctx1) { return (80);
  119. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLGoToPackagesCommand.klass)})},
  120. messageSends: []}),
  121. smalltalk.HLGoToPackagesCommand.klass);
  122. smalltalk.addMethod(
  123. "_label",
  124. smalltalk.method({
  125. selector: "label",
  126. fn: function (){
  127. var self=this;
  128. return smalltalk.withContext(function($ctx1) { return "Packages";
  129. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLGoToPackagesCommand.klass)})},
  130. messageSends: []}),
  131. smalltalk.HLGoToPackagesCommand.klass);
  132. smalltalk.addClass('HLGoToProtocolsCommand', smalltalk.HLBrowserGoToCommand, [], 'Helios-Commands-Browser');
  133. smalltalk.addMethod(
  134. "_execute",
  135. smalltalk.method({
  136. selector: "execute",
  137. fn: function (){
  138. var self=this;
  139. return smalltalk.withContext(function($ctx1) { _st(_st(self)._model())._focusOnProtocols();
  140. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLGoToProtocolsCommand)})},
  141. messageSends: ["focusOnProtocols", "model"]}),
  142. smalltalk.HLGoToProtocolsCommand);
  143. smalltalk.addMethod(
  144. "_key",
  145. smalltalk.method({
  146. selector: "key",
  147. fn: function (){
  148. var self=this;
  149. return smalltalk.withContext(function($ctx1) { return (84);
  150. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLGoToProtocolsCommand.klass)})},
  151. messageSends: []}),
  152. smalltalk.HLGoToProtocolsCommand.klass);
  153. smalltalk.addMethod(
  154. "_label",
  155. smalltalk.method({
  156. selector: "label",
  157. fn: function (){
  158. var self=this;
  159. return smalltalk.withContext(function($ctx1) { return "Protocols";
  160. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLGoToProtocolsCommand.klass)})},
  161. messageSends: []}),
  162. smalltalk.HLGoToProtocolsCommand.klass);
  163. smalltalk.addClass('HLGoToSourceCodeCommand', smalltalk.HLBrowserGoToCommand, [], 'Helios-Commands-Browser');
  164. smalltalk.addMethod(
  165. "_execute",
  166. smalltalk.method({
  167. selector: "execute",
  168. fn: function (){
  169. var self=this;
  170. return smalltalk.withContext(function($ctx1) { _st(_st(self)._model())._focusOnSourceCode();
  171. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLGoToSourceCodeCommand)})},
  172. messageSends: ["focusOnSourceCode", "model"]}),
  173. smalltalk.HLGoToSourceCodeCommand);
  174. smalltalk.addMethod(
  175. "_key",
  176. smalltalk.method({
  177. selector: "key",
  178. fn: function (){
  179. var self=this;
  180. return smalltalk.withContext(function($ctx1) { return (83);
  181. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLGoToSourceCodeCommand.klass)})},
  182. messageSends: []}),
  183. smalltalk.HLGoToSourceCodeCommand.klass);
  184. smalltalk.addMethod(
  185. "_label",
  186. smalltalk.method({
  187. selector: "label",
  188. fn: function (){
  189. var self=this;
  190. return smalltalk.withContext(function($ctx1) { return "Source code";
  191. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLGoToSourceCodeCommand.klass)})},
  192. messageSends: []}),
  193. smalltalk.HLGoToSourceCodeCommand.klass);
  194. smalltalk.addClass('HLCommitPackageCommand', smalltalk.HLBrowserCommand, [], 'Helios-Commands-Browser');
  195. smalltalk.addMethod(
  196. "_execute",
  197. smalltalk.method({
  198. selector: "execute",
  199. fn: function (){
  200. var self=this;
  201. return smalltalk.withContext(function($ctx1) { _st(_st(self)._model())._commitPackage();
  202. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLCommitPackageCommand)})},
  203. messageSends: ["commitPackage", "model"]}),
  204. smalltalk.HLCommitPackageCommand);
  205. smalltalk.addMethod(
  206. "_isActive",
  207. smalltalk.method({
  208. selector: "isActive",
  209. fn: function (){
  210. var self=this;
  211. return smalltalk.withContext(function($ctx1) { return true;
  212. }, function($ctx1) {$ctx1.fill(self,"isActive",{},smalltalk.HLCommitPackageCommand)})},
  213. messageSends: []}),
  214. smalltalk.HLCommitPackageCommand);
  215. smalltalk.addMethod(
  216. "_isValidFor_",
  217. smalltalk.method({
  218. selector: "isValidFor:",
  219. fn: function (anObject){
  220. var self=this;
  221. return smalltalk.withContext(function($ctx1) {
  222. var $1;
  223. $1=_st(anObject)._isPackage();
  224. return $1;
  225. }, function($ctx1) {$ctx1.fill(self,"isValidFor:",{anObject:anObject},smalltalk.HLCommitPackageCommand.klass)})},
  226. messageSends: ["isPackage"]}),
  227. smalltalk.HLCommitPackageCommand.klass);
  228. smalltalk.addMethod(
  229. "_key",
  230. smalltalk.method({
  231. selector: "key",
  232. fn: function (){
  233. var self=this;
  234. return smalltalk.withContext(function($ctx1) { return (75);
  235. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLCommitPackageCommand.klass)})},
  236. messageSends: []}),
  237. smalltalk.HLCommitPackageCommand.klass);
  238. smalltalk.addMethod(
  239. "_label",
  240. smalltalk.method({
  241. selector: "label",
  242. fn: function (){
  243. var self=this;
  244. return smalltalk.withContext(function($ctx1) { return "Commit package";
  245. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLCommitPackageCommand.klass)})},
  246. messageSends: []}),
  247. smalltalk.HLCommitPackageCommand.klass);
  248. smalltalk.addClass('HLFindCommand', smalltalk.HLBrowserCommand, [], 'Helios-Commands-Browser');
  249. smalltalk.addMethod(
  250. "_key",
  251. smalltalk.method({
  252. selector: "key",
  253. fn: function (){
  254. var self=this;
  255. return smalltalk.withContext(function($ctx1) { return (70);
  256. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLFindCommand.klass)})},
  257. messageSends: []}),
  258. smalltalk.HLFindCommand.klass);
  259. smalltalk.addMethod(
  260. "_label",
  261. smalltalk.method({
  262. selector: "label",
  263. fn: function (){
  264. var self=this;
  265. return smalltalk.withContext(function($ctx1) { return "Find";
  266. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLFindCommand.klass)})},
  267. messageSends: []}),
  268. smalltalk.HLFindCommand.klass);
  269. smalltalk.addClass('HLFindClassCommand', smalltalk.HLFindCommand, [], 'Helios-Commands-Browser');
  270. smalltalk.addMethod(
  271. "_displayLabel",
  272. smalltalk.method({
  273. selector: "displayLabel",
  274. fn: function (){
  275. var self=this;
  276. return smalltalk.withContext(function($ctx1) { return "select a class";
  277. }, function($ctx1) {$ctx1.fill(self,"displayLabel",{},smalltalk.HLFindClassCommand)})},
  278. messageSends: []}),
  279. smalltalk.HLFindClassCommand);
  280. smalltalk.addMethod(
  281. "_execute",
  282. smalltalk.method({
  283. selector: "execute",
  284. fn: function (){
  285. var self=this;
  286. return smalltalk.withContext(function($ctx1) { _st(_st(self)._model())._openClassNamed_(_st(self)._input());
  287. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLFindClassCommand)})},
  288. messageSends: ["openClassNamed:", "input", "model"]}),
  289. smalltalk.HLFindClassCommand);
  290. smalltalk.addMethod(
  291. "_inputCompletion",
  292. smalltalk.method({
  293. selector: "inputCompletion",
  294. fn: function (){
  295. var self=this;
  296. return smalltalk.withContext(function($ctx1) { var $1;
  297. $1=_st(_st(self)._model())._availableClassNames();
  298. return $1;
  299. }, function($ctx1) {$ctx1.fill(self,"inputCompletion",{},smalltalk.HLFindClassCommand)})},
  300. messageSends: ["availableClassNames", "model"]}),
  301. smalltalk.HLFindClassCommand);
  302. smalltalk.addMethod(
  303. "_inputLabel",
  304. smalltalk.method({
  305. selector: "inputLabel",
  306. fn: function (){
  307. var self=this;
  308. return smalltalk.withContext(function($ctx1) { return "Find a class";
  309. }, function($ctx1) {$ctx1.fill(self,"inputLabel",{},smalltalk.HLFindClassCommand)})},
  310. messageSends: []}),
  311. smalltalk.HLFindClassCommand);
  312. smalltalk.addMethod(
  313. "_isInputRequired",
  314. smalltalk.method({
  315. selector: "isInputRequired",
  316. fn: function (){
  317. var self=this;
  318. return smalltalk.withContext(function($ctx1) { return true;
  319. }, function($ctx1) {$ctx1.fill(self,"isInputRequired",{},smalltalk.HLFindClassCommand)})},
  320. messageSends: []}),
  321. smalltalk.HLFindClassCommand);
  322. smalltalk.addMethod(
  323. "_key",
  324. smalltalk.method({
  325. selector: "key",
  326. fn: function (){
  327. var self=this;
  328. return smalltalk.withContext(function($ctx1) { return (67);
  329. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLFindClassCommand.klass)})},
  330. messageSends: []}),
  331. smalltalk.HLFindClassCommand.klass);
  332. smalltalk.addMethod(
  333. "_label",
  334. smalltalk.method({
  335. selector: "label",
  336. fn: function (){
  337. var self=this;
  338. return smalltalk.withContext(function($ctx1) { return "Class";
  339. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLFindClassCommand.klass)})},
  340. messageSends: []}),
  341. smalltalk.HLFindClassCommand.klass);
  342. smalltalk.addClass('HLMoveToCommand', smalltalk.HLBrowserCommand, [], 'Helios-Commands-Browser');
  343. smalltalk.addMethod(
  344. "_key",
  345. smalltalk.method({
  346. selector: "key",
  347. fn: function (){
  348. var self=this;
  349. return smalltalk.withContext(function($ctx1) { return (77);
  350. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLMoveToCommand.klass)})},
  351. messageSends: []}),
  352. smalltalk.HLMoveToCommand.klass);
  353. smalltalk.addMethod(
  354. "_label",
  355. smalltalk.method({
  356. selector: "label",
  357. fn: function (){
  358. var self=this;
  359. return smalltalk.withContext(function($ctx1) { return "Move";
  360. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLMoveToCommand.klass)})},
  361. messageSends: []}),
  362. smalltalk.HLMoveToCommand.klass);
  363. smalltalk.addClass('HLMoveMethodToCommand', smalltalk.HLMoveToCommand, [], 'Helios-Commands-Browser');
  364. smalltalk.addMethod(
  365. "_isActive",
  366. smalltalk.method({
  367. selector: "isActive",
  368. fn: function (){
  369. var self=this;
  370. return smalltalk.withContext(function($ctx1) { var $1;
  371. $1=_st(_st(_st(self)._model())._selectedMethod())._notNil();
  372. return $1;
  373. }, function($ctx1) {$ctx1.fill(self,"isActive",{},smalltalk.HLMoveMethodToCommand)})},
  374. messageSends: ["notNil", "selectedMethod", "model"]}),
  375. smalltalk.HLMoveMethodToCommand);
  376. smalltalk.addMethod(
  377. "_key",
  378. smalltalk.method({
  379. selector: "key",
  380. fn: function (){
  381. var self=this;
  382. return smalltalk.withContext(function($ctx1) { return (77);
  383. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLMoveMethodToCommand.klass)})},
  384. messageSends: []}),
  385. smalltalk.HLMoveMethodToCommand.klass);
  386. smalltalk.addMethod(
  387. "_label",
  388. smalltalk.method({
  389. selector: "label",
  390. fn: function (){
  391. var self=this;
  392. return smalltalk.withContext(function($ctx1) { return "Method";
  393. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLMoveMethodToCommand.klass)})},
  394. messageSends: []}),
  395. smalltalk.HLMoveMethodToCommand.klass);
  396. smalltalk.addClass('HLMoveMethodToClassCommand', smalltalk.HLMoveMethodToCommand, [], 'Helios-Commands-Browser');
  397. smalltalk.addMethod(
  398. "_displayLabel",
  399. smalltalk.method({
  400. selector: "displayLabel",
  401. fn: function (){
  402. var self=this;
  403. return smalltalk.withContext(function($ctx1) { return "select a class";
  404. }, function($ctx1) {$ctx1.fill(self,"displayLabel",{},smalltalk.HLMoveMethodToClassCommand)})},
  405. messageSends: []}),
  406. smalltalk.HLMoveMethodToClassCommand);
  407. smalltalk.addMethod(
  408. "_execute",
  409. smalltalk.method({
  410. selector: "execute",
  411. fn: function (){
  412. var self=this;
  413. return smalltalk.withContext(function($ctx1) { _st(_st(self)._model())._moveMethodToClass_(_st(self)._input());
  414. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLMoveMethodToClassCommand)})},
  415. messageSends: ["moveMethodToClass:", "input", "model"]}),
  416. smalltalk.HLMoveMethodToClassCommand);
  417. smalltalk.addMethod(
  418. "_inputCompletion",
  419. smalltalk.method({
  420. selector: "inputCompletion",
  421. fn: function (){
  422. var self=this;
  423. return smalltalk.withContext(function($ctx1) { var $1;
  424. $1=_st(_st(self)._model())._availableClassNames();
  425. return $1;
  426. }, function($ctx1) {$ctx1.fill(self,"inputCompletion",{},smalltalk.HLMoveMethodToClassCommand)})},
  427. messageSends: ["availableClassNames", "model"]}),
  428. smalltalk.HLMoveMethodToClassCommand);
  429. smalltalk.addMethod(
  430. "_inputLabel",
  431. smalltalk.method({
  432. selector: "inputLabel",
  433. fn: function (){
  434. var self=this;
  435. return smalltalk.withContext(function($ctx1) { return "Move method to class:";
  436. }, function($ctx1) {$ctx1.fill(self,"inputLabel",{},smalltalk.HLMoveMethodToClassCommand)})},
  437. messageSends: []}),
  438. smalltalk.HLMoveMethodToClassCommand);
  439. smalltalk.addMethod(
  440. "_isInputRequired",
  441. smalltalk.method({
  442. selector: "isInputRequired",
  443. fn: function (){
  444. var self=this;
  445. return smalltalk.withContext(function($ctx1) { return true;
  446. }, function($ctx1) {$ctx1.fill(self,"isInputRequired",{},smalltalk.HLMoveMethodToClassCommand)})},
  447. messageSends: []}),
  448. smalltalk.HLMoveMethodToClassCommand);
  449. smalltalk.addMethod(
  450. "_isValidFor_",
  451. smalltalk.method({
  452. selector: "isValidFor:",
  453. fn: function (anObject){
  454. var self=this;
  455. return smalltalk.withContext(function($ctx1) {
  456. var $1;
  457. $1=_st(anObject)._isCompiledMethod();
  458. return $1;
  459. }, function($ctx1) {$ctx1.fill(self,"isValidFor:",{anObject:anObject},smalltalk.HLMoveMethodToClassCommand.klass)})},
  460. messageSends: ["isCompiledMethod"]}),
  461. smalltalk.HLMoveMethodToClassCommand.klass);
  462. smalltalk.addMethod(
  463. "_key",
  464. smalltalk.method({
  465. selector: "key",
  466. fn: function (){
  467. var self=this;
  468. return smalltalk.withContext(function($ctx1) { return (67);
  469. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLMoveMethodToClassCommand.klass)})},
  470. messageSends: []}),
  471. smalltalk.HLMoveMethodToClassCommand.klass);
  472. smalltalk.addMethod(
  473. "_label",
  474. smalltalk.method({
  475. selector: "label",
  476. fn: function (){
  477. var self=this;
  478. return smalltalk.withContext(function($ctx1) { return "to class";
  479. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLMoveMethodToClassCommand.klass)})},
  480. messageSends: []}),
  481. smalltalk.HLMoveMethodToClassCommand.klass);
  482. smalltalk.addMethod(
  483. "_menuLabel",
  484. smalltalk.method({
  485. selector: "menuLabel",
  486. fn: function (){
  487. var self=this;
  488. return smalltalk.withContext(function($ctx1) {
  489. return "Move to class...";
  490. }, function($ctx1) {$ctx1.fill(self,"menuLabel",{},smalltalk.HLMoveMethodToClassCommand.klass)})},
  491. messageSends: []}),
  492. smalltalk.HLMoveMethodToClassCommand.klass);
  493. smalltalk.addClass('HLMoveMethodToProtocolCommand', smalltalk.HLMoveMethodToCommand, [], 'Helios-Commands-Browser');
  494. smalltalk.addMethod(
  495. "_displayLabel",
  496. smalltalk.method({
  497. selector: "displayLabel",
  498. fn: function (){
  499. var self=this;
  500. return smalltalk.withContext(function($ctx1) { return "select a protocol";
  501. }, function($ctx1) {$ctx1.fill(self,"displayLabel",{},smalltalk.HLMoveMethodToProtocolCommand)})},
  502. messageSends: []}),
  503. smalltalk.HLMoveMethodToProtocolCommand);
  504. smalltalk.addMethod(
  505. "_execute",
  506. smalltalk.method({
  507. selector: "execute",
  508. fn: function (){
  509. var self=this;
  510. return smalltalk.withContext(function($ctx1) { _st(_st(self)._model())._moveMethodToProtocol_(_st(self)._input());
  511. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLMoveMethodToProtocolCommand)})},
  512. messageSends: ["moveMethodToProtocol:", "input", "model"]}),
  513. smalltalk.HLMoveMethodToProtocolCommand);
  514. smalltalk.addMethod(
  515. "_inputCompletion",
  516. smalltalk.method({
  517. selector: "inputCompletion",
  518. fn: function (){
  519. var self=this;
  520. return smalltalk.withContext(function($ctx1) { var $1;
  521. $1=_st(_st(self)._model())._availableProtocols();
  522. return $1;
  523. }, function($ctx1) {$ctx1.fill(self,"inputCompletion",{},smalltalk.HLMoveMethodToProtocolCommand)})},
  524. messageSends: ["availableProtocols", "model"]}),
  525. smalltalk.HLMoveMethodToProtocolCommand);
  526. smalltalk.addMethod(
  527. "_inputLabel",
  528. smalltalk.method({
  529. selector: "inputLabel",
  530. fn: function (){
  531. var self=this;
  532. return smalltalk.withContext(function($ctx1) { return "Move method to a protocol:";
  533. }, function($ctx1) {$ctx1.fill(self,"inputLabel",{},smalltalk.HLMoveMethodToProtocolCommand)})},
  534. messageSends: []}),
  535. smalltalk.HLMoveMethodToProtocolCommand);
  536. smalltalk.addMethod(
  537. "_isInputRequired",
  538. smalltalk.method({
  539. selector: "isInputRequired",
  540. fn: function (){
  541. var self=this;
  542. return smalltalk.withContext(function($ctx1) { return true;
  543. }, function($ctx1) {$ctx1.fill(self,"isInputRequired",{},smalltalk.HLMoveMethodToProtocolCommand)})},
  544. messageSends: []}),
  545. smalltalk.HLMoveMethodToProtocolCommand);
  546. smalltalk.addMethod(
  547. "_isValidFor_",
  548. smalltalk.method({
  549. selector: "isValidFor:",
  550. fn: function (anObject){
  551. var self=this;
  552. return smalltalk.withContext(function($ctx1) {
  553. var $1;
  554. $1=_st(anObject)._isCompiledMethod();
  555. return $1;
  556. }, function($ctx1) {$ctx1.fill(self,"isValidFor:",{anObject:anObject},smalltalk.HLMoveMethodToProtocolCommand.klass)})},
  557. messageSends: ["isCompiledMethod"]}),
  558. smalltalk.HLMoveMethodToProtocolCommand.klass);
  559. smalltalk.addMethod(
  560. "_key",
  561. smalltalk.method({
  562. selector: "key",
  563. fn: function (){
  564. var self=this;
  565. return smalltalk.withContext(function($ctx1) { return (84);
  566. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLMoveMethodToProtocolCommand.klass)})},
  567. messageSends: []}),
  568. smalltalk.HLMoveMethodToProtocolCommand.klass);
  569. smalltalk.addMethod(
  570. "_label",
  571. smalltalk.method({
  572. selector: "label",
  573. fn: function (){
  574. var self=this;
  575. return smalltalk.withContext(function($ctx1) { return "to protocol";
  576. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLMoveMethodToProtocolCommand.klass)})},
  577. messageSends: []}),
  578. smalltalk.HLMoveMethodToProtocolCommand.klass);
  579. smalltalk.addMethod(
  580. "_menuLabel",
  581. smalltalk.method({
  582. selector: "menuLabel",
  583. fn: function (){
  584. var self=this;
  585. return smalltalk.withContext(function($ctx1) {
  586. return "Move to protocol...";
  587. }, function($ctx1) {$ctx1.fill(self,"menuLabel",{},smalltalk.HLMoveMethodToProtocolCommand.klass)})},
  588. messageSends: []}),
  589. smalltalk.HLMoveMethodToProtocolCommand.klass);
  590. smalltalk.addClass('HLRemoveCommand', smalltalk.HLBrowserCommand, [], 'Helios-Commands-Browser');
  591. smalltalk.addMethod(
  592. "_key",
  593. smalltalk.method({
  594. selector: "key",
  595. fn: function (){
  596. var self=this;
  597. return smalltalk.withContext(function($ctx1) { return (88);
  598. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLRemoveCommand.klass)})},
  599. messageSends: []}),
  600. smalltalk.HLRemoveCommand.klass);
  601. smalltalk.addMethod(
  602. "_label",
  603. smalltalk.method({
  604. selector: "label",
  605. fn: function (){
  606. var self=this;
  607. return smalltalk.withContext(function($ctx1) { return "Remove";
  608. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLRemoveCommand.klass)})},
  609. messageSends: []}),
  610. smalltalk.HLRemoveCommand.klass);
  611. smalltalk.addClass('HLRemoveMethodCommand', smalltalk.HLRemoveCommand, [], 'Helios-Commands-Browser');
  612. smalltalk.addMethod(
  613. "_execute",
  614. smalltalk.method({
  615. selector: "execute",
  616. fn: function (){
  617. var self=this;
  618. return smalltalk.withContext(function($ctx1) { _st(_st(self)._model())._removeMethod();
  619. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLRemoveMethodCommand)})},
  620. messageSends: ["removeMethod", "model"]}),
  621. smalltalk.HLRemoveMethodCommand);
  622. smalltalk.addMethod(
  623. "_isActive",
  624. smalltalk.method({
  625. selector: "isActive",
  626. fn: function (){
  627. var self=this;
  628. return smalltalk.withContext(function($ctx1) { var $1;
  629. $1=_st(_st(_st(self)._model())._selectedMethod())._notNil();
  630. return $1;
  631. }, function($ctx1) {$ctx1.fill(self,"isActive",{},smalltalk.HLRemoveMethodCommand)})},
  632. messageSends: ["notNil", "selectedMethod", "model"]}),
  633. smalltalk.HLRemoveMethodCommand);
  634. smalltalk.addMethod(
  635. "_isValidFor_",
  636. smalltalk.method({
  637. selector: "isValidFor:",
  638. fn: function (anObject){
  639. var self=this;
  640. return smalltalk.withContext(function($ctx1) {
  641. var $1;
  642. $1=_st(anObject)._isCompiledMethod();
  643. return $1;
  644. }, function($ctx1) {$ctx1.fill(self,"isValidFor:",{anObject:anObject},smalltalk.HLRemoveMethodCommand.klass)})},
  645. messageSends: ["isCompiledMethod"]}),
  646. smalltalk.HLRemoveMethodCommand.klass);
  647. smalltalk.addMethod(
  648. "_key",
  649. smalltalk.method({
  650. selector: "key",
  651. fn: function (){
  652. var self=this;
  653. return smalltalk.withContext(function($ctx1) { return (77);
  654. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLRemoveMethodCommand.klass)})},
  655. messageSends: []}),
  656. smalltalk.HLRemoveMethodCommand.klass);
  657. smalltalk.addMethod(
  658. "_label",
  659. smalltalk.method({
  660. selector: "label",
  661. fn: function (){
  662. var self=this;
  663. return smalltalk.withContext(function($ctx1) { return "Method";
  664. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLRemoveMethodCommand.klass)})},
  665. messageSends: []}),
  666. smalltalk.HLRemoveMethodCommand.klass);
  667. smalltalk.addMethod(
  668. "_menuLabel",
  669. smalltalk.method({
  670. selector: "menuLabel",
  671. fn: function (){
  672. var self=this;
  673. return smalltalk.withContext(function($ctx1) {
  674. return "Remove method";
  675. }, function($ctx1) {$ctx1.fill(self,"menuLabel",{},smalltalk.HLRemoveMethodCommand.klass)})},
  676. messageSends: []}),
  677. smalltalk.HLRemoveMethodCommand.klass);
  678. smalltalk.addClass('HLToggleCommand', smalltalk.HLBrowserCommand, [], 'Helios-Commands-Browser');
  679. smalltalk.addMethod(
  680. "_key",
  681. smalltalk.method({
  682. selector: "key",
  683. fn: function (){
  684. var self=this;
  685. return smalltalk.withContext(function($ctx1) { return (84);
  686. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLToggleCommand.klass)})},
  687. messageSends: []}),
  688. smalltalk.HLToggleCommand.klass);
  689. smalltalk.addMethod(
  690. "_label",
  691. smalltalk.method({
  692. selector: "label",
  693. fn: function (){
  694. var self=this;
  695. return smalltalk.withContext(function($ctx1) { return "Toggle";
  696. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLToggleCommand.klass)})},
  697. messageSends: []}),
  698. smalltalk.HLToggleCommand.klass);
  699. smalltalk.addClass('HLToggleClassSideCommand', smalltalk.HLToggleCommand, [], 'Helios-Commands-Browser');
  700. smalltalk.addMethod(
  701. "_execute",
  702. smalltalk.method({
  703. selector: "execute",
  704. fn: function (){
  705. var self=this;
  706. return smalltalk.withContext(function($ctx1) { _st(_st(self)._model())._showInstance_(false);
  707. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLToggleClassSideCommand)})},
  708. messageSends: ["showInstance:", "model"]}),
  709. smalltalk.HLToggleClassSideCommand);
  710. smalltalk.addMethod(
  711. "_key",
  712. smalltalk.method({
  713. selector: "key",
  714. fn: function (){
  715. var self=this;
  716. return smalltalk.withContext(function($ctx1) { return (67);
  717. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLToggleClassSideCommand.klass)})},
  718. messageSends: []}),
  719. smalltalk.HLToggleClassSideCommand.klass);
  720. smalltalk.addMethod(
  721. "_label",
  722. smalltalk.method({
  723. selector: "label",
  724. fn: function (){
  725. var self=this;
  726. return smalltalk.withContext(function($ctx1) { return "Class side";
  727. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLToggleClassSideCommand.klass)})},
  728. messageSends: []}),
  729. smalltalk.HLToggleClassSideCommand.klass);
  730. smalltalk.addClass('HLToggleInstanceSideCommand', smalltalk.HLToggleCommand, [], 'Helios-Commands-Browser');
  731. smalltalk.addMethod(
  732. "_execute",
  733. smalltalk.method({
  734. selector: "execute",
  735. fn: function (){
  736. var self=this;
  737. return smalltalk.withContext(function($ctx1) { _st(_st(self)._model())._showInstance_(true);
  738. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLToggleInstanceSideCommand)})},
  739. messageSends: ["showInstance:", "model"]}),
  740. smalltalk.HLToggleInstanceSideCommand);
  741. smalltalk.addMethod(
  742. "_key",
  743. smalltalk.method({
  744. selector: "key",
  745. fn: function (){
  746. var self=this;
  747. return smalltalk.withContext(function($ctx1) { return (73);
  748. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLToggleInstanceSideCommand.klass)})},
  749. messageSends: []}),
  750. smalltalk.HLToggleInstanceSideCommand.klass);
  751. smalltalk.addMethod(
  752. "_label",
  753. smalltalk.method({
  754. selector: "label",
  755. fn: function (){
  756. var self=this;
  757. return smalltalk.withContext(function($ctx1) { return "Instance side";
  758. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLToggleInstanceSideCommand.klass)})},
  759. messageSends: []}),
  760. smalltalk.HLToggleInstanceSideCommand.klass);