Compiler-AST.deploy.js 21 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989990991992993994995996997998999100010011002100310041005100610071008100910101011101210131014101510161017101810191020102110221023102410251026102710281029
  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'], '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. "_valueForReceiver_",
  677. smalltalk.method({
  678. selector: "valueForReceiver:",
  679. fn: function (anObject) {
  680. var self=this;
  681. 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", []));
  682. return self;}
  683. }),
  684. smalltalk.SendNode);
  685. smalltalk.addClass('SequenceNode', smalltalk.Node, ['temps', 'scope'], 'Compiler-AST');
  686. smalltalk.addMethod(
  687. "_accept_",
  688. smalltalk.method({
  689. selector: "accept:",
  690. fn: function (aVisitor) {
  691. var self=this;
  692. smalltalk.send(aVisitor, "_visitSequenceNode_", [self]);
  693. return self;}
  694. }),
  695. smalltalk.SequenceNode);
  696. smalltalk.addMethod(
  697. "_asBlockSequenceNode",
  698. smalltalk.method({
  699. selector: "asBlockSequenceNode",
  700. fn: function () {
  701. var self=this;
  702. 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", []));
  703. return self;}
  704. }),
  705. smalltalk.SequenceNode);
  706. smalltalk.addMethod(
  707. "_canAliasChildren",
  708. smalltalk.method({
  709. selector: "canAliasChildren",
  710. fn: function () {
  711. var self=this;
  712. return false;
  713. return self;}
  714. }),
  715. smalltalk.SequenceNode);
  716. smalltalk.addMethod(
  717. "_scope",
  718. smalltalk.method({
  719. selector: "scope",
  720. fn: function () {
  721. var self=this;
  722. return self['@scope'];
  723. return self;}
  724. }),
  725. smalltalk.SequenceNode);
  726. smalltalk.addMethod(
  727. "_scope_",
  728. smalltalk.method({
  729. selector: "scope:",
  730. fn: function (aLexicalScope) {
  731. var self=this;
  732. (self['@scope']=aLexicalScope);
  733. return self;}
  734. }),
  735. smalltalk.SequenceNode);
  736. smalltalk.addMethod(
  737. "_temps",
  738. smalltalk.method({
  739. selector: "temps",
  740. fn: function () {
  741. var self=this;
  742. return (($receiver = self['@temps']) == nil || $receiver == undefined) ? (function(){return [];})() : $receiver;
  743. return self;}
  744. }),
  745. smalltalk.SequenceNode);
  746. smalltalk.addMethod(
  747. "_temps_",
  748. smalltalk.method({
  749. selector: "temps:",
  750. fn: function (aCollection) {
  751. var self=this;
  752. (self['@temps']=aCollection);
  753. return self;}
  754. }),
  755. smalltalk.SequenceNode);
  756. smalltalk.addClass('BlockSequenceNode', smalltalk.SequenceNode, [], 'Compiler-AST');
  757. smalltalk.addMethod(
  758. "_accept_",
  759. smalltalk.method({
  760. selector: "accept:",
  761. fn: function (aVisitor) {
  762. var self=this;
  763. smalltalk.send(aVisitor, "_visitBlockSequenceNode_", [self]);
  764. return self;}
  765. }),
  766. smalltalk.BlockSequenceNode);
  767. smalltalk.addMethod(
  768. "_isBlockSequenceNode",
  769. smalltalk.method({
  770. selector: "isBlockSequenceNode",
  771. fn: function () {
  772. var self=this;
  773. return true;
  774. return self;}
  775. }),
  776. smalltalk.BlockSequenceNode);
  777. smalltalk.addClass('ValueNode', smalltalk.Node, ['value'], 'Compiler-AST');
  778. smalltalk.addMethod(
  779. "_accept_",
  780. smalltalk.method({
  781. selector: "accept:",
  782. fn: function (aVisitor) {
  783. var self=this;
  784. smalltalk.send(aVisitor, "_visitValueNode_", [self]);
  785. return self;}
  786. }),
  787. smalltalk.ValueNode);
  788. smalltalk.addMethod(
  789. "_isValueNode",
  790. smalltalk.method({
  791. selector: "isValueNode",
  792. fn: function () {
  793. var self=this;
  794. return true;
  795. return self;}
  796. }),
  797. smalltalk.ValueNode);
  798. smalltalk.addMethod(
  799. "_shouldBeAliased",
  800. smalltalk.method({
  801. selector: "shouldBeAliased",
  802. fn: function () {
  803. var self=this;
  804. return false;
  805. return self;}
  806. }),
  807. smalltalk.ValueNode);
  808. smalltalk.addMethod(
  809. "_value",
  810. smalltalk.method({
  811. selector: "value",
  812. fn: function () {
  813. var self=this;
  814. return self['@value'];
  815. return self;}
  816. }),
  817. smalltalk.ValueNode);
  818. smalltalk.addMethod(
  819. "_value_",
  820. smalltalk.method({
  821. selector: "value:",
  822. fn: function (anObject) {
  823. var self=this;
  824. (self['@value']=anObject);
  825. return self;}
  826. }),
  827. smalltalk.ValueNode);
  828. smalltalk.addClass('VariableNode', smalltalk.ValueNode, ['assigned', 'binding'], 'Compiler-AST');
  829. smalltalk.addMethod(
  830. "_accept_",
  831. smalltalk.method({
  832. selector: "accept:",
  833. fn: function (aVisitor) {
  834. var self=this;
  835. smalltalk.send(aVisitor, "_visitVariableNode_", [self]);
  836. return self;}
  837. }),
  838. smalltalk.VariableNode);
  839. smalltalk.addMethod(
  840. "_alias",
  841. smalltalk.method({
  842. selector: "alias",
  843. fn: function () {
  844. var self=this;
  845. return smalltalk.send(smalltalk.send(self, "_binding", []), "_alias", []);
  846. return self;}
  847. }),
  848. smalltalk.VariableNode);
  849. smalltalk.addMethod(
  850. "_assigned",
  851. smalltalk.method({
  852. selector: "assigned",
  853. fn: function () {
  854. var self=this;
  855. return (($receiver = self['@assigned']) == nil || $receiver == undefined) ? (function(){return false;})() : $receiver;
  856. return self;}
  857. }),
  858. smalltalk.VariableNode);
  859. smalltalk.addMethod(
  860. "_assigned_",
  861. smalltalk.method({
  862. selector: "assigned:",
  863. fn: function (aBoolean) {
  864. var self=this;
  865. (self['@assigned']=aBoolean);
  866. return self;}
  867. }),
  868. smalltalk.VariableNode);
  869. smalltalk.addMethod(
  870. "_beAssigned",
  871. smalltalk.method({
  872. selector: "beAssigned",
  873. fn: function () {
  874. var self=this;
  875. (self['@assigned']=true);
  876. return self;}
  877. }),
  878. smalltalk.VariableNode);
  879. smalltalk.addMethod(
  880. "_binding",
  881. smalltalk.method({
  882. selector: "binding",
  883. fn: function () {
  884. var self=this;
  885. return self['@binding'];
  886. return self;}
  887. }),
  888. smalltalk.VariableNode);
  889. smalltalk.addMethod(
  890. "_binding_",
  891. smalltalk.method({
  892. selector: "binding:",
  893. fn: function (aScopeVar) {
  894. var self=this;
  895. ((($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", []);})]));
  896. (self['@binding']=aScopeVar);
  897. return self;}
  898. }),
  899. smalltalk.VariableNode);
  900. smalltalk.addClass('ClassReferenceNode', smalltalk.VariableNode, [], 'Compiler-AST');
  901. smalltalk.addMethod(
  902. "_accept_",
  903. smalltalk.method({
  904. selector: "accept:",
  905. fn: function (aVisitor) {
  906. var self=this;
  907. smalltalk.send(aVisitor, "_visitClassReferenceNode_", [self]);
  908. return self;}
  909. }),
  910. smalltalk.ClassReferenceNode);