Compiler-AST.js 50 KB

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