Compiler-AST.deploy.js 22 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798991001011021031041051061071081091101111121131141151161171181191201211221231241251261271281291301311321331341351361371381391401411421431441451461471481491501511521531541551561571581591601611621631641651661671681691701711721731741751761771781791801811821831841851861871881891901911921931941951961971981992002012022032042052062072082092102112122132142152162172182192202212222232242252262272282292302312322332342352362372382392402412422432442452462472482492502512522532542552562572582592602612622632642652662672682692702712722732742752762772782792802812822832842852862872882892902912922932942952962972982993003013023033043053063073083093103113123133143153163173183193203213223233243253263273283293303313323333343353363373383393403413423433443453463473483493503513523533543553563573583593603613623633643653663673683693703713723733743753763773783793803813823833843853863873883893903913923933943953963973983994004014024034044054064074084094104114124134144154164174184194204214224234244254264274284294304314324334344354364374384394404414424434444454464474484494504514524534544554564574584594604614624634644654664674684694704714724734744754764774784794804814824834844854864874884894904914924934944954964974984995005015025035045055065075085095105115125135145155165175185195205215225235245255265275285295305315325335345355365375385395405415425435445455465475485495505515525535545555565575585595605615625635645655665675685695705715725735745755765775785795805815825835845855865875885895905915925935945955965975985996006016026036046056066076086096106116126136146156166176186196206216226236246256266276286296306316326336346356366376386396406416426436446456466476486496506516526536546556566576586596606616626636646656666676686696706716726736746756766776786796806816826836846856866876886896906916926936946956966976986997007017027037047057067077087097107117127137147157167177187197207217227237247257267277287297307317327337347357367377387397407417427437447457467477487497507517527537547557567577587597607617627637647657667677687697707717727737747757767777787797807817827837847857867877887897907917927937947957967977987998008018028038048058068078088098108118128138148158168178188198208218228238248258268278288298308318328338348358368378388398408418428438448458468478488498508518528538548558568578588598608618628638648658668678688698708718728738748758768778788798808818828838848858868878888898908918928938948958968978988999009019029039049059069079089099109119129139149159169179189199209219229239249259269279289299309319329339349359369379389399409419429439449459469479489499509519529539549559569579589599609619629639649659669679689699709719729739749759769779789799809819829839849859869879889899909919929939949959969979989991000100110021003100410051006100710081009101010111012101310141015101610171018101910201021102210231024102510261027102810291030103110321033103410351036103710381039104010411042104310441045104610471048104910501051
  1. smalltalk.addPackage('Compiler-AST', {});
  2. smalltalk.addClass('Node', smalltalk.Object, ['nodes', 'used', 'alias'], 'Compiler-AST');
  3. smalltalk.addMethod(
  4. "_accept_",
  5. smalltalk.method({
  6. selector: "accept:",
  7. fn: function (aVisitor) {
  8. var self=this;
  9. smalltalk.send(aVisitor, "_visitNode_", [self]);
  10. return self;}
  11. }),
  12. smalltalk.Node);
  13. smalltalk.addMethod(
  14. "_addNode_",
  15. smalltalk.method({
  16. selector: "addNode:",
  17. fn: function (aNode) {
  18. var self=this;
  19. smalltalk.send(smalltalk.send(self, "_nodes", []), "_add_", [aNode]);
  20. return self;}
  21. }),
  22. smalltalk.Node);
  23. smalltalk.addMethod(
  24. "_alias",
  25. smalltalk.method({
  26. selector: "alias",
  27. fn: function () {
  28. var self=this;
  29. return self['@alias'];
  30. return self;}
  31. }),
  32. smalltalk.Node);
  33. smalltalk.addMethod(
  34. "_alias_",
  35. smalltalk.method({
  36. selector: "alias:",
  37. fn: function (aString) {
  38. var self=this;
  39. (self['@alias']=aString);
  40. return self;}
  41. }),
  42. smalltalk.Node);
  43. smalltalk.addMethod(
  44. "_beUsed",
  45. smalltalk.method({
  46. selector: "beUsed",
  47. fn: function () {
  48. var self=this;
  49. (self['@used']=true);
  50. return self;}
  51. }),
  52. smalltalk.Node);
  53. smalltalk.addMethod(
  54. "_canAliasChildren",
  55. smalltalk.method({
  56. selector: "canAliasChildren",
  57. fn: function () {
  58. var self=this;
  59. return true;
  60. return self;}
  61. }),
  62. smalltalk.Node);
  63. smalltalk.addMethod(
  64. "_isAliased",
  65. smalltalk.method({
  66. selector: "isAliased",
  67. fn: function () {
  68. var self=this;
  69. return smalltalk.send(smalltalk.send(self, "_alias", []), "_notNil", []);
  70. return self;}
  71. }),
  72. smalltalk.Node);
  73. smalltalk.addMethod(
  74. "_isBlockNode",
  75. smalltalk.method({
  76. selector: "isBlockNode",
  77. fn: function () {
  78. var self=this;
  79. return false;
  80. return self;}
  81. }),
  82. smalltalk.Node);
  83. smalltalk.addMethod(
  84. "_isBlockSequenceNode",
  85. smalltalk.method({
  86. selector: "isBlockSequenceNode",
  87. fn: function () {
  88. var self=this;
  89. return false;
  90. return self;}
  91. }),
  92. smalltalk.Node);
  93. smalltalk.addMethod(
  94. "_isSendNode",
  95. smalltalk.method({
  96. selector: "isSendNode",
  97. fn: function () {
  98. var self=this;
  99. return false;
  100. return self;}
  101. }),
  102. smalltalk.Node);
  103. smalltalk.addMethod(
  104. "_isUsed",
  105. smalltalk.method({
  106. selector: "isUsed",
  107. fn: function () {
  108. var self=this;
  109. return smalltalk.send(self, "_used", []);
  110. return self;}
  111. }),
  112. smalltalk.Node);
  113. smalltalk.addMethod(
  114. "_isValueNode",
  115. smalltalk.method({
  116. selector: "isValueNode",
  117. fn: function () {
  118. var self=this;
  119. return false;
  120. return self;}
  121. }),
  122. smalltalk.Node);
  123. smalltalk.addMethod(
  124. "_nodes",
  125. smalltalk.method({
  126. selector: "nodes",
  127. fn: function () {
  128. var self=this;
  129. return (($receiver = self['@nodes']) == nil || $receiver == undefined) ? (function(){return (self['@nodes']=smalltalk.send((smalltalk.Array || Array), "_new", []));})() : $receiver;
  130. return self;}
  131. }),
  132. smalltalk.Node);
  133. smalltalk.addMethod(
  134. "_nodes_",
  135. smalltalk.method({
  136. selector: "nodes:",
  137. fn: function (aCollection) {
  138. var self=this;
  139. (self['@nodes']=aCollection);
  140. return self;}
  141. }),
  142. smalltalk.Node);
  143. smalltalk.addMethod(
  144. "_shouldBeAliased",
  145. smalltalk.method({
  146. selector: "shouldBeAliased",
  147. fn: function () {
  148. var self=this;
  149. return smalltalk.send(smalltalk.send(self, "_isUsed", []), "_and_", [(function(){return smalltalk.send(smalltalk.send(self, "_alias", []), "_isNil", []);})]);
  150. return self;}
  151. }),
  152. smalltalk.Node);
  153. smalltalk.addMethod(
  154. "_used",
  155. smalltalk.method({
  156. selector: "used",
  157. fn: function () {
  158. var self=this;
  159. return (($receiver = self['@used']) == nil || $receiver == undefined) ? (function(){return false;})() : $receiver;
  160. return self;}
  161. }),
  162. smalltalk.Node);
  163. smalltalk.addMethod(
  164. "_used_",
  165. smalltalk.method({
  166. selector: "used:",
  167. fn: function (aBoolean) {
  168. var self=this;
  169. (self['@used']=aBoolean);
  170. return self;}
  171. }),
  172. smalltalk.Node);
  173. smalltalk.addClass('AssignmentNode', smalltalk.Node, ['left', 'right'], 'Compiler-AST');
  174. smalltalk.addMethod(
  175. "_accept_",
  176. smalltalk.method({
  177. selector: "accept:",
  178. fn: function (aVisitor) {
  179. var self=this;
  180. smalltalk.send(aVisitor, "_visitAssignmentNode_", [self]);
  181. return self;}
  182. }),
  183. smalltalk.AssignmentNode);
  184. smalltalk.addMethod(
  185. "_left",
  186. smalltalk.method({
  187. selector: "left",
  188. fn: function () {
  189. var self=this;
  190. return self['@left'];
  191. return self;}
  192. }),
  193. smalltalk.AssignmentNode);
  194. smalltalk.addMethod(
  195. "_left_",
  196. smalltalk.method({
  197. selector: "left:",
  198. fn: function (aNode) {
  199. var self=this;
  200. (self['@left']=aNode);
  201. smalltalk.send(self['@left'], "_assigned_", [true]);
  202. return self;}
  203. }),
  204. smalltalk.AssignmentNode);
  205. smalltalk.addMethod(
  206. "_nodes",
  207. smalltalk.method({
  208. selector: "nodes",
  209. fn: function () {
  210. var self=this;
  211. return smalltalk.send((smalltalk.Array || Array), "_with_with_", [smalltalk.send(self, "_left", []), smalltalk.send(self, "_right", [])]);
  212. return self;}
  213. }),
  214. smalltalk.AssignmentNode);
  215. smalltalk.addMethod(
  216. "_right",
  217. smalltalk.method({
  218. selector: "right",
  219. fn: function () {
  220. var self=this;
  221. return self['@right'];
  222. return self;}
  223. }),
  224. smalltalk.AssignmentNode);
  225. smalltalk.addMethod(
  226. "_right_",
  227. smalltalk.method({
  228. selector: "right:",
  229. fn: function (aNode) {
  230. var self=this;
  231. (self['@right']=aNode);
  232. return self;}
  233. }),
  234. smalltalk.AssignmentNode);
  235. smalltalk.addClass('BlockNode', smalltalk.Node, ['parameters', 'scope'], 'Compiler-AST');
  236. smalltalk.addMethod(
  237. "_accept_",
  238. smalltalk.method({
  239. selector: "accept:",
  240. fn: function (aVisitor) {
  241. var self=this;
  242. smalltalk.send(aVisitor, "_visitBlockNode_", [self]);
  243. return self;}
  244. }),
  245. smalltalk.BlockNode);
  246. smalltalk.addMethod(
  247. "_isBlockNode",
  248. smalltalk.method({
  249. selector: "isBlockNode",
  250. fn: function () {
  251. var self=this;
  252. return true;
  253. return self;}
  254. }),
  255. smalltalk.BlockNode);
  256. smalltalk.addMethod(
  257. "_parameters",
  258. smalltalk.method({
  259. selector: "parameters",
  260. fn: function () {
  261. var self=this;
  262. return (($receiver = self['@parameters']) == nil || $receiver == undefined) ? (function(){return (self['@parameters']=smalltalk.send((smalltalk.Array || Array), "_new", []));})() : $receiver;
  263. return self;}
  264. }),
  265. smalltalk.BlockNode);
  266. smalltalk.addMethod(
  267. "_parameters_",
  268. smalltalk.method({
  269. selector: "parameters:",
  270. fn: function (aCollection) {
  271. var self=this;
  272. (self['@parameters']=aCollection);
  273. return self;}
  274. }),
  275. smalltalk.BlockNode);
  276. smalltalk.addMethod(
  277. "_scope",
  278. smalltalk.method({
  279. selector: "scope",
  280. fn: function () {
  281. var self=this;
  282. return self['@scope'];
  283. return self;}
  284. }),
  285. smalltalk.BlockNode);
  286. smalltalk.addMethod(
  287. "_scope_",
  288. smalltalk.method({
  289. selector: "scope:",
  290. fn: function (aLexicalScope) {
  291. var self=this;
  292. (self['@scope']=aLexicalScope);
  293. return self;}
  294. }),
  295. smalltalk.BlockNode);
  296. smalltalk.addClass('CascadeNode', smalltalk.Node, ['receiver'], 'Compiler-AST');
  297. smalltalk.addMethod(
  298. "_accept_",
  299. smalltalk.method({
  300. selector: "accept:",
  301. fn: function (aVisitor) {
  302. var self=this;
  303. smalltalk.send(aVisitor, "_visitCascadeNode_", [self]);
  304. return self;}
  305. }),
  306. smalltalk.CascadeNode);
  307. smalltalk.addMethod(
  308. "_receiver",
  309. smalltalk.method({
  310. selector: "receiver",
  311. fn: function () {
  312. var self=this;
  313. return self['@receiver'];
  314. return self;}
  315. }),
  316. smalltalk.CascadeNode);
  317. smalltalk.addMethod(
  318. "_receiver_",
  319. smalltalk.method({
  320. selector: "receiver:",
  321. fn: function (aNode) {
  322. var self=this;
  323. (self['@receiver']=aNode);
  324. return self;}
  325. }),
  326. smalltalk.CascadeNode);
  327. smalltalk.addClass('DynamicArrayNode', smalltalk.Node, [], 'Compiler-AST');
  328. smalltalk.addMethod(
  329. "_accept_",
  330. smalltalk.method({
  331. selector: "accept:",
  332. fn: function (aVisitor) {
  333. var self=this;
  334. smalltalk.send(aVisitor, "_visitDynamicArrayNode_", [self]);
  335. return self;}
  336. }),
  337. smalltalk.DynamicArrayNode);
  338. smalltalk.addClass('DynamicDictionaryNode', smalltalk.Node, [], 'Compiler-AST');
  339. smalltalk.addMethod(
  340. "_accept_",
  341. smalltalk.method({
  342. selector: "accept:",
  343. fn: function (aVisitor) {
  344. var self=this;
  345. smalltalk.send(aVisitor, "_visitDynamicDictionaryNode_", [self]);
  346. return self;}
  347. }),
  348. smalltalk.DynamicDictionaryNode);
  349. smalltalk.addClass('JSStatementNode', smalltalk.Node, ['source'], 'Compiler-AST');
  350. smalltalk.addMethod(
  351. "_accept_",
  352. smalltalk.method({
  353. selector: "accept:",
  354. fn: function (aVisitor) {
  355. var self=this;
  356. smalltalk.send(aVisitor, "_visitJSStatementNode_", [self]);
  357. return self;}
  358. }),
  359. smalltalk.JSStatementNode);
  360. smalltalk.addMethod(
  361. "_source",
  362. smalltalk.method({
  363. selector: "source",
  364. fn: function () {
  365. var self=this;
  366. return (($receiver = self['@source']) == nil || $receiver == undefined) ? (function(){return "";})() : $receiver;
  367. return self;}
  368. }),
  369. smalltalk.JSStatementNode);
  370. smalltalk.addMethod(
  371. "_source_",
  372. smalltalk.method({
  373. selector: "source:",
  374. fn: function (aString) {
  375. var self=this;
  376. (self['@source']=aString);
  377. return self;}
  378. }),
  379. smalltalk.JSStatementNode);
  380. smalltalk.addClass('MethodNode', smalltalk.Node, ['selector', 'arguments', 'source', 'scope', 'classReferences', 'messageSends'], 'Compiler-AST');
  381. smalltalk.addMethod(
  382. "_accept_",
  383. smalltalk.method({
  384. selector: "accept:",
  385. fn: function (aVisitor) {
  386. var self=this;
  387. smalltalk.send(aVisitor, "_visitMethodNode_", [self]);
  388. return self;}
  389. }),
  390. smalltalk.MethodNode);
  391. smalltalk.addMethod(
  392. "_arguments",
  393. smalltalk.method({
  394. selector: "arguments",
  395. fn: function () {
  396. var self=this;
  397. return (($receiver = self['@arguments']) == nil || $receiver == undefined) ? (function(){return [];})() : $receiver;
  398. return self;}
  399. }),
  400. smalltalk.MethodNode);
  401. smalltalk.addMethod(
  402. "_arguments_",
  403. smalltalk.method({
  404. selector: "arguments:",
  405. fn: function (aCollection) {
  406. var self=this;
  407. (self['@arguments']=aCollection);
  408. return self;}
  409. }),
  410. smalltalk.MethodNode);
  411. smalltalk.addMethod(
  412. "_canAliasChildren",
  413. smalltalk.method({
  414. selector: "canAliasChildren",
  415. fn: function () {
  416. var self=this;
  417. return false;
  418. return self;}
  419. }),
  420. smalltalk.MethodNode);
  421. smalltalk.addMethod(
  422. "_classReferences",
  423. smalltalk.method({
  424. selector: "classReferences",
  425. fn: function () {
  426. var self=this;
  427. return self['@classReferences'];
  428. return self;}
  429. }),
  430. smalltalk.MethodNode);
  431. smalltalk.addMethod(
  432. "_classReferences_",
  433. smalltalk.method({
  434. selector: "classReferences:",
  435. fn: function (aCollection) {
  436. var self=this;
  437. (self['@classReferences']=aCollection);
  438. return self;}
  439. }),
  440. smalltalk.MethodNode);
  441. smalltalk.addMethod(
  442. "_hasNonLocalReturn",
  443. smalltalk.method({
  444. selector: "hasNonLocalReturn",
  445. fn: function () {
  446. var self=this;
  447. return (($receiver = smalltalk.send(self, "_scope", [])) == nil || $receiver == undefined) ? (function(){return false;})() : (function(){return smalltalk.send(smalltalk.send(self, "_scope", []), "_hasNonLocalReturn", []);})();
  448. return self;}
  449. }),
  450. smalltalk.MethodNode);
  451. smalltalk.addMethod(
  452. "_messageSends",
  453. smalltalk.method({
  454. selector: "messageSends",
  455. fn: function () {
  456. var self=this;
  457. return self['@messageSends'];
  458. return self;}
  459. }),
  460. smalltalk.MethodNode);
  461. smalltalk.addMethod(
  462. "_messageSends_",
  463. smalltalk.method({
  464. selector: "messageSends:",
  465. fn: function (aCollection) {
  466. var self=this;
  467. (self['@messageSends']=aCollection);
  468. return self;}
  469. }),
  470. smalltalk.MethodNode);
  471. smalltalk.addMethod(
  472. "_scope",
  473. smalltalk.method({
  474. selector: "scope",
  475. fn: function () {
  476. var self=this;
  477. return self['@scope'];
  478. return self;}
  479. }),
  480. smalltalk.MethodNode);
  481. smalltalk.addMethod(
  482. "_scope_",
  483. smalltalk.method({
  484. selector: "scope:",
  485. fn: function (aMethodScope) {
  486. var self=this;
  487. (self['@scope']=aMethodScope);
  488. return self;}
  489. }),
  490. smalltalk.MethodNode);
  491. smalltalk.addMethod(
  492. "_selector",
  493. smalltalk.method({
  494. selector: "selector",
  495. fn: function () {
  496. var self=this;
  497. return self['@selector'];
  498. return self;}
  499. }),
  500. smalltalk.MethodNode);
  501. smalltalk.addMethod(
  502. "_selector_",
  503. smalltalk.method({
  504. selector: "selector:",
  505. fn: function (aString) {
  506. var self=this;
  507. (self['@selector']=aString);
  508. return self;}
  509. }),
  510. smalltalk.MethodNode);
  511. smalltalk.addMethod(
  512. "_source",
  513. smalltalk.method({
  514. selector: "source",
  515. fn: function () {
  516. var self=this;
  517. return self['@source'];
  518. return self;}
  519. }),
  520. smalltalk.MethodNode);
  521. smalltalk.addMethod(
  522. "_source_",
  523. smalltalk.method({
  524. selector: "source:",
  525. fn: function (aString) {
  526. var self=this;
  527. (self['@source']=aString);
  528. return self;}
  529. }),
  530. smalltalk.MethodNode);
  531. smalltalk.addClass('ReturnNode', smalltalk.Node, ['nonLocalReturn'], 'Compiler-AST');
  532. smalltalk.addMethod(
  533. "_accept_",
  534. smalltalk.method({
  535. selector: "accept:",
  536. fn: function (aVisitor) {
  537. var self=this;
  538. smalltalk.send(aVisitor, "_visitReturnNode_", [self]);
  539. return self;}
  540. }),
  541. smalltalk.ReturnNode);
  542. smalltalk.addMethod(
  543. "_nonLocalReturn",
  544. smalltalk.method({
  545. selector: "nonLocalReturn",
  546. fn: function () {
  547. var self=this;
  548. return (($receiver = self['@nonLocalReturn']) == nil || $receiver == undefined) ? (function(){return false;})() : $receiver;
  549. return self;}
  550. }),
  551. smalltalk.ReturnNode);
  552. smalltalk.addMethod(
  553. "_nonLocalReturn_",
  554. smalltalk.method({
  555. selector: "nonLocalReturn:",
  556. fn: function (aBoolean) {
  557. var self=this;
  558. (self['@nonLocalReturn']=aBoolean);
  559. return self;}
  560. }),
  561. smalltalk.ReturnNode);
  562. smalltalk.addMethod(
  563. "_shouldBeAliased",
  564. smalltalk.method({
  565. selector: "shouldBeAliased",
  566. fn: function () {
  567. var self=this;
  568. return false;
  569. return self;}
  570. }),
  571. smalltalk.ReturnNode);
  572. smalltalk.addClass('SendNode', smalltalk.Node, ['selector', 'arguments', 'receiver', 'superSend'], 'Compiler-AST');
  573. smalltalk.addMethod(
  574. "_accept_",
  575. smalltalk.method({
  576. selector: "accept:",
  577. fn: function (aVisitor) {
  578. var self=this;
  579. smalltalk.send(aVisitor, "_visitSendNode_", [self]);
  580. return self;}
  581. }),
  582. smalltalk.SendNode);
  583. smalltalk.addMethod(
  584. "_arguments",
  585. smalltalk.method({
  586. selector: "arguments",
  587. fn: function () {
  588. var self=this;
  589. return (($receiver = self['@arguments']) == nil || $receiver == undefined) ? (function(){return (self['@arguments']=[]);})() : $receiver;
  590. return self;}
  591. }),
  592. smalltalk.SendNode);
  593. smalltalk.addMethod(
  594. "_arguments_",
  595. smalltalk.method({
  596. selector: "arguments:",
  597. fn: function (aCollection) {
  598. var self=this;
  599. (self['@arguments']=aCollection);
  600. return self;}
  601. }),
  602. smalltalk.SendNode);
  603. smalltalk.addMethod(
  604. "_cascadeNodeWithMessages_",
  605. smalltalk.method({
  606. selector: "cascadeNodeWithMessages:",
  607. fn: function (aCollection) {
  608. var self=this;
  609. var first=nil;
  610. (first=(function($rec){smalltalk.send($rec, "_selector_", [smalltalk.send(self, "_selector", [])]);smalltalk.send($rec, "_arguments_", [smalltalk.send(self, "_arguments", [])]);return smalltalk.send($rec, "_yourself", []);})(smalltalk.send((smalltalk.SendNode || SendNode), "_new", [])));
  611. return (function($rec){smalltalk.send($rec, "_receiver_", [smalltalk.send(self, "_receiver", [])]);smalltalk.send($rec, "_nodes_", [smalltalk.send(smalltalk.send((smalltalk.Array || Array), "_with_", [first]), "__comma", [aCollection])]);return smalltalk.send($rec, "_yourself", []);})(smalltalk.send((smalltalk.CascadeNode || CascadeNode), "_new", []));
  612. return self;}
  613. }),
  614. smalltalk.SendNode);
  615. smalltalk.addMethod(
  616. "_isSendNode",
  617. smalltalk.method({
  618. selector: "isSendNode",
  619. fn: function () {
  620. var self=this;
  621. return true;
  622. return self;}
  623. }),
  624. smalltalk.SendNode);
  625. smalltalk.addMethod(
  626. "_nodes",
  627. smalltalk.method({
  628. selector: "nodes",
  629. fn: function () {
  630. var self=this;
  631. return (function($rec){smalltalk.send($rec, "_add_", [smalltalk.send(self, "_receiver", [])]);return smalltalk.send($rec, "_yourself", []);})(smalltalk.send((smalltalk.Array || Array), "_withAll_", [smalltalk.send(self, "_arguments", [])]));
  632. return self;}
  633. }),
  634. smalltalk.SendNode);
  635. smalltalk.addMethod(
  636. "_receiver",
  637. smalltalk.method({
  638. selector: "receiver",
  639. fn: function () {
  640. var self=this;
  641. return self['@receiver'];
  642. return self;}
  643. }),
  644. smalltalk.SendNode);
  645. smalltalk.addMethod(
  646. "_receiver_",
  647. smalltalk.method({
  648. selector: "receiver:",
  649. fn: function (aNode) {
  650. var self=this;
  651. (self['@receiver']=aNode);
  652. return self;}
  653. }),
  654. smalltalk.SendNode);
  655. smalltalk.addMethod(
  656. "_selector",
  657. smalltalk.method({
  658. selector: "selector",
  659. fn: function () {
  660. var self=this;
  661. return self['@selector'];
  662. return self;}
  663. }),
  664. smalltalk.SendNode);
  665. smalltalk.addMethod(
  666. "_selector_",
  667. smalltalk.method({
  668. selector: "selector:",
  669. fn: function (aString) {
  670. var self=this;
  671. (self['@selector']=aString);
  672. return self;}
  673. }),
  674. smalltalk.SendNode);
  675. smalltalk.addMethod(
  676. "_superSend",
  677. smalltalk.method({
  678. selector: "superSend",
  679. fn: function () {
  680. var self=this;
  681. return (($receiver = self['@superSend']) == nil || $receiver == undefined) ? (function(){return false;})() : $receiver;
  682. return self;}
  683. }),
  684. smalltalk.SendNode);
  685. smalltalk.addMethod(
  686. "_superSend_",
  687. smalltalk.method({
  688. selector: "superSend:",
  689. fn: function (aBoolean) {
  690. var self=this;
  691. (self['@superSend']=aBoolean);
  692. return self;}
  693. }),
  694. smalltalk.SendNode);
  695. smalltalk.addMethod(
  696. "_valueForReceiver_",
  697. smalltalk.method({
  698. selector: "valueForReceiver:",
  699. fn: function (anObject) {
  700. var self=this;
  701. return (function($rec){smalltalk.send($rec, "_receiver_", [(($receiver = smalltalk.send(self, "_receiver", [])) == nil || $receiver == undefined) ? (function(){return anObject;})() : (function(){return smalltalk.send(smalltalk.send(self, "_receiver", []), "_valueForReceiver_", [anObject]);})()]);smalltalk.send($rec, "_selector_", [smalltalk.send(self, "_selector", [])]);smalltalk.send($rec, "_arguments_", [smalltalk.send(self, "_arguments", [])]);return smalltalk.send($rec, "_yourself", []);})(smalltalk.send((smalltalk.SendNode || SendNode), "_new", []));
  702. return self;}
  703. }),
  704. smalltalk.SendNode);
  705. smalltalk.addClass('SequenceNode', smalltalk.Node, ['temps', 'scope'], 'Compiler-AST');
  706. smalltalk.addMethod(
  707. "_accept_",
  708. smalltalk.method({
  709. selector: "accept:",
  710. fn: function (aVisitor) {
  711. var self=this;
  712. smalltalk.send(aVisitor, "_visitSequenceNode_", [self]);
  713. return self;}
  714. }),
  715. smalltalk.SequenceNode);
  716. smalltalk.addMethod(
  717. "_asBlockSequenceNode",
  718. smalltalk.method({
  719. selector: "asBlockSequenceNode",
  720. fn: function () {
  721. var self=this;
  722. return (function($rec){smalltalk.send($rec, "_nodes_", [smalltalk.send(self, "_nodes", [])]);smalltalk.send($rec, "_temps_", [smalltalk.send(self, "_temps", [])]);return smalltalk.send($rec, "_yourself", []);})(smalltalk.send((smalltalk.BlockSequenceNode || BlockSequenceNode), "_new", []));
  723. return self;}
  724. }),
  725. smalltalk.SequenceNode);
  726. smalltalk.addMethod(
  727. "_canAliasChildren",
  728. smalltalk.method({
  729. selector: "canAliasChildren",
  730. fn: function () {
  731. var self=this;
  732. return false;
  733. return self;}
  734. }),
  735. smalltalk.SequenceNode);
  736. smalltalk.addMethod(
  737. "_scope",
  738. smalltalk.method({
  739. selector: "scope",
  740. fn: function () {
  741. var self=this;
  742. return self['@scope'];
  743. return self;}
  744. }),
  745. smalltalk.SequenceNode);
  746. smalltalk.addMethod(
  747. "_scope_",
  748. smalltalk.method({
  749. selector: "scope:",
  750. fn: function (aLexicalScope) {
  751. var self=this;
  752. (self['@scope']=aLexicalScope);
  753. return self;}
  754. }),
  755. smalltalk.SequenceNode);
  756. smalltalk.addMethod(
  757. "_temps",
  758. smalltalk.method({
  759. selector: "temps",
  760. fn: function () {
  761. var self=this;
  762. return (($receiver = self['@temps']) == nil || $receiver == undefined) ? (function(){return [];})() : $receiver;
  763. return self;}
  764. }),
  765. smalltalk.SequenceNode);
  766. smalltalk.addMethod(
  767. "_temps_",
  768. smalltalk.method({
  769. selector: "temps:",
  770. fn: function (aCollection) {
  771. var self=this;
  772. (self['@temps']=aCollection);
  773. return self;}
  774. }),
  775. smalltalk.SequenceNode);
  776. smalltalk.addClass('BlockSequenceNode', smalltalk.SequenceNode, [], 'Compiler-AST');
  777. smalltalk.addMethod(
  778. "_accept_",
  779. smalltalk.method({
  780. selector: "accept:",
  781. fn: function (aVisitor) {
  782. var self=this;
  783. smalltalk.send(aVisitor, "_visitBlockSequenceNode_", [self]);
  784. return self;}
  785. }),
  786. smalltalk.BlockSequenceNode);
  787. smalltalk.addMethod(
  788. "_isBlockSequenceNode",
  789. smalltalk.method({
  790. selector: "isBlockSequenceNode",
  791. fn: function () {
  792. var self=this;
  793. return true;
  794. return self;}
  795. }),
  796. smalltalk.BlockSequenceNode);
  797. smalltalk.addClass('ValueNode', smalltalk.Node, ['value'], 'Compiler-AST');
  798. smalltalk.addMethod(
  799. "_accept_",
  800. smalltalk.method({
  801. selector: "accept:",
  802. fn: function (aVisitor) {
  803. var self=this;
  804. smalltalk.send(aVisitor, "_visitValueNode_", [self]);
  805. return self;}
  806. }),
  807. smalltalk.ValueNode);
  808. smalltalk.addMethod(
  809. "_isValueNode",
  810. smalltalk.method({
  811. selector: "isValueNode",
  812. fn: function () {
  813. var self=this;
  814. return true;
  815. return self;}
  816. }),
  817. smalltalk.ValueNode);
  818. smalltalk.addMethod(
  819. "_shouldBeAliased",
  820. smalltalk.method({
  821. selector: "shouldBeAliased",
  822. fn: function () {
  823. var self=this;
  824. return false;
  825. return self;}
  826. }),
  827. smalltalk.ValueNode);
  828. smalltalk.addMethod(
  829. "_value",
  830. smalltalk.method({
  831. selector: "value",
  832. fn: function () {
  833. var self=this;
  834. return self['@value'];
  835. return self;}
  836. }),
  837. smalltalk.ValueNode);
  838. smalltalk.addMethod(
  839. "_value_",
  840. smalltalk.method({
  841. selector: "value:",
  842. fn: function (anObject) {
  843. var self=this;
  844. (self['@value']=anObject);
  845. return self;}
  846. }),
  847. smalltalk.ValueNode);
  848. smalltalk.addClass('VariableNode', smalltalk.ValueNode, ['assigned', 'binding'], 'Compiler-AST');
  849. smalltalk.addMethod(
  850. "_accept_",
  851. smalltalk.method({
  852. selector: "accept:",
  853. fn: function (aVisitor) {
  854. var self=this;
  855. smalltalk.send(aVisitor, "_visitVariableNode_", [self]);
  856. return self;}
  857. }),
  858. smalltalk.VariableNode);
  859. smalltalk.addMethod(
  860. "_alias",
  861. smalltalk.method({
  862. selector: "alias",
  863. fn: function () {
  864. var self=this;
  865. return smalltalk.send(smalltalk.send(self, "_binding", []), "_alias", []);
  866. return self;}
  867. }),
  868. smalltalk.VariableNode);
  869. smalltalk.addMethod(
  870. "_assigned",
  871. smalltalk.method({
  872. selector: "assigned",
  873. fn: function () {
  874. var self=this;
  875. return (($receiver = self['@assigned']) == nil || $receiver == undefined) ? (function(){return false;})() : $receiver;
  876. return self;}
  877. }),
  878. smalltalk.VariableNode);
  879. smalltalk.addMethod(
  880. "_assigned_",
  881. smalltalk.method({
  882. selector: "assigned:",
  883. fn: function (aBoolean) {
  884. var self=this;
  885. (self['@assigned']=aBoolean);
  886. return self;}
  887. }),
  888. smalltalk.VariableNode);
  889. smalltalk.addMethod(
  890. "_beAssigned",
  891. smalltalk.method({
  892. selector: "beAssigned",
  893. fn: function () {
  894. var self=this;
  895. (self['@assigned']=true);
  896. return self;}
  897. }),
  898. smalltalk.VariableNode);
  899. smalltalk.addMethod(
  900. "_binding",
  901. smalltalk.method({
  902. selector: "binding",
  903. fn: function () {
  904. var self=this;
  905. return self['@binding'];
  906. return self;}
  907. }),
  908. smalltalk.VariableNode);
  909. smalltalk.addMethod(
  910. "_binding_",
  911. smalltalk.method({
  912. selector: "binding:",
  913. fn: function (aScopeVar) {
  914. var self=this;
  915. ((($receiver = smalltalk.send(aScopeVar, "_isKindOf_", [(smalltalk.SemanticAnalyzer || SemanticAnalyzer)])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(self, "_halt", []);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return smalltalk.send(self, "_halt", []);})]));
  916. (self['@binding']=aScopeVar);
  917. return self;}
  918. }),
  919. smalltalk.VariableNode);
  920. smalltalk.addClass('ClassReferenceNode', smalltalk.VariableNode, [], 'Compiler-AST');
  921. smalltalk.addMethod(
  922. "_accept_",
  923. smalltalk.method({
  924. selector: "accept:",
  925. fn: function (aVisitor) {
  926. var self=this;
  927. smalltalk.send(aVisitor, "_visitClassReferenceNode_", [self]);
  928. return self;}
  929. }),
  930. smalltalk.ClassReferenceNode);