2
0

Compiler-AST.js 50 KB

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