Compiler-AST.js 48 KB

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