1
0

Compiler-AST.js 43 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989990991992993994995996997998999100010011002100310041005100610071008100910101011101210131014101510161017101810191020102110221023102410251026102710281029103010311032103310341035103610371038103910401041104210431044104510461047104810491050105110521053105410551056105710581059106010611062106310641065106610671068106910701071107210731074107510761077107810791080108110821083108410851086108710881089109010911092109310941095109610971098109911001101110211031104110511061107110811091110111111121113111411151116111711181119112011211122112311241125112611271128112911301131113211331134113511361137113811391140114111421143114411451146114711481149115011511152115311541155115611571158115911601161116211631164116511661167116811691170117111721173117411751176117711781179118011811182118311841185118611871188118911901191119211931194119511961197119811991200120112021203120412051206120712081209121012111212121312141215121612171218121912201221122212231224122512261227122812291230123112321233123412351236123712381239124012411242124312441245124612471248124912501251125212531254125512561257125812591260126112621263126412651266126712681269127012711272127312741275127612771278127912801281128212831284128512861287128812891290129112921293129412951296129712981299130013011302130313041305130613071308130913101311131213131314131513161317131813191320132113221323132413251326132713281329133013311332133313341335133613371338133913401341134213431344134513461347134813491350135113521353135413551356135713581359136013611362136313641365136613671368136913701371137213731374137513761377137813791380138113821383138413851386138713881389139013911392139313941395139613971398139914001401140214031404140514061407140814091410141114121413141414151416141714181419142014211422142314241425142614271428142914301431143214331434143514361437143814391440144114421443144414451446144714481449145014511452145314541455145614571458145914601461146214631464146514661467146814691470147114721473147414751476147714781479148014811482148314841485148614871488148914901491149214931494149514961497149814991500150115021503150415051506150715081509151015111512151315141515151615171518151915201521152215231524152515261527152815291530153115321533153415351536153715381539154015411542154315441545154615471548154915501551155215531554155515561557155815591560156115621563156415651566156715681569157015711572157315741575157615771578157915801581158215831584158515861587158815891590159115921593159415951596159715981599160016011602160316041605160616071608160916101611161216131614161516161617161816191620162116221623162416251626162716281629163016311632163316341635163616371638163916401641164216431644164516461647164816491650165116521653165416551656165716581659166016611662
  1. smalltalk.addPackage('Compiler-AST', {});
  2. smalltalk.addClass('Node', smalltalk.Object, ['position', 'nodes', 'shouldBeInlined', 'shouldBeAliased'], 'Compiler-AST');
  3. smalltalk.Node.comment="I am the abstract root class of the abstract syntax tree.\x0a\x0aposition: holds a point containing lline- and column number of the symbol location in the original source file"
  4. smalltalk.addMethod(
  5. "_accept_",
  6. smalltalk.method({
  7. selector: "accept:",
  8. category: 'visiting',
  9. fn: function (aVisitor){
  10. var self=this;
  11. return smalltalk.withContext(function($ctx) { var $1;
  12. $1=_st(aVisitor)._visitNode_(self);
  13. return $1;
  14. }, self, "accept:", [aVisitor], smalltalk.Node)},
  15. args: ["aVisitor"],
  16. source: "accept: aVisitor\x0a\x09^ aVisitor visitNode: self",
  17. messageSends: ["visitNode:"],
  18. referencedClasses: []
  19. }),
  20. smalltalk.Node);
  21. smalltalk.addMethod(
  22. "_addNode_",
  23. smalltalk.method({
  24. selector: "addNode:",
  25. category: 'accessing',
  26. fn: function (aNode){
  27. var self=this;
  28. return smalltalk.withContext(function($ctx) { _st(_st(self)._nodes())._add_(aNode);
  29. return self}, self, "addNode:", [aNode], smalltalk.Node)},
  30. args: ["aNode"],
  31. source: "addNode: aNode\x0a\x09self nodes add: aNode",
  32. messageSends: ["add:", "nodes"],
  33. referencedClasses: []
  34. }),
  35. smalltalk.Node);
  36. smalltalk.addMethod(
  37. "_isAssignmentNode",
  38. smalltalk.method({
  39. selector: "isAssignmentNode",
  40. category: 'testing',
  41. fn: function (){
  42. var self=this;
  43. return smalltalk.withContext(function($ctx) { return false;
  44. }, self, "isAssignmentNode", [], smalltalk.Node)},
  45. args: [],
  46. source: "isAssignmentNode\x0a\x09^ false",
  47. messageSends: [],
  48. referencedClasses: []
  49. }),
  50. smalltalk.Node);
  51. smalltalk.addMethod(
  52. "_isBlockNode",
  53. smalltalk.method({
  54. selector: "isBlockNode",
  55. category: 'testing',
  56. fn: function (){
  57. var self=this;
  58. return smalltalk.withContext(function($ctx) { return false;
  59. }, self, "isBlockNode", [], smalltalk.Node)},
  60. args: [],
  61. source: "isBlockNode\x0a\x09^false",
  62. messageSends: [],
  63. referencedClasses: []
  64. }),
  65. smalltalk.Node);
  66. smalltalk.addMethod(
  67. "_isBlockSequenceNode",
  68. smalltalk.method({
  69. selector: "isBlockSequenceNode",
  70. category: 'testing',
  71. fn: function (){
  72. var self=this;
  73. return smalltalk.withContext(function($ctx) { return false;
  74. }, self, "isBlockSequenceNode", [], smalltalk.Node)},
  75. args: [],
  76. source: "isBlockSequenceNode\x0a\x09^false",
  77. messageSends: [],
  78. referencedClasses: []
  79. }),
  80. smalltalk.Node);
  81. smalltalk.addMethod(
  82. "_isReturnNode",
  83. smalltalk.method({
  84. selector: "isReturnNode",
  85. category: 'testing',
  86. fn: function (){
  87. var self=this;
  88. return smalltalk.withContext(function($ctx) { return false;
  89. }, self, "isReturnNode", [], smalltalk.Node)},
  90. args: [],
  91. source: "isReturnNode\x0a\x09^false",
  92. messageSends: [],
  93. referencedClasses: []
  94. }),
  95. smalltalk.Node);
  96. smalltalk.addMethod(
  97. "_isSendNode",
  98. smalltalk.method({
  99. selector: "isSendNode",
  100. category: 'testing',
  101. fn: function (){
  102. var self=this;
  103. return smalltalk.withContext(function($ctx) { return false;
  104. }, self, "isSendNode", [], smalltalk.Node)},
  105. args: [],
  106. source: "isSendNode\x0a\x09^false",
  107. messageSends: [],
  108. referencedClasses: []
  109. }),
  110. smalltalk.Node);
  111. smalltalk.addMethod(
  112. "_isValueNode",
  113. smalltalk.method({
  114. selector: "isValueNode",
  115. category: 'testing',
  116. fn: function (){
  117. var self=this;
  118. return smalltalk.withContext(function($ctx) { return false;
  119. }, self, "isValueNode", [], smalltalk.Node)},
  120. args: [],
  121. source: "isValueNode\x0a\x09^false",
  122. messageSends: [],
  123. referencedClasses: []
  124. }),
  125. smalltalk.Node);
  126. smalltalk.addMethod(
  127. "_nodes",
  128. smalltalk.method({
  129. selector: "nodes",
  130. category: 'accessing',
  131. fn: function (){
  132. var self=this;
  133. return smalltalk.withContext(function($ctx) { var $1;
  134. if(($receiver = self["@nodes"]) == nil || $receiver == undefined){
  135. self["@nodes"]=_st((smalltalk.Array || Array))._new();
  136. $1=self["@nodes"];
  137. } else {
  138. $1=self["@nodes"];
  139. };
  140. return $1;
  141. }, self, "nodes", [], smalltalk.Node)},
  142. args: [],
  143. source: "nodes\x0a\x09^nodes ifNil: [nodes := Array new]",
  144. messageSends: ["ifNil:", "new"],
  145. referencedClasses: ["Array"]
  146. }),
  147. smalltalk.Node);
  148. smalltalk.addMethod(
  149. "_nodes_",
  150. smalltalk.method({
  151. selector: "nodes:",
  152. category: 'building',
  153. fn: function (aCollection){
  154. var self=this;
  155. return smalltalk.withContext(function($ctx) { self["@nodes"]=aCollection;
  156. return self}, self, "nodes:", [aCollection], smalltalk.Node)},
  157. args: ["aCollection"],
  158. source: "nodes: aCollection\x0a\x09nodes := aCollection",
  159. messageSends: [],
  160. referencedClasses: []
  161. }),
  162. smalltalk.Node);
  163. smalltalk.addMethod(
  164. "_position",
  165. smalltalk.method({
  166. selector: "position",
  167. category: 'accessing',
  168. fn: function (){
  169. var self=this;
  170. return smalltalk.withContext(function($ctx) { var $1;
  171. if(($receiver = self["@position"]) == nil || $receiver == undefined){
  172. self["@position"]=_st((0)).__at((0));
  173. $1=self["@position"];
  174. } else {
  175. $1=self["@position"];
  176. };
  177. return $1;
  178. }, self, "position", [], smalltalk.Node)},
  179. args: [],
  180. source: "position\x0a\x09^position ifNil: [position := 0@0]",
  181. messageSends: ["ifNil:", "@"],
  182. referencedClasses: []
  183. }),
  184. smalltalk.Node);
  185. smalltalk.addMethod(
  186. "_position_",
  187. smalltalk.method({
  188. selector: "position:",
  189. category: 'building',
  190. fn: function (aPosition){
  191. var self=this;
  192. return smalltalk.withContext(function($ctx) { self["@position"]=aPosition;
  193. return self}, self, "position:", [aPosition], smalltalk.Node)},
  194. args: ["aPosition"],
  195. source: "position: aPosition\x0a\x09position := aPosition",
  196. messageSends: [],
  197. referencedClasses: []
  198. }),
  199. smalltalk.Node);
  200. smalltalk.addMethod(
  201. "_shouldBeAliased",
  202. smalltalk.method({
  203. selector: "shouldBeAliased",
  204. category: 'accessing',
  205. fn: function (){
  206. var self=this;
  207. return smalltalk.withContext(function($ctx) { var $1;
  208. if(($receiver = self["@shouldBeAliased"]) == nil || $receiver == undefined){
  209. $1=false;
  210. } else {
  211. $1=self["@shouldBeAliased"];
  212. };
  213. return $1;
  214. }, self, "shouldBeAliased", [], smalltalk.Node)},
  215. args: [],
  216. source: "shouldBeAliased\x0a\x09^ shouldBeAliased ifNil: [ false ]",
  217. messageSends: ["ifNil:"],
  218. referencedClasses: []
  219. }),
  220. smalltalk.Node);
  221. smalltalk.addMethod(
  222. "_shouldBeAliased_",
  223. smalltalk.method({
  224. selector: "shouldBeAliased:",
  225. category: 'accessing',
  226. fn: function (aBoolean){
  227. var self=this;
  228. return smalltalk.withContext(function($ctx) { self["@shouldBeAliased"]=aBoolean;
  229. return self}, self, "shouldBeAliased:", [aBoolean], smalltalk.Node)},
  230. args: ["aBoolean"],
  231. source: "shouldBeAliased: aBoolean\x0a\x09shouldBeAliased := aBoolean",
  232. messageSends: [],
  233. referencedClasses: []
  234. }),
  235. smalltalk.Node);
  236. smalltalk.addMethod(
  237. "_shouldBeInlined",
  238. smalltalk.method({
  239. selector: "shouldBeInlined",
  240. category: 'accessing',
  241. fn: function (){
  242. var self=this;
  243. return smalltalk.withContext(function($ctx) { var $1;
  244. if(($receiver = self["@shouldBeInlined"]) == nil || $receiver == undefined){
  245. $1=false;
  246. } else {
  247. $1=self["@shouldBeInlined"];
  248. };
  249. return $1;
  250. }, self, "shouldBeInlined", [], smalltalk.Node)},
  251. args: [],
  252. source: "shouldBeInlined\x0a\x09^ shouldBeInlined ifNil: [ false ]",
  253. messageSends: ["ifNil:"],
  254. referencedClasses: []
  255. }),
  256. smalltalk.Node);
  257. smalltalk.addMethod(
  258. "_shouldBeInlined_",
  259. smalltalk.method({
  260. selector: "shouldBeInlined:",
  261. category: 'accessing',
  262. fn: function (aBoolean){
  263. var self=this;
  264. return smalltalk.withContext(function($ctx) { self["@shouldBeInlined"]=aBoolean;
  265. return self}, self, "shouldBeInlined:", [aBoolean], smalltalk.Node)},
  266. args: ["aBoolean"],
  267. source: "shouldBeInlined: aBoolean\x0a\x09shouldBeInlined := aBoolean",
  268. messageSends: [],
  269. referencedClasses: []
  270. }),
  271. smalltalk.Node);
  272. smalltalk.addClass('AssignmentNode', smalltalk.Node, ['left', 'right'], 'Compiler-AST');
  273. smalltalk.addMethod(
  274. "_accept_",
  275. smalltalk.method({
  276. selector: "accept:",
  277. category: 'visiting',
  278. fn: function (aVisitor){
  279. var self=this;
  280. return smalltalk.withContext(function($ctx) { var $1;
  281. $1=_st(aVisitor)._visitAssignmentNode_(self);
  282. return $1;
  283. }, self, "accept:", [aVisitor], smalltalk.AssignmentNode)},
  284. args: ["aVisitor"],
  285. source: "accept: aVisitor\x0a\x09^ aVisitor visitAssignmentNode: self",
  286. messageSends: ["visitAssignmentNode:"],
  287. referencedClasses: []
  288. }),
  289. smalltalk.AssignmentNode);
  290. smalltalk.addMethod(
  291. "_isAssignmentNode",
  292. smalltalk.method({
  293. selector: "isAssignmentNode",
  294. category: 'testing',
  295. fn: function (){
  296. var self=this;
  297. return smalltalk.withContext(function($ctx) { return true;
  298. }, self, "isAssignmentNode", [], smalltalk.AssignmentNode)},
  299. args: [],
  300. source: "isAssignmentNode\x0a\x09^ true",
  301. messageSends: [],
  302. referencedClasses: []
  303. }),
  304. smalltalk.AssignmentNode);
  305. smalltalk.addMethod(
  306. "_left",
  307. smalltalk.method({
  308. selector: "left",
  309. category: 'accessing',
  310. fn: function (){
  311. var self=this;
  312. return smalltalk.withContext(function($ctx) { return self["@left"];
  313. }, self, "left", [], smalltalk.AssignmentNode)},
  314. args: [],
  315. source: "left\x0a\x09^left",
  316. messageSends: [],
  317. referencedClasses: []
  318. }),
  319. smalltalk.AssignmentNode);
  320. smalltalk.addMethod(
  321. "_left_",
  322. smalltalk.method({
  323. selector: "left:",
  324. category: 'accessing',
  325. fn: function (aNode){
  326. var self=this;
  327. return smalltalk.withContext(function($ctx) { self["@left"]=aNode;
  328. return self}, self, "left:", [aNode], smalltalk.AssignmentNode)},
  329. args: ["aNode"],
  330. source: "left: aNode\x0a\x09left := aNode",
  331. messageSends: [],
  332. referencedClasses: []
  333. }),
  334. smalltalk.AssignmentNode);
  335. smalltalk.addMethod(
  336. "_nodes",
  337. smalltalk.method({
  338. selector: "nodes",
  339. category: 'accessing',
  340. fn: function (){
  341. var self=this;
  342. return smalltalk.withContext(function($ctx) { var $1;
  343. $1=_st((smalltalk.Array || Array))._with_with_(_st(self)._left(),_st(self)._right());
  344. return $1;
  345. }, self, "nodes", [], smalltalk.AssignmentNode)},
  346. args: [],
  347. source: "nodes\x0a\x09^ Array with: self left with: self right",
  348. messageSends: ["with:with:", "left", "right"],
  349. referencedClasses: ["Array"]
  350. }),
  351. smalltalk.AssignmentNode);
  352. smalltalk.addMethod(
  353. "_right",
  354. smalltalk.method({
  355. selector: "right",
  356. category: 'accessing',
  357. fn: function (){
  358. var self=this;
  359. return smalltalk.withContext(function($ctx) { return self["@right"];
  360. }, self, "right", [], smalltalk.AssignmentNode)},
  361. args: [],
  362. source: "right\x0a\x09^right",
  363. messageSends: [],
  364. referencedClasses: []
  365. }),
  366. smalltalk.AssignmentNode);
  367. smalltalk.addMethod(
  368. "_right_",
  369. smalltalk.method({
  370. selector: "right:",
  371. category: 'accessing',
  372. fn: function (aNode){
  373. var self=this;
  374. return smalltalk.withContext(function($ctx) { self["@right"]=aNode;
  375. return self}, self, "right:", [aNode], smalltalk.AssignmentNode)},
  376. args: ["aNode"],
  377. source: "right: aNode\x0a\x09right := aNode",
  378. messageSends: [],
  379. referencedClasses: []
  380. }),
  381. smalltalk.AssignmentNode);
  382. smalltalk.addClass('BlockNode', smalltalk.Node, ['parameters', 'scope'], 'Compiler-AST');
  383. smalltalk.addMethod(
  384. "_accept_",
  385. smalltalk.method({
  386. selector: "accept:",
  387. category: 'visiting',
  388. fn: function (aVisitor){
  389. var self=this;
  390. return smalltalk.withContext(function($ctx) { var $1;
  391. $1=_st(aVisitor)._visitBlockNode_(self);
  392. return $1;
  393. }, self, "accept:", [aVisitor], smalltalk.BlockNode)},
  394. args: ["aVisitor"],
  395. source: "accept: aVisitor\x0a\x09^ aVisitor visitBlockNode: self",
  396. messageSends: ["visitBlockNode:"],
  397. referencedClasses: []
  398. }),
  399. smalltalk.BlockNode);
  400. smalltalk.addMethod(
  401. "_isBlockNode",
  402. smalltalk.method({
  403. selector: "isBlockNode",
  404. category: 'testing',
  405. fn: function (){
  406. var self=this;
  407. return smalltalk.withContext(function($ctx) { return true;
  408. }, self, "isBlockNode", [], smalltalk.BlockNode)},
  409. args: [],
  410. source: "isBlockNode\x0a\x09^true",
  411. messageSends: [],
  412. referencedClasses: []
  413. }),
  414. smalltalk.BlockNode);
  415. smalltalk.addMethod(
  416. "_parameters",
  417. smalltalk.method({
  418. selector: "parameters",
  419. category: 'accessing',
  420. fn: function (){
  421. var self=this;
  422. return smalltalk.withContext(function($ctx) { var $1;
  423. if(($receiver = self["@parameters"]) == nil || $receiver == undefined){
  424. self["@parameters"]=_st((smalltalk.Array || Array))._new();
  425. $1=self["@parameters"];
  426. } else {
  427. $1=self["@parameters"];
  428. };
  429. return $1;
  430. }, self, "parameters", [], smalltalk.BlockNode)},
  431. args: [],
  432. source: "parameters\x0a\x09^parameters ifNil: [parameters := Array new]",
  433. messageSends: ["ifNil:", "new"],
  434. referencedClasses: ["Array"]
  435. }),
  436. smalltalk.BlockNode);
  437. smalltalk.addMethod(
  438. "_parameters_",
  439. smalltalk.method({
  440. selector: "parameters:",
  441. category: 'accessing',
  442. fn: function (aCollection){
  443. var self=this;
  444. return smalltalk.withContext(function($ctx) { self["@parameters"]=aCollection;
  445. return self}, self, "parameters:", [aCollection], smalltalk.BlockNode)},
  446. args: ["aCollection"],
  447. source: "parameters: aCollection\x0a\x09parameters := aCollection",
  448. messageSends: [],
  449. referencedClasses: []
  450. }),
  451. smalltalk.BlockNode);
  452. smalltalk.addMethod(
  453. "_scope",
  454. smalltalk.method({
  455. selector: "scope",
  456. category: 'accessing',
  457. fn: function (){
  458. var self=this;
  459. return smalltalk.withContext(function($ctx) { return self["@scope"];
  460. }, self, "scope", [], smalltalk.BlockNode)},
  461. args: [],
  462. source: "scope\x0a\x09^ scope",
  463. messageSends: [],
  464. referencedClasses: []
  465. }),
  466. smalltalk.BlockNode);
  467. smalltalk.addMethod(
  468. "_scope_",
  469. smalltalk.method({
  470. selector: "scope:",
  471. category: 'accessing',
  472. fn: function (aLexicalScope){
  473. var self=this;
  474. return smalltalk.withContext(function($ctx) { self["@scope"]=aLexicalScope;
  475. return self}, self, "scope:", [aLexicalScope], smalltalk.BlockNode)},
  476. args: ["aLexicalScope"],
  477. source: "scope: aLexicalScope\x0a\x09scope := aLexicalScope",
  478. messageSends: [],
  479. referencedClasses: []
  480. }),
  481. smalltalk.BlockNode);
  482. smalltalk.addClass('CascadeNode', smalltalk.Node, ['receiver'], 'Compiler-AST');
  483. smalltalk.addMethod(
  484. "_accept_",
  485. smalltalk.method({
  486. selector: "accept:",
  487. category: 'visiting',
  488. fn: function (aVisitor){
  489. var self=this;
  490. return smalltalk.withContext(function($ctx) { var $1;
  491. $1=_st(aVisitor)._visitCascadeNode_(self);
  492. return $1;
  493. }, self, "accept:", [aVisitor], smalltalk.CascadeNode)},
  494. args: ["aVisitor"],
  495. source: "accept: aVisitor\x0a\x09^ aVisitor visitCascadeNode: self",
  496. messageSends: ["visitCascadeNode:"],
  497. referencedClasses: []
  498. }),
  499. smalltalk.CascadeNode);
  500. smalltalk.addMethod(
  501. "_receiver",
  502. smalltalk.method({
  503. selector: "receiver",
  504. category: 'accessing',
  505. fn: function (){
  506. var self=this;
  507. return smalltalk.withContext(function($ctx) { return self["@receiver"];
  508. }, self, "receiver", [], smalltalk.CascadeNode)},
  509. args: [],
  510. source: "receiver\x0a\x09^receiver",
  511. messageSends: [],
  512. referencedClasses: []
  513. }),
  514. smalltalk.CascadeNode);
  515. smalltalk.addMethod(
  516. "_receiver_",
  517. smalltalk.method({
  518. selector: "receiver:",
  519. category: 'accessing',
  520. fn: function (aNode){
  521. var self=this;
  522. return smalltalk.withContext(function($ctx) { self["@receiver"]=aNode;
  523. return self}, self, "receiver:", [aNode], smalltalk.CascadeNode)},
  524. args: ["aNode"],
  525. source: "receiver: aNode\x0a\x09receiver := aNode",
  526. messageSends: [],
  527. referencedClasses: []
  528. }),
  529. smalltalk.CascadeNode);
  530. smalltalk.addClass('DynamicArrayNode', smalltalk.Node, [], 'Compiler-AST');
  531. smalltalk.addMethod(
  532. "_accept_",
  533. smalltalk.method({
  534. selector: "accept:",
  535. category: 'visiting',
  536. fn: function (aVisitor){
  537. var self=this;
  538. return smalltalk.withContext(function($ctx) { var $1;
  539. $1=_st(aVisitor)._visitDynamicArrayNode_(self);
  540. return $1;
  541. }, self, "accept:", [aVisitor], smalltalk.DynamicArrayNode)},
  542. args: ["aVisitor"],
  543. source: "accept: aVisitor\x0a\x09^ aVisitor visitDynamicArrayNode: self",
  544. messageSends: ["visitDynamicArrayNode:"],
  545. referencedClasses: []
  546. }),
  547. smalltalk.DynamicArrayNode);
  548. smalltalk.addClass('DynamicDictionaryNode', smalltalk.Node, [], 'Compiler-AST');
  549. smalltalk.addMethod(
  550. "_accept_",
  551. smalltalk.method({
  552. selector: "accept:",
  553. category: 'visiting',
  554. fn: function (aVisitor){
  555. var self=this;
  556. return smalltalk.withContext(function($ctx) { var $1;
  557. $1=_st(aVisitor)._visitDynamicDictionaryNode_(self);
  558. return $1;
  559. }, self, "accept:", [aVisitor], smalltalk.DynamicDictionaryNode)},
  560. args: ["aVisitor"],
  561. source: "accept: aVisitor\x0a\x09^ aVisitor visitDynamicDictionaryNode: self",
  562. messageSends: ["visitDynamicDictionaryNode:"],
  563. referencedClasses: []
  564. }),
  565. smalltalk.DynamicDictionaryNode);
  566. smalltalk.addClass('JSStatementNode', smalltalk.Node, ['source'], 'Compiler-AST');
  567. smalltalk.addMethod(
  568. "_accept_",
  569. smalltalk.method({
  570. selector: "accept:",
  571. category: 'visiting',
  572. fn: function (aVisitor){
  573. var self=this;
  574. return smalltalk.withContext(function($ctx) { var $1;
  575. $1=_st(aVisitor)._visitJSStatementNode_(self);
  576. return $1;
  577. }, self, "accept:", [aVisitor], smalltalk.JSStatementNode)},
  578. args: ["aVisitor"],
  579. source: "accept: aVisitor\x0a\x09^ aVisitor visitJSStatementNode: self",
  580. messageSends: ["visitJSStatementNode:"],
  581. referencedClasses: []
  582. }),
  583. smalltalk.JSStatementNode);
  584. smalltalk.addMethod(
  585. "_source",
  586. smalltalk.method({
  587. selector: "source",
  588. category: 'accessing',
  589. fn: function (){
  590. var self=this;
  591. return smalltalk.withContext(function($ctx) { var $1;
  592. if(($receiver = self["@source"]) == nil || $receiver == undefined){
  593. $1="";
  594. } else {
  595. $1=self["@source"];
  596. };
  597. return $1;
  598. }, self, "source", [], smalltalk.JSStatementNode)},
  599. args: [],
  600. source: "source\x0a\x09^source ifNil: ['']",
  601. messageSends: ["ifNil:"],
  602. referencedClasses: []
  603. }),
  604. smalltalk.JSStatementNode);
  605. smalltalk.addMethod(
  606. "_source_",
  607. smalltalk.method({
  608. selector: "source:",
  609. category: 'accessing',
  610. fn: function (aString){
  611. var self=this;
  612. return smalltalk.withContext(function($ctx) { self["@source"]=aString;
  613. return self}, self, "source:", [aString], smalltalk.JSStatementNode)},
  614. args: ["aString"],
  615. source: "source: aString\x0a\x09source := aString",
  616. messageSends: [],
  617. referencedClasses: []
  618. }),
  619. smalltalk.JSStatementNode);
  620. smalltalk.addClass('MethodNode', smalltalk.Node, ['selector', 'arguments', 'source', 'scope', 'classReferences', 'messageSends', 'superSends'], 'Compiler-AST');
  621. smalltalk.addMethod(
  622. "_accept_",
  623. smalltalk.method({
  624. selector: "accept:",
  625. category: 'visiting',
  626. fn: function (aVisitor){
  627. var self=this;
  628. return smalltalk.withContext(function($ctx) { var $1;
  629. $1=_st(aVisitor)._visitMethodNode_(self);
  630. return $1;
  631. }, self, "accept:", [aVisitor], smalltalk.MethodNode)},
  632. args: ["aVisitor"],
  633. source: "accept: aVisitor\x0a\x09^ aVisitor visitMethodNode: self",
  634. messageSends: ["visitMethodNode:"],
  635. referencedClasses: []
  636. }),
  637. smalltalk.MethodNode);
  638. smalltalk.addMethod(
  639. "_arguments",
  640. smalltalk.method({
  641. selector: "arguments",
  642. category: 'accessing',
  643. fn: function (){
  644. var self=this;
  645. return smalltalk.withContext(function($ctx) { var $1;
  646. if(($receiver = self["@arguments"]) == nil || $receiver == undefined){
  647. $1=[];
  648. } else {
  649. $1=self["@arguments"];
  650. };
  651. return $1;
  652. }, self, "arguments", [], smalltalk.MethodNode)},
  653. args: [],
  654. source: "arguments\x0a\x09^arguments ifNil: [#()]",
  655. messageSends: ["ifNil:"],
  656. referencedClasses: []
  657. }),
  658. smalltalk.MethodNode);
  659. smalltalk.addMethod(
  660. "_arguments_",
  661. smalltalk.method({
  662. selector: "arguments:",
  663. category: 'accessing',
  664. fn: function (aCollection){
  665. var self=this;
  666. return smalltalk.withContext(function($ctx) { self["@arguments"]=aCollection;
  667. return self}, self, "arguments:", [aCollection], smalltalk.MethodNode)},
  668. args: ["aCollection"],
  669. source: "arguments: aCollection\x0a\x09arguments := aCollection",
  670. messageSends: [],
  671. referencedClasses: []
  672. }),
  673. smalltalk.MethodNode);
  674. smalltalk.addMethod(
  675. "_classReferences",
  676. smalltalk.method({
  677. selector: "classReferences",
  678. category: 'accessing',
  679. fn: function (){
  680. var self=this;
  681. return smalltalk.withContext(function($ctx) { return self["@classReferences"];
  682. }, self, "classReferences", [], smalltalk.MethodNode)},
  683. args: [],
  684. source: "classReferences\x0a\x09^ classReferences",
  685. messageSends: [],
  686. referencedClasses: []
  687. }),
  688. smalltalk.MethodNode);
  689. smalltalk.addMethod(
  690. "_classReferences_",
  691. smalltalk.method({
  692. selector: "classReferences:",
  693. category: 'accessing',
  694. fn: function (aCollection){
  695. var self=this;
  696. return smalltalk.withContext(function($ctx) { self["@classReferences"]=aCollection;
  697. return self}, self, "classReferences:", [aCollection], smalltalk.MethodNode)},
  698. args: ["aCollection"],
  699. source: "classReferences: aCollection\x0a\x09classReferences := aCollection",
  700. messageSends: [],
  701. referencedClasses: []
  702. }),
  703. smalltalk.MethodNode);
  704. smalltalk.addMethod(
  705. "_messageSends",
  706. smalltalk.method({
  707. selector: "messageSends",
  708. category: 'accessing',
  709. fn: function (){
  710. var self=this;
  711. return smalltalk.withContext(function($ctx) { return self["@messageSends"];
  712. }, self, "messageSends", [], smalltalk.MethodNode)},
  713. args: [],
  714. source: "messageSends\x0a\x09^ messageSends",
  715. messageSends: [],
  716. referencedClasses: []
  717. }),
  718. smalltalk.MethodNode);
  719. smalltalk.addMethod(
  720. "_messageSends_",
  721. smalltalk.method({
  722. selector: "messageSends:",
  723. category: 'accessing',
  724. fn: function (aCollection){
  725. var self=this;
  726. return smalltalk.withContext(function($ctx) { self["@messageSends"]=aCollection;
  727. return self}, self, "messageSends:", [aCollection], smalltalk.MethodNode)},
  728. args: ["aCollection"],
  729. source: "messageSends: aCollection\x0a\x09messageSends := aCollection",
  730. messageSends: [],
  731. referencedClasses: []
  732. }),
  733. smalltalk.MethodNode);
  734. smalltalk.addMethod(
  735. "_scope",
  736. smalltalk.method({
  737. selector: "scope",
  738. category: 'accessing',
  739. fn: function (){
  740. var self=this;
  741. return smalltalk.withContext(function($ctx) { return self["@scope"];
  742. }, self, "scope", [], smalltalk.MethodNode)},
  743. args: [],
  744. source: "scope\x0a\x09^ scope",
  745. messageSends: [],
  746. referencedClasses: []
  747. }),
  748. smalltalk.MethodNode);
  749. smalltalk.addMethod(
  750. "_scope_",
  751. smalltalk.method({
  752. selector: "scope:",
  753. category: 'accessing',
  754. fn: function (aMethodScope){
  755. var self=this;
  756. return smalltalk.withContext(function($ctx) { self["@scope"]=aMethodScope;
  757. return self}, self, "scope:", [aMethodScope], smalltalk.MethodNode)},
  758. args: ["aMethodScope"],
  759. source: "scope: aMethodScope\x0a\x09scope := aMethodScope",
  760. messageSends: [],
  761. referencedClasses: []
  762. }),
  763. smalltalk.MethodNode);
  764. smalltalk.addMethod(
  765. "_selector",
  766. smalltalk.method({
  767. selector: "selector",
  768. category: 'accessing',
  769. fn: function (){
  770. var self=this;
  771. return smalltalk.withContext(function($ctx) { return self["@selector"];
  772. }, self, "selector", [], smalltalk.MethodNode)},
  773. args: [],
  774. source: "selector\x0a\x09^selector",
  775. messageSends: [],
  776. referencedClasses: []
  777. }),
  778. smalltalk.MethodNode);
  779. smalltalk.addMethod(
  780. "_selector_",
  781. smalltalk.method({
  782. selector: "selector:",
  783. category: 'accessing',
  784. fn: function (aString){
  785. var self=this;
  786. return smalltalk.withContext(function($ctx) { self["@selector"]=aString;
  787. return self}, self, "selector:", [aString], smalltalk.MethodNode)},
  788. args: ["aString"],
  789. source: "selector: aString\x0a\x09selector := aString",
  790. messageSends: [],
  791. referencedClasses: []
  792. }),
  793. smalltalk.MethodNode);
  794. smalltalk.addMethod(
  795. "_source",
  796. smalltalk.method({
  797. selector: "source",
  798. category: 'accessing',
  799. fn: function (){
  800. var self=this;
  801. return smalltalk.withContext(function($ctx) { return self["@source"];
  802. }, self, "source", [], smalltalk.MethodNode)},
  803. args: [],
  804. source: "source\x0a\x09^source",
  805. messageSends: [],
  806. referencedClasses: []
  807. }),
  808. smalltalk.MethodNode);
  809. smalltalk.addMethod(
  810. "_source_",
  811. smalltalk.method({
  812. selector: "source:",
  813. category: 'accessing',
  814. fn: function (aString){
  815. var self=this;
  816. return smalltalk.withContext(function($ctx) { self["@source"]=aString;
  817. return self}, self, "source:", [aString], smalltalk.MethodNode)},
  818. args: ["aString"],
  819. source: "source: aString\x0a\x09source := aString",
  820. messageSends: [],
  821. referencedClasses: []
  822. }),
  823. smalltalk.MethodNode);
  824. smalltalk.addMethod(
  825. "_superSends",
  826. smalltalk.method({
  827. selector: "superSends",
  828. category: 'accessing',
  829. fn: function (){
  830. var self=this;
  831. return smalltalk.withContext(function($ctx) { return self["@superSends"];
  832. }, self, "superSends", [], smalltalk.MethodNode)},
  833. args: [],
  834. source: "superSends\x0a\x09^ superSends",
  835. messageSends: [],
  836. referencedClasses: []
  837. }),
  838. smalltalk.MethodNode);
  839. smalltalk.addMethod(
  840. "_superSends_",
  841. smalltalk.method({
  842. selector: "superSends:",
  843. category: 'accessing',
  844. fn: function (aCollection){
  845. var self=this;
  846. return smalltalk.withContext(function($ctx) { self["@superSends"]=aCollection;
  847. return self}, self, "superSends:", [aCollection], smalltalk.MethodNode)},
  848. args: ["aCollection"],
  849. source: "superSends: aCollection\x0a\x09superSends := aCollection",
  850. messageSends: [],
  851. referencedClasses: []
  852. }),
  853. smalltalk.MethodNode);
  854. smalltalk.addClass('ReturnNode', smalltalk.Node, ['scope'], 'Compiler-AST');
  855. smalltalk.addMethod(
  856. "_accept_",
  857. smalltalk.method({
  858. selector: "accept:",
  859. category: 'visiting',
  860. fn: function (aVisitor){
  861. var self=this;
  862. return smalltalk.withContext(function($ctx) { var $1;
  863. $1=_st(aVisitor)._visitReturnNode_(self);
  864. return $1;
  865. }, self, "accept:", [aVisitor], smalltalk.ReturnNode)},
  866. args: ["aVisitor"],
  867. source: "accept: aVisitor\x0a\x09^ aVisitor visitReturnNode: self",
  868. messageSends: ["visitReturnNode:"],
  869. referencedClasses: []
  870. }),
  871. smalltalk.ReturnNode);
  872. smalltalk.addMethod(
  873. "_isReturnNode",
  874. smalltalk.method({
  875. selector: "isReturnNode",
  876. category: 'testing',
  877. fn: function (){
  878. var self=this;
  879. return smalltalk.withContext(function($ctx) { return true;
  880. }, self, "isReturnNode", [], smalltalk.ReturnNode)},
  881. args: [],
  882. source: "isReturnNode\x0a\x09^ true",
  883. messageSends: [],
  884. referencedClasses: []
  885. }),
  886. smalltalk.ReturnNode);
  887. smalltalk.addMethod(
  888. "_nonLocalReturn",
  889. smalltalk.method({
  890. selector: "nonLocalReturn",
  891. category: 'testing',
  892. fn: function (){
  893. var self=this;
  894. return smalltalk.withContext(function($ctx) { var $1;
  895. $1=_st(_st(_st(self)._scope())._isMethodScope())._not();
  896. return $1;
  897. }, self, "nonLocalReturn", [], smalltalk.ReturnNode)},
  898. args: [],
  899. source: "nonLocalReturn\x0a\x09^ self scope isMethodScope not",
  900. messageSends: ["not", "isMethodScope", "scope"],
  901. referencedClasses: []
  902. }),
  903. smalltalk.ReturnNode);
  904. smalltalk.addMethod(
  905. "_scope",
  906. smalltalk.method({
  907. selector: "scope",
  908. category: 'accessing',
  909. fn: function (){
  910. var self=this;
  911. return smalltalk.withContext(function($ctx) { return self["@scope"];
  912. }, self, "scope", [], smalltalk.ReturnNode)},
  913. args: [],
  914. source: "scope\x0a\x09^ scope",
  915. messageSends: [],
  916. referencedClasses: []
  917. }),
  918. smalltalk.ReturnNode);
  919. smalltalk.addMethod(
  920. "_scope_",
  921. smalltalk.method({
  922. selector: "scope:",
  923. category: 'accessing',
  924. fn: function (aLexicalScope){
  925. var self=this;
  926. return smalltalk.withContext(function($ctx) { self["@scope"]=aLexicalScope;
  927. return self}, self, "scope:", [aLexicalScope], smalltalk.ReturnNode)},
  928. args: ["aLexicalScope"],
  929. source: "scope: aLexicalScope\x0a\x09scope := aLexicalScope",
  930. messageSends: [],
  931. referencedClasses: []
  932. }),
  933. smalltalk.ReturnNode);
  934. smalltalk.addClass('SendNode', smalltalk.Node, ['selector', 'arguments', 'receiver', 'superSend', 'index'], 'Compiler-AST');
  935. smalltalk.addMethod(
  936. "_accept_",
  937. smalltalk.method({
  938. selector: "accept:",
  939. category: 'visiting',
  940. fn: function (aVisitor){
  941. var self=this;
  942. return smalltalk.withContext(function($ctx) { var $1;
  943. $1=_st(aVisitor)._visitSendNode_(self);
  944. return $1;
  945. }, self, "accept:", [aVisitor], smalltalk.SendNode)},
  946. args: ["aVisitor"],
  947. source: "accept: aVisitor\x0a\x09^ aVisitor visitSendNode: self",
  948. messageSends: ["visitSendNode:"],
  949. referencedClasses: []
  950. }),
  951. smalltalk.SendNode);
  952. smalltalk.addMethod(
  953. "_arguments",
  954. smalltalk.method({
  955. selector: "arguments",
  956. category: 'accessing',
  957. fn: function (){
  958. var self=this;
  959. return smalltalk.withContext(function($ctx) { var $1;
  960. if(($receiver = self["@arguments"]) == nil || $receiver == undefined){
  961. self["@arguments"]=[];
  962. $1=self["@arguments"];
  963. } else {
  964. $1=self["@arguments"];
  965. };
  966. return $1;
  967. }, self, "arguments", [], smalltalk.SendNode)},
  968. args: [],
  969. source: "arguments\x0a\x09^arguments ifNil: [arguments := #()]",
  970. messageSends: ["ifNil:"],
  971. referencedClasses: []
  972. }),
  973. smalltalk.SendNode);
  974. smalltalk.addMethod(
  975. "_arguments_",
  976. smalltalk.method({
  977. selector: "arguments:",
  978. category: 'accessing',
  979. fn: function (aCollection){
  980. var self=this;
  981. return smalltalk.withContext(function($ctx) { self["@arguments"]=aCollection;
  982. return self}, self, "arguments:", [aCollection], smalltalk.SendNode)},
  983. args: ["aCollection"],
  984. source: "arguments: aCollection\x0a\x09arguments := aCollection",
  985. messageSends: [],
  986. referencedClasses: []
  987. }),
  988. smalltalk.SendNode);
  989. smalltalk.addMethod(
  990. "_cascadeNodeWithMessages_",
  991. smalltalk.method({
  992. selector: "cascadeNodeWithMessages:",
  993. category: 'accessing',
  994. fn: function (aCollection){
  995. var self=this;
  996. return smalltalk.withContext(function($ctx) { var $1,$2,$4,$5,$3;
  997. var first;
  998. $1=_st((smalltalk.SendNode || SendNode))._new();
  999. _st($1)._selector_(_st(self)._selector());
  1000. _st($1)._arguments_(_st(self)._arguments());
  1001. $2=_st($1)._yourself();
  1002. first=$2;
  1003. $4=_st((smalltalk.CascadeNode || CascadeNode))._new();
  1004. _st($4)._receiver_(_st(self)._receiver());
  1005. _st($4)._nodes_(_st(_st((smalltalk.Array || Array))._with_(first)).__comma(aCollection));
  1006. $5=_st($4)._yourself();
  1007. $3=$5;
  1008. return $3;
  1009. }, self, "cascadeNodeWithMessages:", [aCollection], smalltalk.SendNode)},
  1010. args: ["aCollection"],
  1011. source: "cascadeNodeWithMessages: aCollection\x0a\x09| first |\x0a\x09first := SendNode new\x0a\x09 selector: self selector;\x0a\x09 arguments: self arguments;\x0a\x09 yourself.\x0a\x09^CascadeNode new\x0a\x09 receiver: self receiver;\x0a\x09 nodes: (Array with: first), aCollection;\x0a\x09 yourself",
  1012. messageSends: ["selector:", "selector", "new", "arguments:", "arguments", "yourself", "receiver:", "receiver", "nodes:", ",", "with:"],
  1013. referencedClasses: ["SendNode", "CascadeNode", "Array"]
  1014. }),
  1015. smalltalk.SendNode);
  1016. smalltalk.addMethod(
  1017. "_index",
  1018. smalltalk.method({
  1019. selector: "index",
  1020. category: 'accessing',
  1021. fn: function (){
  1022. var self=this;
  1023. return smalltalk.withContext(function($ctx) { return self["@index"];
  1024. }, self, "index", [], smalltalk.SendNode)},
  1025. args: [],
  1026. source: "index\x0a\x09^ index",
  1027. messageSends: [],
  1028. referencedClasses: []
  1029. }),
  1030. smalltalk.SendNode);
  1031. smalltalk.addMethod(
  1032. "_index_",
  1033. smalltalk.method({
  1034. selector: "index:",
  1035. category: 'accessing',
  1036. fn: function (anInteger){
  1037. var self=this;
  1038. return smalltalk.withContext(function($ctx) { self["@index"]=anInteger;
  1039. return self}, self, "index:", [anInteger], smalltalk.SendNode)},
  1040. args: ["anInteger"],
  1041. source: "index: anInteger\x0a\x09index := anInteger",
  1042. messageSends: [],
  1043. referencedClasses: []
  1044. }),
  1045. smalltalk.SendNode);
  1046. smalltalk.addMethod(
  1047. "_isSendNode",
  1048. smalltalk.method({
  1049. selector: "isSendNode",
  1050. category: 'testing',
  1051. fn: function (){
  1052. var self=this;
  1053. return smalltalk.withContext(function($ctx) { return true;
  1054. }, self, "isSendNode", [], smalltalk.SendNode)},
  1055. args: [],
  1056. source: "isSendNode\x0a\x09^ true",
  1057. messageSends: [],
  1058. referencedClasses: []
  1059. }),
  1060. smalltalk.SendNode);
  1061. smalltalk.addMethod(
  1062. "_nodes",
  1063. smalltalk.method({
  1064. selector: "nodes",
  1065. category: 'accessing',
  1066. fn: function (){
  1067. var self=this;
  1068. return smalltalk.withContext(function($ctx) { var $2,$3,$1;
  1069. $2=_st((smalltalk.Array || Array))._withAll_(_st(self)._arguments());
  1070. _st($2)._add_(_st(self)._receiver());
  1071. $3=_st($2)._yourself();
  1072. $1=$3;
  1073. return $1;
  1074. }, self, "nodes", [], smalltalk.SendNode)},
  1075. args: [],
  1076. source: "nodes\x0a\x09^ (Array withAll: self arguments)\x0a\x09\x09add: self receiver;\x0a\x09\x09yourself",
  1077. messageSends: ["add:", "receiver", "withAll:", "arguments", "yourself"],
  1078. referencedClasses: ["Array"]
  1079. }),
  1080. smalltalk.SendNode);
  1081. smalltalk.addMethod(
  1082. "_receiver",
  1083. smalltalk.method({
  1084. selector: "receiver",
  1085. category: 'accessing',
  1086. fn: function (){
  1087. var self=this;
  1088. return smalltalk.withContext(function($ctx) { return self["@receiver"];
  1089. }, self, "receiver", [], smalltalk.SendNode)},
  1090. args: [],
  1091. source: "receiver\x0a\x09^receiver",
  1092. messageSends: [],
  1093. referencedClasses: []
  1094. }),
  1095. smalltalk.SendNode);
  1096. smalltalk.addMethod(
  1097. "_receiver_",
  1098. smalltalk.method({
  1099. selector: "receiver:",
  1100. category: 'accessing',
  1101. fn: function (aNode){
  1102. var self=this;
  1103. return smalltalk.withContext(function($ctx) { self["@receiver"]=aNode;
  1104. return self}, self, "receiver:", [aNode], smalltalk.SendNode)},
  1105. args: ["aNode"],
  1106. source: "receiver: aNode\x0a\x09receiver := aNode",
  1107. messageSends: [],
  1108. referencedClasses: []
  1109. }),
  1110. smalltalk.SendNode);
  1111. smalltalk.addMethod(
  1112. "_selector",
  1113. smalltalk.method({
  1114. selector: "selector",
  1115. category: 'accessing',
  1116. fn: function (){
  1117. var self=this;
  1118. return smalltalk.withContext(function($ctx) { return self["@selector"];
  1119. }, self, "selector", [], smalltalk.SendNode)},
  1120. args: [],
  1121. source: "selector\x0a\x09^selector",
  1122. messageSends: [],
  1123. referencedClasses: []
  1124. }),
  1125. smalltalk.SendNode);
  1126. smalltalk.addMethod(
  1127. "_selector_",
  1128. smalltalk.method({
  1129. selector: "selector:",
  1130. category: 'accessing',
  1131. fn: function (aString){
  1132. var self=this;
  1133. return smalltalk.withContext(function($ctx) { self["@selector"]=aString;
  1134. return self}, self, "selector:", [aString], smalltalk.SendNode)},
  1135. args: ["aString"],
  1136. source: "selector: aString\x0a\x09selector := aString",
  1137. messageSends: [],
  1138. referencedClasses: []
  1139. }),
  1140. smalltalk.SendNode);
  1141. smalltalk.addMethod(
  1142. "_superSend",
  1143. smalltalk.method({
  1144. selector: "superSend",
  1145. category: 'accessing',
  1146. fn: function (){
  1147. var self=this;
  1148. return smalltalk.withContext(function($ctx) { var $1;
  1149. if(($receiver = self["@superSend"]) == nil || $receiver == undefined){
  1150. $1=false;
  1151. } else {
  1152. $1=self["@superSend"];
  1153. };
  1154. return $1;
  1155. }, self, "superSend", [], smalltalk.SendNode)},
  1156. args: [],
  1157. source: "superSend\x0a\x09^ superSend ifNil: [ false ]",
  1158. messageSends: ["ifNil:"],
  1159. referencedClasses: []
  1160. }),
  1161. smalltalk.SendNode);
  1162. smalltalk.addMethod(
  1163. "_superSend_",
  1164. smalltalk.method({
  1165. selector: "superSend:",
  1166. category: 'accessing',
  1167. fn: function (aBoolean){
  1168. var self=this;
  1169. return smalltalk.withContext(function($ctx) { self["@superSend"]=aBoolean;
  1170. return self}, self, "superSend:", [aBoolean], smalltalk.SendNode)},
  1171. args: ["aBoolean"],
  1172. source: "superSend: aBoolean\x0a\x09superSend := aBoolean",
  1173. messageSends: [],
  1174. referencedClasses: []
  1175. }),
  1176. smalltalk.SendNode);
  1177. smalltalk.addMethod(
  1178. "_valueForReceiver_",
  1179. smalltalk.method({
  1180. selector: "valueForReceiver:",
  1181. category: 'accessing',
  1182. fn: function (anObject){
  1183. var self=this;
  1184. return smalltalk.withContext(function($ctx) { var $2,$4,$3,$5,$1;
  1185. $2=_st((smalltalk.SendNode || SendNode))._new();
  1186. $4=_st(self)._receiver();
  1187. if(($receiver = $4) == nil || $receiver == undefined){
  1188. $3=anObject;
  1189. } else {
  1190. $3=_st(_st(self)._receiver())._valueForReceiver_(anObject);
  1191. };
  1192. _st($2)._receiver_($3);
  1193. _st($2)._selector_(_st(self)._selector());
  1194. _st($2)._arguments_(_st(self)._arguments());
  1195. $5=_st($2)._yourself();
  1196. $1=$5;
  1197. return $1;
  1198. }, self, "valueForReceiver:", [anObject], smalltalk.SendNode)},
  1199. args: ["anObject"],
  1200. source: "valueForReceiver: anObject\x0a\x09^SendNode new\x0a\x09 receiver: (self receiver \x0a\x09\x09ifNil: [anObject]\x0a\x09\x09ifNotNil: [self receiver valueForReceiver: anObject]);\x0a\x09 selector: self selector;\x0a\x09 arguments: self arguments;\x0a\x09 yourself",
  1201. messageSends: ["receiver:", "ifNil:ifNotNil:", "valueForReceiver:", "receiver", "new", "selector:", "selector", "arguments:", "arguments", "yourself"],
  1202. referencedClasses: ["SendNode"]
  1203. }),
  1204. smalltalk.SendNode);
  1205. smalltalk.addClass('SequenceNode', smalltalk.Node, ['temps', 'scope'], 'Compiler-AST');
  1206. smalltalk.addMethod(
  1207. "_accept_",
  1208. smalltalk.method({
  1209. selector: "accept:",
  1210. category: 'visiting',
  1211. fn: function (aVisitor){
  1212. var self=this;
  1213. return smalltalk.withContext(function($ctx) { var $1;
  1214. $1=_st(aVisitor)._visitSequenceNode_(self);
  1215. return $1;
  1216. }, self, "accept:", [aVisitor], smalltalk.SequenceNode)},
  1217. args: ["aVisitor"],
  1218. source: "accept: aVisitor\x0a\x09^ aVisitor visitSequenceNode: self",
  1219. messageSends: ["visitSequenceNode:"],
  1220. referencedClasses: []
  1221. }),
  1222. smalltalk.SequenceNode);
  1223. smalltalk.addMethod(
  1224. "_asBlockSequenceNode",
  1225. smalltalk.method({
  1226. selector: "asBlockSequenceNode",
  1227. category: 'testing',
  1228. fn: function (){
  1229. var self=this;
  1230. return smalltalk.withContext(function($ctx) { var $2,$3,$1;
  1231. $2=_st((smalltalk.BlockSequenceNode || BlockSequenceNode))._new();
  1232. _st($2)._nodes_(_st(self)._nodes());
  1233. _st($2)._temps_(_st(self)._temps());
  1234. $3=_st($2)._yourself();
  1235. $1=$3;
  1236. return $1;
  1237. }, self, "asBlockSequenceNode", [], smalltalk.SequenceNode)},
  1238. args: [],
  1239. source: "asBlockSequenceNode\x0a\x09^BlockSequenceNode new\x0a\x09 nodes: self nodes;\x0a\x09 temps: self temps;\x0a\x09 yourself",
  1240. messageSends: ["nodes:", "nodes", "new", "temps:", "temps", "yourself"],
  1241. referencedClasses: ["BlockSequenceNode"]
  1242. }),
  1243. smalltalk.SequenceNode);
  1244. smalltalk.addMethod(
  1245. "_scope",
  1246. smalltalk.method({
  1247. selector: "scope",
  1248. category: 'accessing',
  1249. fn: function (){
  1250. var self=this;
  1251. return smalltalk.withContext(function($ctx) { return self["@scope"];
  1252. }, self, "scope", [], smalltalk.SequenceNode)},
  1253. args: [],
  1254. source: "scope\x0a\x09^ scope",
  1255. messageSends: [],
  1256. referencedClasses: []
  1257. }),
  1258. smalltalk.SequenceNode);
  1259. smalltalk.addMethod(
  1260. "_scope_",
  1261. smalltalk.method({
  1262. selector: "scope:",
  1263. category: 'accessing',
  1264. fn: function (aLexicalScope){
  1265. var self=this;
  1266. return smalltalk.withContext(function($ctx) { self["@scope"]=aLexicalScope;
  1267. return self}, self, "scope:", [aLexicalScope], smalltalk.SequenceNode)},
  1268. args: ["aLexicalScope"],
  1269. source: "scope: aLexicalScope\x0a\x09scope := aLexicalScope",
  1270. messageSends: [],
  1271. referencedClasses: []
  1272. }),
  1273. smalltalk.SequenceNode);
  1274. smalltalk.addMethod(
  1275. "_temps",
  1276. smalltalk.method({
  1277. selector: "temps",
  1278. category: 'accessing',
  1279. fn: function (){
  1280. var self=this;
  1281. return smalltalk.withContext(function($ctx) { var $1;
  1282. if(($receiver = self["@temps"]) == nil || $receiver == undefined){
  1283. $1=[];
  1284. } else {
  1285. $1=self["@temps"];
  1286. };
  1287. return $1;
  1288. }, self, "temps", [], smalltalk.SequenceNode)},
  1289. args: [],
  1290. source: "temps\x0a\x09^temps ifNil: [#()]",
  1291. messageSends: ["ifNil:"],
  1292. referencedClasses: []
  1293. }),
  1294. smalltalk.SequenceNode);
  1295. smalltalk.addMethod(
  1296. "_temps_",
  1297. smalltalk.method({
  1298. selector: "temps:",
  1299. category: 'accessing',
  1300. fn: function (aCollection){
  1301. var self=this;
  1302. return smalltalk.withContext(function($ctx) { self["@temps"]=aCollection;
  1303. return self}, self, "temps:", [aCollection], smalltalk.SequenceNode)},
  1304. args: ["aCollection"],
  1305. source: "temps: aCollection\x0a\x09temps := aCollection",
  1306. messageSends: [],
  1307. referencedClasses: []
  1308. }),
  1309. smalltalk.SequenceNode);
  1310. smalltalk.addClass('BlockSequenceNode', smalltalk.SequenceNode, [], 'Compiler-AST');
  1311. smalltalk.addMethod(
  1312. "_accept_",
  1313. smalltalk.method({
  1314. selector: "accept:",
  1315. category: 'visiting',
  1316. fn: function (aVisitor){
  1317. var self=this;
  1318. return smalltalk.withContext(function($ctx) { var $1;
  1319. $1=_st(aVisitor)._visitBlockSequenceNode_(self);
  1320. return $1;
  1321. }, self, "accept:", [aVisitor], smalltalk.BlockSequenceNode)},
  1322. args: ["aVisitor"],
  1323. source: "accept: aVisitor\x0a\x09^ aVisitor visitBlockSequenceNode: self",
  1324. messageSends: ["visitBlockSequenceNode:"],
  1325. referencedClasses: []
  1326. }),
  1327. smalltalk.BlockSequenceNode);
  1328. smalltalk.addMethod(
  1329. "_isBlockSequenceNode",
  1330. smalltalk.method({
  1331. selector: "isBlockSequenceNode",
  1332. category: 'testing',
  1333. fn: function (){
  1334. var self=this;
  1335. return smalltalk.withContext(function($ctx) { return true;
  1336. }, self, "isBlockSequenceNode", [], smalltalk.BlockSequenceNode)},
  1337. args: [],
  1338. source: "isBlockSequenceNode\x0a\x09^true",
  1339. messageSends: [],
  1340. referencedClasses: []
  1341. }),
  1342. smalltalk.BlockSequenceNode);
  1343. smalltalk.addClass('ValueNode', smalltalk.Node, ['value'], 'Compiler-AST');
  1344. smalltalk.addMethod(
  1345. "_accept_",
  1346. smalltalk.method({
  1347. selector: "accept:",
  1348. category: 'visiting',
  1349. fn: function (aVisitor){
  1350. var self=this;
  1351. return smalltalk.withContext(function($ctx) { var $1;
  1352. $1=_st(aVisitor)._visitValueNode_(self);
  1353. return $1;
  1354. }, self, "accept:", [aVisitor], smalltalk.ValueNode)},
  1355. args: ["aVisitor"],
  1356. source: "accept: aVisitor\x0a\x09^ aVisitor visitValueNode: self",
  1357. messageSends: ["visitValueNode:"],
  1358. referencedClasses: []
  1359. }),
  1360. smalltalk.ValueNode);
  1361. smalltalk.addMethod(
  1362. "_isValueNode",
  1363. smalltalk.method({
  1364. selector: "isValueNode",
  1365. category: 'testing',
  1366. fn: function (){
  1367. var self=this;
  1368. return smalltalk.withContext(function($ctx) { return true;
  1369. }, self, "isValueNode", [], smalltalk.ValueNode)},
  1370. args: [],
  1371. source: "isValueNode\x0a\x09^true",
  1372. messageSends: [],
  1373. referencedClasses: []
  1374. }),
  1375. smalltalk.ValueNode);
  1376. smalltalk.addMethod(
  1377. "_value",
  1378. smalltalk.method({
  1379. selector: "value",
  1380. category: 'accessing',
  1381. fn: function (){
  1382. var self=this;
  1383. return smalltalk.withContext(function($ctx) { return self["@value"];
  1384. }, self, "value", [], smalltalk.ValueNode)},
  1385. args: [],
  1386. source: "value\x0a\x09^value",
  1387. messageSends: [],
  1388. referencedClasses: []
  1389. }),
  1390. smalltalk.ValueNode);
  1391. smalltalk.addMethod(
  1392. "_value_",
  1393. smalltalk.method({
  1394. selector: "value:",
  1395. category: 'accessing',
  1396. fn: function (anObject){
  1397. var self=this;
  1398. return smalltalk.withContext(function($ctx) { self["@value"]=anObject;
  1399. return self}, self, "value:", [anObject], smalltalk.ValueNode)},
  1400. args: ["anObject"],
  1401. source: "value: anObject\x0a\x09value := anObject",
  1402. messageSends: [],
  1403. referencedClasses: []
  1404. }),
  1405. smalltalk.ValueNode);
  1406. smalltalk.addClass('VariableNode', smalltalk.ValueNode, ['assigned', 'binding'], 'Compiler-AST');
  1407. smalltalk.addMethod(
  1408. "_accept_",
  1409. smalltalk.method({
  1410. selector: "accept:",
  1411. category: 'visiting',
  1412. fn: function (aVisitor){
  1413. var self=this;
  1414. return smalltalk.withContext(function($ctx) { var $1;
  1415. $1=_st(aVisitor)._visitVariableNode_(self);
  1416. return $1;
  1417. }, self, "accept:", [aVisitor], smalltalk.VariableNode)},
  1418. args: ["aVisitor"],
  1419. source: "accept: aVisitor\x0a\x09^ aVisitor visitVariableNode: self",
  1420. messageSends: ["visitVariableNode:"],
  1421. referencedClasses: []
  1422. }),
  1423. smalltalk.VariableNode);
  1424. smalltalk.addMethod(
  1425. "_alias",
  1426. smalltalk.method({
  1427. selector: "alias",
  1428. category: 'accessing',
  1429. fn: function (){
  1430. var self=this;
  1431. return smalltalk.withContext(function($ctx) { var $1;
  1432. $1=_st(_st(self)._binding())._alias();
  1433. return $1;
  1434. }, self, "alias", [], smalltalk.VariableNode)},
  1435. args: [],
  1436. source: "alias\x0a\x09^ self binding alias",
  1437. messageSends: ["alias", "binding"],
  1438. referencedClasses: []
  1439. }),
  1440. smalltalk.VariableNode);
  1441. smalltalk.addMethod(
  1442. "_assigned",
  1443. smalltalk.method({
  1444. selector: "assigned",
  1445. category: 'accessing',
  1446. fn: function (){
  1447. var self=this;
  1448. return smalltalk.withContext(function($ctx) { var $1;
  1449. if(($receiver = self["@assigned"]) == nil || $receiver == undefined){
  1450. $1=false;
  1451. } else {
  1452. $1=self["@assigned"];
  1453. };
  1454. return $1;
  1455. }, self, "assigned", [], smalltalk.VariableNode)},
  1456. args: [],
  1457. source: "assigned\x0a\x09^assigned ifNil: [false]",
  1458. messageSends: ["ifNil:"],
  1459. referencedClasses: []
  1460. }),
  1461. smalltalk.VariableNode);
  1462. smalltalk.addMethod(
  1463. "_assigned_",
  1464. smalltalk.method({
  1465. selector: "assigned:",
  1466. category: 'accessing',
  1467. fn: function (aBoolean){
  1468. var self=this;
  1469. return smalltalk.withContext(function($ctx) { self["@assigned"]=aBoolean;
  1470. return self}, self, "assigned:", [aBoolean], smalltalk.VariableNode)},
  1471. args: ["aBoolean"],
  1472. source: "assigned: aBoolean\x0a\x09assigned := aBoolean",
  1473. messageSends: [],
  1474. referencedClasses: []
  1475. }),
  1476. smalltalk.VariableNode);
  1477. smalltalk.addMethod(
  1478. "_beAssigned",
  1479. smalltalk.method({
  1480. selector: "beAssigned",
  1481. category: 'accessing',
  1482. fn: function (){
  1483. var self=this;
  1484. return smalltalk.withContext(function($ctx) { _st(_st(self)._binding())._validateAssignment();
  1485. self["@assigned"]=true;
  1486. return self}, self, "beAssigned", [], smalltalk.VariableNode)},
  1487. args: [],
  1488. source: "beAssigned\x0a\x09self binding validateAssignment.\x0a\x09assigned := true",
  1489. messageSends: ["validateAssignment", "binding"],
  1490. referencedClasses: []
  1491. }),
  1492. smalltalk.VariableNode);
  1493. smalltalk.addMethod(
  1494. "_binding",
  1495. smalltalk.method({
  1496. selector: "binding",
  1497. category: 'accessing',
  1498. fn: function (){
  1499. var self=this;
  1500. return smalltalk.withContext(function($ctx) { return self["@binding"];
  1501. }, self, "binding", [], smalltalk.VariableNode)},
  1502. args: [],
  1503. source: "binding\x0a\x09^ binding",
  1504. messageSends: [],
  1505. referencedClasses: []
  1506. }),
  1507. smalltalk.VariableNode);
  1508. smalltalk.addMethod(
  1509. "_binding_",
  1510. smalltalk.method({
  1511. selector: "binding:",
  1512. category: 'accessing',
  1513. fn: function (aScopeVar){
  1514. var self=this;
  1515. return smalltalk.withContext(function($ctx) { self["@binding"]=aScopeVar;
  1516. return self}, self, "binding:", [aScopeVar], smalltalk.VariableNode)},
  1517. args: ["aScopeVar"],
  1518. source: "binding: aScopeVar\x0a\x09binding := aScopeVar",
  1519. messageSends: [],
  1520. referencedClasses: []
  1521. }),
  1522. smalltalk.VariableNode);
  1523. smalltalk.addClass('ClassReferenceNode', smalltalk.VariableNode, [], 'Compiler-AST');
  1524. smalltalk.addMethod(
  1525. "_accept_",
  1526. smalltalk.method({
  1527. selector: "accept:",
  1528. category: 'visiting',
  1529. fn: function (aVisitor){
  1530. var self=this;
  1531. return smalltalk.withContext(function($ctx) { var $1;
  1532. $1=_st(aVisitor)._visitClassReferenceNode_(self);
  1533. return $1;
  1534. }, self, "accept:", [aVisitor], smalltalk.ClassReferenceNode)},
  1535. args: ["aVisitor"],
  1536. source: "accept: aVisitor\x0a\x09^ aVisitor visitClassReferenceNode: self",
  1537. messageSends: ["visitClassReferenceNode:"],
  1538. referencedClasses: []
  1539. }),
  1540. smalltalk.ClassReferenceNode);