Helios-Commands-Browser.deploy.js 14 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457
  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('HLMoveToCommand', smalltalk.HLBrowserCommand, [], 'Helios-Commands-Browser');
  195. smalltalk.addMethod(
  196. "_key",
  197. smalltalk.method({
  198. selector: "key",
  199. fn: function (){
  200. var self=this;
  201. return smalltalk.withContext(function($ctx1) { return (77);
  202. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLMoveToCommand.klass)})},
  203. messageSends: []}),
  204. smalltalk.HLMoveToCommand.klass);
  205. smalltalk.addMethod(
  206. "_label",
  207. smalltalk.method({
  208. selector: "label",
  209. fn: function (){
  210. var self=this;
  211. return smalltalk.withContext(function($ctx1) { return "Move";
  212. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLMoveToCommand.klass)})},
  213. messageSends: []}),
  214. smalltalk.HLMoveToCommand.klass);
  215. smalltalk.addClass('HLMoveMethodToCommand', smalltalk.HLMoveToCommand, [], 'Helios-Commands-Browser');
  216. smalltalk.addMethod(
  217. "_activeBlock",
  218. smalltalk.method({
  219. selector: "activeBlock",
  220. fn: function (){
  221. var self=this;
  222. return smalltalk.withContext(function($ctx1) { var $1;
  223. $1=(function(){
  224. return smalltalk.withContext(function($ctx2) { return _st(_st(_st(self)._model())._selectedMethod())._notNil();
  225. }, function($ctx2) {$ctx2.fillBlock({},$ctx1)})});
  226. return $1;
  227. }, function($ctx1) {$ctx1.fill(self,"activeBlock",{},smalltalk.HLMoveMethodToCommand)})},
  228. messageSends: ["notNil", "selectedMethod", "model"]}),
  229. smalltalk.HLMoveMethodToCommand);
  230. smalltalk.addMethod(
  231. "_key",
  232. smalltalk.method({
  233. selector: "key",
  234. fn: function (){
  235. var self=this;
  236. return smalltalk.withContext(function($ctx1) { return (77);
  237. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLMoveMethodToCommand.klass)})},
  238. messageSends: []}),
  239. smalltalk.HLMoveMethodToCommand.klass);
  240. smalltalk.addMethod(
  241. "_label",
  242. smalltalk.method({
  243. selector: "label",
  244. fn: function (){
  245. var self=this;
  246. return smalltalk.withContext(function($ctx1) { return "Method";
  247. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLMoveMethodToCommand.klass)})},
  248. messageSends: []}),
  249. smalltalk.HLMoveMethodToCommand.klass);
  250. smalltalk.addClass('HLMoveMethodToClassCommand', smalltalk.HLMoveMethodToCommand, [], 'Helios-Commands-Browser');
  251. smalltalk.addMethod(
  252. "_execute",
  253. smalltalk.method({
  254. selector: "execute",
  255. fn: function (){
  256. var self=this;
  257. return smalltalk.withContext(function($ctx1) { return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLMoveMethodToClassCommand)})},
  258. messageSends: []}),
  259. smalltalk.HLMoveMethodToClassCommand);
  260. smalltalk.addMethod(
  261. "_key",
  262. smalltalk.method({
  263. selector: "key",
  264. fn: function (){
  265. var self=this;
  266. return smalltalk.withContext(function($ctx1) { return (67);
  267. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLMoveMethodToClassCommand.klass)})},
  268. messageSends: []}),
  269. smalltalk.HLMoveMethodToClassCommand.klass);
  270. smalltalk.addMethod(
  271. "_label",
  272. smalltalk.method({
  273. selector: "label",
  274. fn: function (){
  275. var self=this;
  276. return smalltalk.withContext(function($ctx1) { return "to class";
  277. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLMoveMethodToClassCommand.klass)})},
  278. messageSends: []}),
  279. smalltalk.HLMoveMethodToClassCommand.klass);
  280. smalltalk.addClass('HLMoveMethodToProtocolCommand', smalltalk.HLMoveMethodToCommand, [], 'Helios-Commands-Browser');
  281. smalltalk.addMethod(
  282. "_execute",
  283. smalltalk.method({
  284. selector: "execute",
  285. fn: function (){
  286. var self=this;
  287. return smalltalk.withContext(function($ctx1) { return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLMoveMethodToProtocolCommand)})},
  288. messageSends: []}),
  289. smalltalk.HLMoveMethodToProtocolCommand);
  290. smalltalk.addMethod(
  291. "_key",
  292. smalltalk.method({
  293. selector: "key",
  294. fn: function (){
  295. var self=this;
  296. return smalltalk.withContext(function($ctx1) { return (84);
  297. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLMoveMethodToProtocolCommand.klass)})},
  298. messageSends: []}),
  299. smalltalk.HLMoveMethodToProtocolCommand.klass);
  300. smalltalk.addMethod(
  301. "_label",
  302. smalltalk.method({
  303. selector: "label",
  304. fn: function (){
  305. var self=this;
  306. return smalltalk.withContext(function($ctx1) { return "to protocol";
  307. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLMoveMethodToProtocolCommand.klass)})},
  308. messageSends: []}),
  309. smalltalk.HLMoveMethodToProtocolCommand.klass);
  310. smalltalk.addClass('HLToggleCommand', smalltalk.HLBrowserCommand, [], 'Helios-Commands-Browser');
  311. smalltalk.addMethod(
  312. "_key",
  313. smalltalk.method({
  314. selector: "key",
  315. fn: function (){
  316. var self=this;
  317. return smalltalk.withContext(function($ctx1) { return (84);
  318. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLToggleCommand.klass)})},
  319. messageSends: []}),
  320. smalltalk.HLToggleCommand.klass);
  321. smalltalk.addMethod(
  322. "_label",
  323. smalltalk.method({
  324. selector: "label",
  325. fn: function (){
  326. var self=this;
  327. return smalltalk.withContext(function($ctx1) { return "Toggle";
  328. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLToggleCommand.klass)})},
  329. messageSends: []}),
  330. smalltalk.HLToggleCommand.klass);
  331. smalltalk.addClass('HLToggleClassSideCommand', smalltalk.HLToggleCommand, [], 'Helios-Commands-Browser');
  332. smalltalk.addMethod(
  333. "_execute",
  334. smalltalk.method({
  335. selector: "execute",
  336. fn: function (){
  337. var self=this;
  338. return smalltalk.withContext(function($ctx1) { _st(_st(self)._model())._showInstance_(false);
  339. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLToggleClassSideCommand)})},
  340. messageSends: ["showInstance:", "model"]}),
  341. smalltalk.HLToggleClassSideCommand);
  342. smalltalk.addMethod(
  343. "_key",
  344. smalltalk.method({
  345. selector: "key",
  346. fn: function (){
  347. var self=this;
  348. return smalltalk.withContext(function($ctx1) { return (67);
  349. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLToggleClassSideCommand.klass)})},
  350. messageSends: []}),
  351. smalltalk.HLToggleClassSideCommand.klass);
  352. smalltalk.addMethod(
  353. "_label",
  354. smalltalk.method({
  355. selector: "label",
  356. fn: function (){
  357. var self=this;
  358. return smalltalk.withContext(function($ctx1) { return "Class side";
  359. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLToggleClassSideCommand.klass)})},
  360. messageSends: []}),
  361. smalltalk.HLToggleClassSideCommand.klass);
  362. smalltalk.addClass('HLToggleInstanceSideCommand', smalltalk.HLToggleCommand, [], 'Helios-Commands-Browser');
  363. smalltalk.addMethod(
  364. "_execute",
  365. smalltalk.method({
  366. selector: "execute",
  367. fn: function (){
  368. var self=this;
  369. return smalltalk.withContext(function($ctx1) { _st(_st(self)._model())._showInstance_(true);
  370. return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLToggleInstanceSideCommand)})},
  371. messageSends: ["showInstance:", "model"]}),
  372. smalltalk.HLToggleInstanceSideCommand);
  373. smalltalk.addMethod(
  374. "_key",
  375. smalltalk.method({
  376. selector: "key",
  377. fn: function (){
  378. var self=this;
  379. return smalltalk.withContext(function($ctx1) { return (73);
  380. }, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLToggleInstanceSideCommand.klass)})},
  381. messageSends: []}),
  382. smalltalk.HLToggleInstanceSideCommand.klass);
  383. smalltalk.addMethod(
  384. "_label",
  385. smalltalk.method({
  386. selector: "label",
  387. fn: function (){
  388. var self=this;
  389. return smalltalk.withContext(function($ctx1) { return "Instance side";
  390. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLToggleInstanceSideCommand.klass)})},
  391. messageSends: []}),
  392. smalltalk.HLToggleInstanceSideCommand.klass);