Helios-Commands-SUnit.js 16 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624
  1. define(["amber/boot", "helios/Helios-Commands-Tools"], function($boot){"use strict";
  2. if(!$boot.nilAsReceiver)$boot.nilAsReceiver=$boot.nil;
  3. if(!("nilAsValue" in $boot))$boot.nilAsValue=$boot.nilAsReceiver;
  4. var $core=$boot.api,nil=$boot.nilAsValue,$nil=$boot.nilAsReceiver,$recv=$boot.asReceiver,$globals=$boot.globals;
  5. if(!$boot.nilAsClass)$boot.nilAsClass=$boot.dnu;
  6. $core.addPackage("Helios-Commands-SUnit");
  7. $core.packages["Helios-Commands-SUnit"].innerEval = function (expr) { return eval(expr); };
  8. $core.packages["Helios-Commands-SUnit"].transport = {"type":"amd","amdNamespace":"helios"};
  9. $core.addClass("HLSUnitCommand", $globals.HLToolCommand, [], "Helios-Commands-SUnit");
  10. //>>excludeStart("ide", pragmas.excludeIdeData);
  11. $globals.HLSUnitCommand.comment="I group the commands pertaining to Helios-SUnit (`HLSUnitModel`)";
  12. //>>excludeEnd("ide");
  13. $core.addMethod(
  14. $core.method({
  15. selector: "isValidFor:",
  16. protocol: "testing",
  17. fn: function (aModel){
  18. var self=this,$self=this;
  19. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  20. return $core.withContext(function($ctx1) {
  21. //>>excludeEnd("ctx");
  22. return $recv(aModel)._isKindOf_($globals.HLSUnitModel);
  23. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  24. }, function($ctx1) {$ctx1.fill(self,"isValidFor:",{aModel:aModel},$globals.HLSUnitCommand.a$cls)});
  25. //>>excludeEnd("ctx");
  26. },
  27. //>>excludeStart("ide", pragmas.excludeIdeData);
  28. args: ["aModel"],
  29. source: "isValidFor: aModel\x0a\x09^ aModel isKindOf: HLSUnitModel",
  30. referencedClasses: ["HLSUnitModel"],
  31. //>>excludeEnd("ide");
  32. messageSends: ["isKindOf:"]
  33. }),
  34. $globals.HLSUnitCommand.a$cls);
  35. $core.addClass("HLSUnitInvertSelectedCommand", $globals.HLSUnitCommand, [], "Helios-Commands-SUnit");
  36. //>>excludeStart("ide", pragmas.excludeIdeData);
  37. $globals.HLSUnitInvertSelectedCommand.comment="I group the commands that invert selections";
  38. //>>excludeEnd("ide");
  39. $core.addMethod(
  40. $core.method({
  41. selector: "key",
  42. protocol: "accessing",
  43. fn: function (){
  44. var self=this,$self=this;
  45. return "i";
  46. },
  47. //>>excludeStart("ide", pragmas.excludeIdeData);
  48. args: [],
  49. source: "key\x0a\x09^ 'i'",
  50. referencedClasses: [],
  51. //>>excludeEnd("ide");
  52. messageSends: []
  53. }),
  54. $globals.HLSUnitInvertSelectedCommand.a$cls);
  55. $core.addMethod(
  56. $core.method({
  57. selector: "label",
  58. protocol: "accessing",
  59. fn: function (){
  60. var self=this,$self=this;
  61. return "Invert selection";
  62. },
  63. //>>excludeStart("ide", pragmas.excludeIdeData);
  64. args: [],
  65. source: "label\x0a\x09^'Invert selection'",
  66. referencedClasses: [],
  67. //>>excludeEnd("ide");
  68. messageSends: []
  69. }),
  70. $globals.HLSUnitInvertSelectedCommand.a$cls);
  71. $core.addClass("HLSUnitInvertSelectedClassesCommand", $globals.HLSUnitInvertSelectedCommand, [], "Helios-Commands-SUnit");
  72. //>>excludeStart("ide", pragmas.excludeIdeData);
  73. $globals.HLSUnitInvertSelectedClassesCommand.comment="Invert the currently selected classes on a `HLSUnitModel`";
  74. //>>excludeEnd("ide");
  75. $core.addMethod(
  76. $core.method({
  77. selector: "category",
  78. protocol: "accessing",
  79. fn: function (){
  80. var self=this,$self=this;
  81. return "Classes";
  82. },
  83. //>>excludeStart("ide", pragmas.excludeIdeData);
  84. args: [],
  85. source: "category\x0a\x09^'Classes'",
  86. referencedClasses: [],
  87. //>>excludeEnd("ide");
  88. messageSends: []
  89. }),
  90. $globals.HLSUnitInvertSelectedClassesCommand);
  91. $core.addMethod(
  92. $core.method({
  93. selector: "execute",
  94. protocol: "executing",
  95. fn: function (){
  96. var self=this,$self=this;
  97. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  98. return $core.withContext(function($ctx1) {
  99. //>>excludeEnd("ctx");
  100. $recv($self._model())._invertSelectedClasses();
  101. return self;
  102. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  103. }, function($ctx1) {$ctx1.fill(self,"execute",{},$globals.HLSUnitInvertSelectedClassesCommand)});
  104. //>>excludeEnd("ctx");
  105. },
  106. //>>excludeStart("ide", pragmas.excludeIdeData);
  107. args: [],
  108. source: "execute\x0a\x09self model invertSelectedClasses",
  109. referencedClasses: [],
  110. //>>excludeEnd("ide");
  111. messageSends: ["invertSelectedClasses", "model"]
  112. }),
  113. $globals.HLSUnitInvertSelectedClassesCommand);
  114. $core.addMethod(
  115. $core.method({
  116. selector: "isActive",
  117. protocol: "testing",
  118. fn: function (){
  119. var self=this,$self=this;
  120. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  121. return $core.withContext(function($ctx1) {
  122. //>>excludeEnd("ctx");
  123. return $recv($recv($self["@model"])._selectedPackages())._notEmpty();
  124. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  125. }, function($ctx1) {$ctx1.fill(self,"isActive",{},$globals.HLSUnitInvertSelectedClassesCommand)});
  126. //>>excludeEnd("ctx");
  127. },
  128. //>>excludeStart("ide", pragmas.excludeIdeData);
  129. args: [],
  130. source: "isActive\x0a\x09^model selectedPackages notEmpty",
  131. referencedClasses: [],
  132. //>>excludeEnd("ide");
  133. messageSends: ["notEmpty", "selectedPackages"]
  134. }),
  135. $globals.HLSUnitInvertSelectedClassesCommand);
  136. $core.addMethod(
  137. $core.method({
  138. selector: "key",
  139. protocol: "accessing",
  140. fn: function (){
  141. var self=this,$self=this;
  142. return "c";
  143. },
  144. //>>excludeStart("ide", pragmas.excludeIdeData);
  145. args: [],
  146. source: "key\x0a\x09^ 'c'",
  147. referencedClasses: [],
  148. //>>excludeEnd("ide");
  149. messageSends: []
  150. }),
  151. $globals.HLSUnitInvertSelectedClassesCommand.a$cls);
  152. $core.addMethod(
  153. $core.method({
  154. selector: "label",
  155. protocol: "accessing",
  156. fn: function (){
  157. var self=this,$self=this;
  158. return "Invert selected classes";
  159. },
  160. //>>excludeStart("ide", pragmas.excludeIdeData);
  161. args: [],
  162. source: "label\x0a\x09^ 'Invert selected classes'",
  163. referencedClasses: [],
  164. //>>excludeEnd("ide");
  165. messageSends: []
  166. }),
  167. $globals.HLSUnitInvertSelectedClassesCommand.a$cls);
  168. $core.addClass("HLSUnitInvertSelectedPackagesCommand", $globals.HLSUnitInvertSelectedCommand, [], "Helios-Commands-SUnit");
  169. //>>excludeStart("ide", pragmas.excludeIdeData);
  170. $globals.HLSUnitInvertSelectedPackagesCommand.comment="Invert the currently selected packages on a `HLSUnitModel`";
  171. //>>excludeEnd("ide");
  172. $core.addMethod(
  173. $core.method({
  174. selector: "category",
  175. protocol: "accessing",
  176. fn: function (){
  177. var self=this,$self=this;
  178. return "Packages";
  179. },
  180. //>>excludeStart("ide", pragmas.excludeIdeData);
  181. args: [],
  182. source: "category\x0a\x09^'Packages'",
  183. referencedClasses: [],
  184. //>>excludeEnd("ide");
  185. messageSends: []
  186. }),
  187. $globals.HLSUnitInvertSelectedPackagesCommand);
  188. $core.addMethod(
  189. $core.method({
  190. selector: "execute",
  191. protocol: "executing",
  192. fn: function (){
  193. var self=this,$self=this;
  194. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  195. return $core.withContext(function($ctx1) {
  196. //>>excludeEnd("ctx");
  197. $recv($self._model())._invertSelectedPackages();
  198. return self;
  199. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  200. }, function($ctx1) {$ctx1.fill(self,"execute",{},$globals.HLSUnitInvertSelectedPackagesCommand)});
  201. //>>excludeEnd("ctx");
  202. },
  203. //>>excludeStart("ide", pragmas.excludeIdeData);
  204. args: [],
  205. source: "execute\x0a\x09self model invertSelectedPackages",
  206. referencedClasses: [],
  207. //>>excludeEnd("ide");
  208. messageSends: ["invertSelectedPackages", "model"]
  209. }),
  210. $globals.HLSUnitInvertSelectedPackagesCommand);
  211. $core.addMethod(
  212. $core.method({
  213. selector: "isActive",
  214. protocol: "testing",
  215. fn: function (){
  216. var self=this,$self=this;
  217. return true;
  218. },
  219. //>>excludeStart("ide", pragmas.excludeIdeData);
  220. args: [],
  221. source: "isActive\x0a\x09^true",
  222. referencedClasses: [],
  223. //>>excludeEnd("ide");
  224. messageSends: []
  225. }),
  226. $globals.HLSUnitInvertSelectedPackagesCommand);
  227. $core.addMethod(
  228. $core.method({
  229. selector: "key",
  230. protocol: "accessing",
  231. fn: function (){
  232. var self=this,$self=this;
  233. return "p";
  234. },
  235. //>>excludeStart("ide", pragmas.excludeIdeData);
  236. args: [],
  237. source: "key\x0a\x09^ 'p'",
  238. referencedClasses: [],
  239. //>>excludeEnd("ide");
  240. messageSends: []
  241. }),
  242. $globals.HLSUnitInvertSelectedPackagesCommand.a$cls);
  243. $core.addMethod(
  244. $core.method({
  245. selector: "label",
  246. protocol: "accessing",
  247. fn: function (){
  248. var self=this,$self=this;
  249. return "Invert selected packages";
  250. },
  251. //>>excludeStart("ide", pragmas.excludeIdeData);
  252. args: [],
  253. source: "label\x0a\x09^ 'Invert selected packages'",
  254. referencedClasses: [],
  255. //>>excludeEnd("ide");
  256. messageSends: []
  257. }),
  258. $globals.HLSUnitInvertSelectedPackagesCommand.a$cls);
  259. $core.addClass("HLSUnitRunTests", $globals.HLSUnitCommand, [], "Helios-Commands-SUnit");
  260. //>>excludeStart("ide", pragmas.excludeIdeData);
  261. $globals.HLSUnitRunTests.comment="Run the test cases in the currently selected classes on a `HLSUnitModel`";
  262. //>>excludeEnd("ide");
  263. $core.addMethod(
  264. $core.method({
  265. selector: "execute",
  266. protocol: "executing",
  267. fn: function (){
  268. var self=this,$self=this;
  269. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  270. return $core.withContext(function($ctx1) {
  271. //>>excludeEnd("ctx");
  272. $recv($self._model())._runTests();
  273. return self;
  274. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  275. }, function($ctx1) {$ctx1.fill(self,"execute",{},$globals.HLSUnitRunTests)});
  276. //>>excludeEnd("ctx");
  277. },
  278. //>>excludeStart("ide", pragmas.excludeIdeData);
  279. args: [],
  280. source: "execute\x0a\x09self model runTests",
  281. referencedClasses: [],
  282. //>>excludeEnd("ide");
  283. messageSends: ["runTests", "model"]
  284. }),
  285. $globals.HLSUnitRunTests);
  286. $core.addMethod(
  287. $core.method({
  288. selector: "isActive",
  289. protocol: "testing",
  290. fn: function (){
  291. var self=this,$self=this;
  292. return true;
  293. },
  294. //>>excludeStart("ide", pragmas.excludeIdeData);
  295. args: [],
  296. source: "isActive\x0a\x09^true",
  297. referencedClasses: [],
  298. //>>excludeEnd("ide");
  299. messageSends: []
  300. }),
  301. $globals.HLSUnitRunTests);
  302. $core.addMethod(
  303. $core.method({
  304. selector: "key",
  305. protocol: "accessing",
  306. fn: function (){
  307. var self=this,$self=this;
  308. return "r";
  309. },
  310. //>>excludeStart("ide", pragmas.excludeIdeData);
  311. args: [],
  312. source: "key\x0a\x09^'r'",
  313. referencedClasses: [],
  314. //>>excludeEnd("ide");
  315. messageSends: []
  316. }),
  317. $globals.HLSUnitRunTests.a$cls);
  318. $core.addMethod(
  319. $core.method({
  320. selector: "label",
  321. protocol: "accessing",
  322. fn: function (){
  323. var self=this,$self=this;
  324. return "Run Tests";
  325. },
  326. //>>excludeStart("ide", pragmas.excludeIdeData);
  327. args: [],
  328. source: "label\x0a\x09^'Run Tests'",
  329. referencedClasses: [],
  330. //>>excludeEnd("ide");
  331. messageSends: []
  332. }),
  333. $globals.HLSUnitRunTests.a$cls);
  334. $core.addClass("HLSUnitSelectAllCommand", $globals.HLSUnitCommand, [], "Helios-Commands-SUnit");
  335. //>>excludeStart("ide", pragmas.excludeIdeData);
  336. $globals.HLSUnitSelectAllCommand.comment="I group the select all commands";
  337. //>>excludeEnd("ide");
  338. $core.addMethod(
  339. $core.method({
  340. selector: "key",
  341. protocol: "accessing",
  342. fn: function (){
  343. var self=this,$self=this;
  344. return "a";
  345. },
  346. //>>excludeStart("ide", pragmas.excludeIdeData);
  347. args: [],
  348. source: "key\x0a\x09^ 'a'",
  349. referencedClasses: [],
  350. //>>excludeEnd("ide");
  351. messageSends: []
  352. }),
  353. $globals.HLSUnitSelectAllCommand.a$cls);
  354. $core.addMethod(
  355. $core.method({
  356. selector: "label",
  357. protocol: "accessing",
  358. fn: function (){
  359. var self=this,$self=this;
  360. return "Select all";
  361. },
  362. //>>excludeStart("ide", pragmas.excludeIdeData);
  363. args: [],
  364. source: "label\x0a\x09^ 'Select all'",
  365. referencedClasses: [],
  366. //>>excludeEnd("ide");
  367. messageSends: []
  368. }),
  369. $globals.HLSUnitSelectAllCommand.a$cls);
  370. $core.addClass("HLSUnitSelectAllClassesCommand", $globals.HLSUnitSelectAllCommand, [], "Helios-Commands-SUnit");
  371. //>>excludeStart("ide", pragmas.excludeIdeData);
  372. $globals.HLSUnitSelectAllClassesCommand.comment="Select all available test classes based on what packages are selected on a `HLSUnitModel`";
  373. //>>excludeEnd("ide");
  374. $core.addMethod(
  375. $core.method({
  376. selector: "category",
  377. protocol: "accessing",
  378. fn: function (){
  379. var self=this,$self=this;
  380. return "Classes";
  381. },
  382. //>>excludeStart("ide", pragmas.excludeIdeData);
  383. args: [],
  384. source: "category\x0a\x09^'Classes'",
  385. referencedClasses: [],
  386. //>>excludeEnd("ide");
  387. messageSends: []
  388. }),
  389. $globals.HLSUnitSelectAllClassesCommand);
  390. $core.addMethod(
  391. $core.method({
  392. selector: "execute",
  393. protocol: "executing",
  394. fn: function (){
  395. var self=this,$self=this;
  396. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  397. return $core.withContext(function($ctx1) {
  398. //>>excludeEnd("ctx");
  399. $recv($self._model())._selectAllClasses();
  400. return self;
  401. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  402. }, function($ctx1) {$ctx1.fill(self,"execute",{},$globals.HLSUnitSelectAllClassesCommand)});
  403. //>>excludeEnd("ctx");
  404. },
  405. //>>excludeStart("ide", pragmas.excludeIdeData);
  406. args: [],
  407. source: "execute\x0a\x09self model selectAllClasses",
  408. referencedClasses: [],
  409. //>>excludeEnd("ide");
  410. messageSends: ["selectAllClasses", "model"]
  411. }),
  412. $globals.HLSUnitSelectAllClassesCommand);
  413. $core.addMethod(
  414. $core.method({
  415. selector: "isActive",
  416. protocol: "testing",
  417. fn: function (){
  418. var self=this,$self=this;
  419. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  420. return $core.withContext(function($ctx1) {
  421. //>>excludeEnd("ctx");
  422. return $recv($recv($self["@model"])._selectedPackages())._notEmpty();
  423. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  424. }, function($ctx1) {$ctx1.fill(self,"isActive",{},$globals.HLSUnitSelectAllClassesCommand)});
  425. //>>excludeEnd("ctx");
  426. },
  427. //>>excludeStart("ide", pragmas.excludeIdeData);
  428. args: [],
  429. source: "isActive\x0a\x09^model selectedPackages notEmpty",
  430. referencedClasses: [],
  431. //>>excludeEnd("ide");
  432. messageSends: ["notEmpty", "selectedPackages"]
  433. }),
  434. $globals.HLSUnitSelectAllClassesCommand);
  435. $core.addMethod(
  436. $core.method({
  437. selector: "key",
  438. protocol: "accessing",
  439. fn: function (){
  440. var self=this,$self=this;
  441. return "c";
  442. },
  443. //>>excludeStart("ide", pragmas.excludeIdeData);
  444. args: [],
  445. source: "key\x0a\x09^ 'c'",
  446. referencedClasses: [],
  447. //>>excludeEnd("ide");
  448. messageSends: []
  449. }),
  450. $globals.HLSUnitSelectAllClassesCommand.a$cls);
  451. $core.addMethod(
  452. $core.method({
  453. selector: "label",
  454. protocol: "accessing",
  455. fn: function (){
  456. var self=this,$self=this;
  457. return "Select all classes";
  458. },
  459. //>>excludeStart("ide", pragmas.excludeIdeData);
  460. args: [],
  461. source: "label\x0a\x09^ 'Select all classes'",
  462. referencedClasses: [],
  463. //>>excludeEnd("ide");
  464. messageSends: []
  465. }),
  466. $globals.HLSUnitSelectAllClassesCommand.a$cls);
  467. $core.addClass("HLSUnitSelectAllPackagesCommand", $globals.HLSUnitSelectAllCommand, [], "Helios-Commands-SUnit");
  468. //>>excludeStart("ide", pragmas.excludeIdeData);
  469. $globals.HLSUnitSelectAllPackagesCommand.comment="Select all packages with test cases on a `HLSUnitModel`";
  470. //>>excludeEnd("ide");
  471. $core.addMethod(
  472. $core.method({
  473. selector: "category",
  474. protocol: "accessing",
  475. fn: function (){
  476. var self=this,$self=this;
  477. return "Packages";
  478. },
  479. //>>excludeStart("ide", pragmas.excludeIdeData);
  480. args: [],
  481. source: "category\x0a\x09^'Packages'",
  482. referencedClasses: [],
  483. //>>excludeEnd("ide");
  484. messageSends: []
  485. }),
  486. $globals.HLSUnitSelectAllPackagesCommand);
  487. $core.addMethod(
  488. $core.method({
  489. selector: "execute",
  490. protocol: "executing",
  491. fn: function (){
  492. var self=this,$self=this;
  493. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  494. return $core.withContext(function($ctx1) {
  495. //>>excludeEnd("ctx");
  496. $recv($self._model())._selectAllPackages();
  497. return self;
  498. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  499. }, function($ctx1) {$ctx1.fill(self,"execute",{},$globals.HLSUnitSelectAllPackagesCommand)});
  500. //>>excludeEnd("ctx");
  501. },
  502. //>>excludeStart("ide", pragmas.excludeIdeData);
  503. args: [],
  504. source: "execute\x0a\x09self model selectAllPackages",
  505. referencedClasses: [],
  506. //>>excludeEnd("ide");
  507. messageSends: ["selectAllPackages", "model"]
  508. }),
  509. $globals.HLSUnitSelectAllPackagesCommand);
  510. $core.addMethod(
  511. $core.method({
  512. selector: "isActive",
  513. protocol: "testing",
  514. fn: function (){
  515. var self=this,$self=this;
  516. return true;
  517. },
  518. //>>excludeStart("ide", pragmas.excludeIdeData);
  519. args: [],
  520. source: "isActive\x0a\x09^true",
  521. referencedClasses: [],
  522. //>>excludeEnd("ide");
  523. messageSends: []
  524. }),
  525. $globals.HLSUnitSelectAllPackagesCommand);
  526. $core.addMethod(
  527. $core.method({
  528. selector: "key",
  529. protocol: "accessing",
  530. fn: function (){
  531. var self=this,$self=this;
  532. return "p";
  533. },
  534. //>>excludeStart("ide", pragmas.excludeIdeData);
  535. args: [],
  536. source: "key\x0a\x09^ 'p'",
  537. referencedClasses: [],
  538. //>>excludeEnd("ide");
  539. messageSends: []
  540. }),
  541. $globals.HLSUnitSelectAllPackagesCommand.a$cls);
  542. $core.addMethod(
  543. $core.method({
  544. selector: "label",
  545. protocol: "accessing",
  546. fn: function (){
  547. var self=this,$self=this;
  548. return "Select all packages";
  549. },
  550. //>>excludeStart("ide", pragmas.excludeIdeData);
  551. args: [],
  552. source: "label\x0a\x09^ 'Select all packages'",
  553. referencedClasses: [],
  554. //>>excludeEnd("ide");
  555. messageSends: []
  556. }),
  557. $globals.HLSUnitSelectAllPackagesCommand.a$cls);
  558. });