1
0

Compiler-AST.js 50 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989990991992993994995996997998999100010011002100310041005100610071008100910101011101210131014101510161017101810191020102110221023102410251026102710281029103010311032103310341035103610371038103910401041104210431044104510461047104810491050105110521053105410551056105710581059106010611062106310641065106610671068106910701071107210731074107510761077107810791080108110821083108410851086108710881089109010911092109310941095109610971098109911001101110211031104110511061107110811091110111111121113111411151116111711181119112011211122112311241125112611271128112911301131113211331134113511361137113811391140114111421143114411451146114711481149115011511152115311541155115611571158115911601161116211631164116511661167116811691170117111721173117411751176117711781179118011811182118311841185118611871188118911901191119211931194119511961197119811991200120112021203120412051206120712081209121012111212121312141215121612171218121912201221122212231224122512261227122812291230123112321233123412351236123712381239124012411242124312441245124612471248124912501251125212531254125512561257125812591260126112621263126412651266126712681269127012711272127312741275127612771278127912801281128212831284128512861287128812891290129112921293129412951296129712981299130013011302130313041305130613071308130913101311131213131314131513161317131813191320132113221323132413251326132713281329133013311332133313341335133613371338133913401341134213431344134513461347134813491350135113521353135413551356135713581359136013611362136313641365136613671368136913701371137213731374137513761377137813791380138113821383138413851386138713881389139013911392139313941395139613971398139914001401140214031404140514061407140814091410141114121413141414151416141714181419142014211422142314241425142614271428142914301431143214331434143514361437143814391440144114421443144414451446144714481449145014511452145314541455145614571458145914601461146214631464146514661467146814691470147114721473147414751476147714781479148014811482148314841485148614871488148914901491149214931494149514961497149814991500150115021503150415051506150715081509151015111512151315141515151615171518151915201521152215231524152515261527152815291530153115321533153415351536153715381539154015411542154315441545154615471548154915501551155215531554155515561557155815591560156115621563156415651566156715681569157015711572157315741575157615771578157915801581158215831584158515861587158815891590159115921593159415951596159715981599160016011602160316041605160616071608160916101611161216131614161516161617161816191620162116221623162416251626162716281629163016311632163316341635163616371638163916401641164216431644164516461647164816491650165116521653165416551656165716581659166016611662166316641665166616671668166916701671167216731674167516761677167816791680168116821683168416851686168716881689169016911692169316941695169616971698169917001701170217031704170517061707170817091710171117121713171417151716171717181719172017211722172317241725172617271728172917301731173217331734173517361737173817391740174117421743174417451746174717481749175017511752175317541755175617571758175917601761176217631764176517661767176817691770177117721773177417751776177717781779178017811782178317841785178617871788178917901791179217931794179517961797179817991800180118021803180418051806180718081809181018111812181318141815181618171818181918201821182218231824182518261827182818291830183118321833183418351836
  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\x09^(self shouldBeAliased or: [ self shouldBeInlined ]) or: [\x0a\x09\x09(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\x09^ 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\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",
  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\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",
  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\x09nodes: self nodes;\x0a\x09\x09temps: self temps;\x0a\x09\x09yourself",
  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) { var $1;
  1484. $1=_st(_st(self)._value())._isImmutable();
  1485. return $1;
  1486. }, function($ctx1) {$ctx1.fill(self,"isImmutable",{},smalltalk.ValueNode)})},
  1487. args: [],
  1488. source: "isImmutable\x0a\x09^ self value isImmutable",
  1489. messageSends: ["isImmutable", "value"],
  1490. referencedClasses: []
  1491. }),
  1492. smalltalk.ValueNode);
  1493. smalltalk.addMethod(
  1494. "_isValueNode",
  1495. smalltalk.method({
  1496. selector: "isValueNode",
  1497. category: 'testing',
  1498. fn: function (){
  1499. var self=this;
  1500. return smalltalk.withContext(function($ctx1) { return true;
  1501. }, function($ctx1) {$ctx1.fill(self,"isValueNode",{},smalltalk.ValueNode)})},
  1502. args: [],
  1503. source: "isValueNode\x0a\x09^true",
  1504. messageSends: [],
  1505. referencedClasses: []
  1506. }),
  1507. smalltalk.ValueNode);
  1508. smalltalk.addMethod(
  1509. "_value",
  1510. smalltalk.method({
  1511. selector: "value",
  1512. category: 'accessing',
  1513. fn: function (){
  1514. var self=this;
  1515. return smalltalk.withContext(function($ctx1) { var $1;
  1516. $1=self["@value"];
  1517. return $1;
  1518. }, function($ctx1) {$ctx1.fill(self,"value",{},smalltalk.ValueNode)})},
  1519. args: [],
  1520. source: "value\x0a\x09^value",
  1521. messageSends: [],
  1522. referencedClasses: []
  1523. }),
  1524. smalltalk.ValueNode);
  1525. smalltalk.addMethod(
  1526. "_value_",
  1527. smalltalk.method({
  1528. selector: "value:",
  1529. category: 'accessing',
  1530. fn: function (anObject){
  1531. var self=this;
  1532. return smalltalk.withContext(function($ctx1) { self["@value"]=anObject;
  1533. return self}, function($ctx1) {$ctx1.fill(self,"value:",{anObject:anObject},smalltalk.ValueNode)})},
  1534. args: ["anObject"],
  1535. source: "value: anObject\x0a\x09value := anObject",
  1536. messageSends: [],
  1537. referencedClasses: []
  1538. }),
  1539. smalltalk.ValueNode);
  1540. smalltalk.addClass('VariableNode', smalltalk.ValueNode, ['assigned', 'binding'], 'Compiler-AST');
  1541. smalltalk.addMethod(
  1542. "_accept_",
  1543. smalltalk.method({
  1544. selector: "accept:",
  1545. category: 'visiting',
  1546. fn: function (aVisitor){
  1547. var self=this;
  1548. return smalltalk.withContext(function($ctx1) { var $1;
  1549. $1=_st(aVisitor)._visitVariableNode_(self);
  1550. return $1;
  1551. }, function($ctx1) {$ctx1.fill(self,"accept:",{aVisitor:aVisitor},smalltalk.VariableNode)})},
  1552. args: ["aVisitor"],
  1553. source: "accept: aVisitor\x0a\x09^ aVisitor visitVariableNode: self",
  1554. messageSends: ["visitVariableNode:"],
  1555. referencedClasses: []
  1556. }),
  1557. smalltalk.VariableNode);
  1558. smalltalk.addMethod(
  1559. "_alias",
  1560. smalltalk.method({
  1561. selector: "alias",
  1562. category: 'accessing',
  1563. fn: function (){
  1564. var self=this;
  1565. return smalltalk.withContext(function($ctx1) { var $1;
  1566. $1=_st(_st(self)._binding())._alias();
  1567. return $1;
  1568. }, function($ctx1) {$ctx1.fill(self,"alias",{},smalltalk.VariableNode)})},
  1569. args: [],
  1570. source: "alias\x0a\x09^ self binding alias",
  1571. messageSends: ["alias", "binding"],
  1572. referencedClasses: []
  1573. }),
  1574. smalltalk.VariableNode);
  1575. smalltalk.addMethod(
  1576. "_assigned",
  1577. smalltalk.method({
  1578. selector: "assigned",
  1579. category: 'accessing',
  1580. fn: function (){
  1581. var self=this;
  1582. return smalltalk.withContext(function($ctx1) { var $2,$1;
  1583. $2=self["@assigned"];
  1584. if(($receiver = $2) == nil || $receiver == undefined){
  1585. $1=false;
  1586. } else {
  1587. $1=$2;
  1588. };
  1589. return $1;
  1590. }, function($ctx1) {$ctx1.fill(self,"assigned",{},smalltalk.VariableNode)})},
  1591. args: [],
  1592. source: "assigned\x0a\x09^assigned ifNil: [false]",
  1593. messageSends: ["ifNil:"],
  1594. referencedClasses: []
  1595. }),
  1596. smalltalk.VariableNode);
  1597. smalltalk.addMethod(
  1598. "_assigned_",
  1599. smalltalk.method({
  1600. selector: "assigned:",
  1601. category: 'accessing',
  1602. fn: function (aBoolean){
  1603. var self=this;
  1604. return smalltalk.withContext(function($ctx1) { self["@assigned"]=aBoolean;
  1605. return self}, function($ctx1) {$ctx1.fill(self,"assigned:",{aBoolean:aBoolean},smalltalk.VariableNode)})},
  1606. args: ["aBoolean"],
  1607. source: "assigned: aBoolean\x0a\x09assigned := aBoolean",
  1608. messageSends: [],
  1609. referencedClasses: []
  1610. }),
  1611. smalltalk.VariableNode);
  1612. smalltalk.addMethod(
  1613. "_beAssigned",
  1614. smalltalk.method({
  1615. selector: "beAssigned",
  1616. category: 'accessing',
  1617. fn: function (){
  1618. var self=this;
  1619. return smalltalk.withContext(function($ctx1) { _st(_st(self)._binding())._validateAssignment();
  1620. self["@assigned"]=true;
  1621. return self}, function($ctx1) {$ctx1.fill(self,"beAssigned",{},smalltalk.VariableNode)})},
  1622. args: [],
  1623. source: "beAssigned\x0a\x09self binding validateAssignment.\x0a\x09assigned := true",
  1624. messageSends: ["validateAssignment", "binding"],
  1625. referencedClasses: []
  1626. }),
  1627. smalltalk.VariableNode);
  1628. smalltalk.addMethod(
  1629. "_binding",
  1630. smalltalk.method({
  1631. selector: "binding",
  1632. category: 'accessing',
  1633. fn: function (){
  1634. var self=this;
  1635. return smalltalk.withContext(function($ctx1) { var $1;
  1636. $1=self["@binding"];
  1637. return $1;
  1638. }, function($ctx1) {$ctx1.fill(self,"binding",{},smalltalk.VariableNode)})},
  1639. args: [],
  1640. source: "binding\x0a\x09^ binding",
  1641. messageSends: [],
  1642. referencedClasses: []
  1643. }),
  1644. smalltalk.VariableNode);
  1645. smalltalk.addMethod(
  1646. "_binding_",
  1647. smalltalk.method({
  1648. selector: "binding:",
  1649. category: 'accessing',
  1650. fn: function (aScopeVar){
  1651. var self=this;
  1652. return smalltalk.withContext(function($ctx1) { self["@binding"]=aScopeVar;
  1653. return self}, function($ctx1) {$ctx1.fill(self,"binding:",{aScopeVar:aScopeVar},smalltalk.VariableNode)})},
  1654. args: ["aScopeVar"],
  1655. source: "binding: aScopeVar\x0a\x09binding := aScopeVar",
  1656. messageSends: [],
  1657. referencedClasses: []
  1658. }),
  1659. smalltalk.VariableNode);
  1660. smalltalk.addMethod(
  1661. "_isImmutable",
  1662. smalltalk.method({
  1663. selector: "isImmutable",
  1664. category: 'testing',
  1665. fn: function (){
  1666. var self=this;
  1667. return smalltalk.withContext(function($ctx1) { return false;
  1668. }, function($ctx1) {$ctx1.fill(self,"isImmutable",{},smalltalk.VariableNode)})},
  1669. args: [],
  1670. source: "isImmutable\x0a\x09^false",
  1671. messageSends: [],
  1672. referencedClasses: []
  1673. }),
  1674. smalltalk.VariableNode);
  1675. smalltalk.addClass('ClassReferenceNode', smalltalk.VariableNode, [], 'Compiler-AST');
  1676. smalltalk.addMethod(
  1677. "_accept_",
  1678. smalltalk.method({
  1679. selector: "accept:",
  1680. category: 'visiting',
  1681. fn: function (aVisitor){
  1682. var self=this;
  1683. return smalltalk.withContext(function($ctx1) { var $1;
  1684. $1=_st(aVisitor)._visitClassReferenceNode_(self);
  1685. return $1;
  1686. }, function($ctx1) {$ctx1.fill(self,"accept:",{aVisitor:aVisitor},smalltalk.ClassReferenceNode)})},
  1687. args: ["aVisitor"],
  1688. source: "accept: aVisitor\x0a\x09^ aVisitor visitClassReferenceNode: self",
  1689. messageSends: ["visitClassReferenceNode:"],
  1690. referencedClasses: []
  1691. }),
  1692. smalltalk.ClassReferenceNode);
  1693. smalltalk.addMethod(
  1694. "_isNode",
  1695. smalltalk.method({
  1696. selector: "isNode",
  1697. category: '*Compiler-AST',
  1698. fn: function (){
  1699. var self=this;
  1700. return smalltalk.withContext(function($ctx1) { return false;
  1701. }, function($ctx1) {$ctx1.fill(self,"isNode",{},smalltalk.Object)})},
  1702. args: [],
  1703. source: "isNode\x0a\x09^ false",
  1704. messageSends: [],
  1705. referencedClasses: []
  1706. }),
  1707. smalltalk.Object);