Compiler.js 47 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091929394959697989910010110210310410510610710810911011111211311411511611711811912012112212312412512612712812913013113213313413513613713813914014114214314414514614714814915015115215315415515615715815916016116216316416516616716816917017117217317417517617717817918018118218318418518618718818919019119219319419519619719819920020120220320420520620720820921021121221321421521621721821922022122222322422522622722822923023123223323423523623723823924024124224324424524624724824925025125225325425525625725825926026126226326426526626726826927027127227327427527627727827928028128228328428528628728828929029129229329429529629729829930030130230330430530630730830931031131231331431531631731831932032132232332432532632732832933033133233333433533633733833934034134234334434534634734834935035135235335435535635735835936036136236336436536636736836937037137237337437537637737837938038138238338438538638738838939039139239339439539639739839940040140240340440540640740840941041141241341441541641741841942042142242342442542642742842943043143243343443543643743843944044144244344444544644744844945045145245345445545645745845946046146246346446546646746846947047147247347447547647747847948048148248348448548648748848949049149249349449549649749849950050150250350450550650750850951051151251351451551651751851952052152252352452552652752852953053153253353453553653753853954054154254354454554654754854955055155255355455555655755855956056156256356456556656756856957057157257357457557657757857958058158258358458558658758858959059159259359459559659759859960060160260360460560660760860961061161261361461561661761861962062162262362462562662762862963063163263363463563663763863964064164264364464564664764864965065165265365465565665765865966066166266366466566666766866967067167267367467567667767867968068168268368468568668768868969069169269369469569669769869970070170270370470570670770870971071171271371471571671771871972072172272372472572672772872973073173273373473573673773873974074174274374474574674774874975075175275375475575675775875976076176276376476576676776876977077177277377477577677777877978078178278378478578678778878979079179279379479579679779879980080180280380480580680780880981081181281381481581681781881982082182282382482582682782882983083183283383483583683783883984084184284384484584684784884985085185285385485585685785885986086186286386486586686786886987087187287387487587687787887988088188288388488588688788888989089189289389489589689789889990090190290390490590690790890991091191291391491591691791891992092192292392492592692792892993093193293393493593693793893994094194294394494594694794894995095195295395495595695795895996096196296396496596696796896997097197297397497597697797897998098198298398498598698798898999099199299399499599699799899910001001100210031004100510061007100810091010101110121013101410151016101710181019102010211022102310241025102610271028102910301031103210331034103510361037103810391040104110421043104410451046104710481049105010511052105310541055105610571058105910601061106210631064106510661067106810691070107110721073107410751076107710781079108010811082108310841085108610871088108910901091109210931094109510961097109810991100110111021103110411051106110711081109111011111112111311141115111611171118111911201121112211231124112511261127112811291130113111321133113411351136113711381139114011411142114311441145114611471148114911501151115211531154115511561157115811591160116111621163116411651166116711681169117011711172117311741175117611771178117911801181118211831184118511861187118811891190119111921193119411951196119711981199120012011202120312041205120612071208120912101211121212131214121512161217121812191220122112221223122412251226122712281229123012311232123312341235123612371238123912401241124212431244124512461247124812491250125112521253125412551256125712581259126012611262126312641265126612671268126912701271127212731274127512761277127812791280128112821283128412851286128712881289129012911292129312941295
  1. smalltalk.addClass('Node', smalltalk.Object, ['nodes'], 'Compiler');
  2. smalltalk.addMethod(
  3. '_nodes',
  4. smalltalk.method({
  5. selector: 'nodes',
  6. category: 'accessing',
  7. fn: function () {
  8. var self = this;
  9. return self['@nodes']._ifNil_(function () {return self['@nodes'] = smalltalk.Array._new();});
  10. return self;
  11. },
  12. source: unescape('nodes%0A%09%5Enodes%20ifNil%3A%20%5Bnodes%20%3A%3D%20Array%20new%5D%0A')}),
  13. smalltalk.Node);
  14. smalltalk.addMethod(
  15. '_nodes_',
  16. smalltalk.method({
  17. selector: 'nodes:',
  18. category: 'building',
  19. fn: function (aCollection) {
  20. var self = this;
  21. self['@nodes'] = aCollection;
  22. return self;
  23. },
  24. source: unescape('nodes%3A%20aCollection%0A%09nodes%20%3A%3D%20aCollection%0A')}),
  25. smalltalk.Node);
  26. smalltalk.addMethod(
  27. '_addNode_',
  28. smalltalk.method({
  29. selector: 'addNode:',
  30. category: 'accessing',
  31. fn: function (aNode) {
  32. var self = this;
  33. self._nodes()._add_(aNode);
  34. return self;
  35. },
  36. source: unescape('addNode%3A%20aNode%0A%09self%20nodes%20add%3A%20aNode%0A')}),
  37. smalltalk.Node);
  38. smalltalk.addMethod(
  39. '_accept_',
  40. smalltalk.method({
  41. selector: 'accept:',
  42. category: 'visiting',
  43. fn: function (aVisitor) {
  44. var self = this;
  45. aVisitor._visitNode_(self);
  46. return self;
  47. },
  48. source: unescape('accept%3A%20aVisitor%0A%09aVisitor%20visitNode%3A%20self%0A')}),
  49. smalltalk.Node);
  50. smalltalk.addClass('MethodNode', smalltalk.Node, ['selector', 'arguments', 'source'], 'Compiler');
  51. smalltalk.addMethod(
  52. '_selector',
  53. smalltalk.method({
  54. selector: 'selector',
  55. category: 'accessing',
  56. fn: function () {
  57. var self = this;
  58. return self['@selector'];
  59. return self;
  60. },
  61. source: unescape('selector%0A%09%5Eselector%0A')}),
  62. smalltalk.MethodNode);
  63. smalltalk.addMethod(
  64. '_selector_',
  65. smalltalk.method({
  66. selector: 'selector:',
  67. category: 'accessing',
  68. fn: function (aString) {
  69. var self = this;
  70. self['@selector'] = aString;
  71. return self;
  72. },
  73. source: unescape('selector%3A%20aString%0A%09selector%20%3A%3D%20aString%0A')}),
  74. smalltalk.MethodNode);
  75. smalltalk.addMethod(
  76. '_arguments',
  77. smalltalk.method({
  78. selector: 'arguments',
  79. category: 'accessing',
  80. fn: function () {
  81. var self = this;
  82. return self['@arguments']._ifNil_(function () {return [];});
  83. return self;
  84. },
  85. source: unescape('arguments%0A%09%5Earguments%20ifNil%3A%20%5B%23%28%29%5D%0A')}),
  86. smalltalk.MethodNode);
  87. smalltalk.addMethod(
  88. '_arguments_',
  89. smalltalk.method({
  90. selector: 'arguments:',
  91. category: 'accessing',
  92. fn: function (aCollection) {
  93. var self = this;
  94. self['@arguments'] = aCollection;
  95. return self;
  96. },
  97. source: unescape('arguments%3A%20aCollection%0A%09arguments%20%3A%3D%20aCollection%0A')}),
  98. smalltalk.MethodNode);
  99. smalltalk.addMethod(
  100. '_source',
  101. smalltalk.method({
  102. selector: 'source',
  103. category: 'accessing',
  104. fn: function () {
  105. var self = this;
  106. return self['@source'];
  107. return self;
  108. },
  109. source: unescape('source%0A%09%5Esource%0A')}),
  110. smalltalk.MethodNode);
  111. smalltalk.addMethod(
  112. '_source_',
  113. smalltalk.method({
  114. selector: 'source:',
  115. category: 'accessing',
  116. fn: function (aString) {
  117. var self = this;
  118. self['@source'] = aString;
  119. return self;
  120. },
  121. source: unescape('source%3A%20aString%0A%09source%20%3A%3D%20aString%0A')}),
  122. smalltalk.MethodNode);
  123. smalltalk.addMethod(
  124. '_accept_',
  125. smalltalk.method({
  126. selector: 'accept:',
  127. category: 'visiting',
  128. fn: function (aVisitor) {
  129. var self = this;
  130. aVisitor._visitMethodNode_(self);
  131. return self;
  132. },
  133. source: unescape('accept%3A%20aVisitor%0A%09aVisitor%20visitMethodNode%3A%20self%0A')}),
  134. smalltalk.MethodNode);
  135. smalltalk.addClass('SendNode', smalltalk.Node, ['selector', 'arguments', 'receiver'], 'Compiler');
  136. smalltalk.addMethod(
  137. '_selector',
  138. smalltalk.method({
  139. selector: 'selector',
  140. category: 'accessing',
  141. fn: function () {
  142. var self = this;
  143. return self['@selector'];
  144. return self;
  145. },
  146. source: unescape('selector%0A%09%5Eselector%0A')}),
  147. smalltalk.SendNode);
  148. smalltalk.addMethod(
  149. '_selector_',
  150. smalltalk.method({
  151. selector: 'selector:',
  152. category: 'accessing',
  153. fn: function (aString) {
  154. var self = this;
  155. self['@selector'] = aString;
  156. return self;
  157. },
  158. source: unescape('selector%3A%20aString%0A%09selector%20%3A%3D%20aString%0A')}),
  159. smalltalk.SendNode);
  160. smalltalk.addMethod(
  161. '_arguments',
  162. smalltalk.method({
  163. selector: 'arguments',
  164. category: 'accessing',
  165. fn: function () {
  166. var self = this;
  167. return self['@arguments']._ifNil_(function () {return self['@arguments'] = [];});
  168. return self;
  169. },
  170. source: unescape('arguments%0A%09%5Earguments%20ifNil%3A%20%5Barguments%20%3A%3D%20%23%28%29%5D%0A')}),
  171. smalltalk.SendNode);
  172. smalltalk.addMethod(
  173. '_arguments_',
  174. smalltalk.method({
  175. selector: 'arguments:',
  176. category: 'accessing',
  177. fn: function (aCollection) {
  178. var self = this;
  179. self['@arguments'] = aCollection;
  180. return self;
  181. },
  182. source: unescape('arguments%3A%20aCollection%0A%09arguments%20%3A%3D%20aCollection%0A')}),
  183. smalltalk.SendNode);
  184. smalltalk.addMethod(
  185. '_receiver',
  186. smalltalk.method({
  187. selector: 'receiver',
  188. category: 'accessing',
  189. fn: function () {
  190. var self = this;
  191. return self['@receiver'];
  192. return self;
  193. },
  194. source: unescape('receiver%0A%09%5Ereceiver%0A')}),
  195. smalltalk.SendNode);
  196. smalltalk.addMethod(
  197. '_receiver_',
  198. smalltalk.method({
  199. selector: 'receiver:',
  200. category: 'accessing',
  201. fn: function (aNode) {
  202. var self = this;
  203. self['@receiver'] = aNode;
  204. return self;
  205. },
  206. source: unescape('receiver%3A%20aNode%0A%09receiver%20%3A%3D%20aNode%0A')}),
  207. smalltalk.SendNode);
  208. smalltalk.addMethod(
  209. '_valueForReceiver_',
  210. smalltalk.method({
  211. selector: 'valueForReceiver:',
  212. category: 'accessing',
  213. fn: function (anObject) {
  214. var self = this;
  215. return function ($rec) {$rec._receiver_(self._receiver()._ifNil_ifNotNil_(function () {return anObject;}, function () {return self._receiver()._valueForReceiver_(anObject);}));$rec._selector_(self._selector());$rec._arguments_(self._arguments());return $rec._yourself();}(smalltalk.SendNode._new());
  216. return self;
  217. },
  218. source: unescape('valueForReceiver%3A%20anObject%0A%09%5ESendNode%20new%0A%09%20%20%20%20receiver%3A%20%28self%20receiver%20%0A%09%09ifNil%3A%20%5BanObject%5D%0A%09%09ifNotNil%3A%20%5Bself%20receiver%20valueForReceiver%3A%20anObject%5D%29%3B%0A%09%20%20%20%20selector%3A%20self%20selector%3B%0A%09%20%20%20%20arguments%3A%20self%20arguments%3B%0A%09%20%20%20%20yourself%0A')}),
  219. smalltalk.SendNode);
  220. smalltalk.addMethod(
  221. '_cascadeNodeWithMessages_',
  222. smalltalk.method({
  223. selector: 'cascadeNodeWithMessages:',
  224. category: 'accessing',
  225. fn: function (aCollection) {
  226. var self = this;
  227. var first = nil;
  228. first = function ($rec) {$rec._selector_(self._selector());$rec._arguments_(self._arguments());return $rec._yourself();}(smalltalk.SendNode._new());
  229. return function ($rec) {$rec._receiver_(self._receiver());$rec._nodes_(smalltalk.Array._with_(first).__comma(aCollection));return $rec._yourself();}(smalltalk.CascadeNode._new());
  230. return self;
  231. },
  232. source: unescape('cascadeNodeWithMessages%3A%20aCollection%0A%09%7C%20first%20%7C%0A%09first%20%3A%3D%20SendNode%20new%0A%09%20%20%20%20selector%3A%20self%20selector%3B%0A%09%20%20%20%20arguments%3A%20self%20arguments%3B%0A%09%20%20%20%20yourself.%0A%09%5ECascadeNode%20new%0A%09%20%20%20%20receiver%3A%20self%20receiver%3B%0A%09%20%20%20%20nodes%3A%20%28Array%20with%3A%20first%29%2C%20aCollection%3B%0A%09%20%20%20%20yourself%0A')}),
  233. smalltalk.SendNode);
  234. smalltalk.addMethod(
  235. '_accept_',
  236. smalltalk.method({
  237. selector: 'accept:',
  238. category: 'visiting',
  239. fn: function (aVisitor) {
  240. var self = this;
  241. aVisitor._visitSendNode_(self);
  242. return self;
  243. },
  244. source: unescape('accept%3A%20aVisitor%0A%09aVisitor%20visitSendNode%3A%20self%0A')}),
  245. smalltalk.SendNode);
  246. smalltalk.addClass('CascadeNode', smalltalk.Node, ['receiver'], 'Compiler');
  247. smalltalk.addMethod(
  248. '_receiver',
  249. smalltalk.method({
  250. selector: 'receiver',
  251. category: 'accessing',
  252. fn: function () {
  253. var self = this;
  254. return self['@receiver'];
  255. return self;
  256. },
  257. source: unescape('receiver%0A%09%5Ereceiver%0A')}),
  258. smalltalk.CascadeNode);
  259. smalltalk.addMethod(
  260. '_receiver_',
  261. smalltalk.method({
  262. selector: 'receiver:',
  263. category: 'accessing',
  264. fn: function (aNode) {
  265. var self = this;
  266. self['@receiver'] = aNode;
  267. return self;
  268. },
  269. source: unescape('receiver%3A%20aNode%0A%09receiver%20%3A%3D%20aNode%0A')}),
  270. smalltalk.CascadeNode);
  271. smalltalk.addMethod(
  272. '_accept_',
  273. smalltalk.method({
  274. selector: 'accept:',
  275. category: 'visiting',
  276. fn: function (aVisitor) {
  277. var self = this;
  278. aVisitor._visitCascadeNode_(self);
  279. return self;
  280. },
  281. source: unescape('accept%3A%20aVisitor%0A%09aVisitor%20visitCascadeNode%3A%20self%0A')}),
  282. smalltalk.CascadeNode);
  283. smalltalk.addClass('AssignmentNode', smalltalk.Node, ['left', 'right'], 'Compiler');
  284. smalltalk.addMethod(
  285. '_left',
  286. smalltalk.method({
  287. selector: 'left',
  288. category: 'accessing',
  289. fn: function () {
  290. var self = this;
  291. return self['@left'];
  292. return self;
  293. },
  294. source: unescape('left%0A%09%5Eleft%0A')}),
  295. smalltalk.AssignmentNode);
  296. smalltalk.addMethod(
  297. '_left_',
  298. smalltalk.method({
  299. selector: 'left:',
  300. category: 'accessing',
  301. fn: function (aNode) {
  302. var self = this;
  303. self['@left'] = aNode;
  304. return self;
  305. },
  306. source: unescape('left%3A%20aNode%0A%09left%20%3A%3D%20aNode%0A')}),
  307. smalltalk.AssignmentNode);
  308. smalltalk.addMethod(
  309. '_right',
  310. smalltalk.method({
  311. selector: 'right',
  312. category: 'accessing',
  313. fn: function () {
  314. var self = this;
  315. return self['@right'];
  316. return self;
  317. },
  318. source: unescape('right%0A%09%5Eright%0A')}),
  319. smalltalk.AssignmentNode);
  320. smalltalk.addMethod(
  321. '_right_',
  322. smalltalk.method({
  323. selector: 'right:',
  324. category: 'accessing',
  325. fn: function (aNode) {
  326. var self = this;
  327. self['@right'] = aNode;
  328. return self;
  329. },
  330. source: unescape('right%3A%20aNode%0A%09right%20%3A%3D%20aNode%0A')}),
  331. smalltalk.AssignmentNode);
  332. smalltalk.addMethod(
  333. '_accept_',
  334. smalltalk.method({
  335. selector: 'accept:',
  336. category: 'visiting',
  337. fn: function (aVisitor) {
  338. var self = this;
  339. aVisitor._visitAssignmentNode_(self);
  340. return self;
  341. },
  342. source: unescape('accept%3A%20aVisitor%0A%09aVisitor%20visitAssignmentNode%3A%20self%0A')}),
  343. smalltalk.AssignmentNode);
  344. smalltalk.addClass('BlockNode', smalltalk.Node, ['parameters'], 'Compiler');
  345. smalltalk.addMethod(
  346. '_parameters',
  347. smalltalk.method({
  348. selector: 'parameters',
  349. category: 'accessing',
  350. fn: function () {
  351. var self = this;
  352. return self['@parameters']._ifNil_(function () {return self['@parameters'] = smalltalk.Array._new();});
  353. return self;
  354. },
  355. source: unescape('parameters%0A%09%5Eparameters%20ifNil%3A%20%5Bparameters%20%3A%3D%20Array%20new%5D%0A')}),
  356. smalltalk.BlockNode);
  357. smalltalk.addMethod(
  358. '_parameters_',
  359. smalltalk.method({
  360. selector: 'parameters:',
  361. category: 'accessing',
  362. fn: function (aCollection) {
  363. var self = this;
  364. self['@parameters'] = aCollection;
  365. return self;
  366. },
  367. source: unescape('parameters%3A%20aCollection%0A%09parameters%20%3A%3D%20aCollection%0A')}),
  368. smalltalk.BlockNode);
  369. smalltalk.addMethod(
  370. '_accept_',
  371. smalltalk.method({
  372. selector: 'accept:',
  373. category: 'visiting',
  374. fn: function (aVisitor) {
  375. var self = this;
  376. aVisitor._visitBlockNode_(self);
  377. return self;
  378. },
  379. source: unescape('accept%3A%20aVisitor%0A%09aVisitor%20visitBlockNode%3A%20self%0A')}),
  380. smalltalk.BlockNode);
  381. smalltalk.addClass('SequenceNode', smalltalk.Node, ['temps'], 'Compiler');
  382. smalltalk.addMethod(
  383. '_temps',
  384. smalltalk.method({
  385. selector: 'temps',
  386. category: 'accessing',
  387. fn: function () {
  388. var self = this;
  389. return self['@temps']._ifNil_(function () {return [];});
  390. return self;
  391. },
  392. source: unescape('temps%0A%09%5Etemps%20ifNil%3A%20%5B%23%28%29%5D%0A')}),
  393. smalltalk.SequenceNode);
  394. smalltalk.addMethod(
  395. '_temps_',
  396. smalltalk.method({
  397. selector: 'temps:',
  398. category: 'accessing',
  399. fn: function (aCollection) {
  400. var self = this;
  401. self['@temps'] = aCollection;
  402. return self;
  403. },
  404. source: unescape('temps%3A%20aCollection%0A%09temps%20%3A%3D%20aCollection%0A')}),
  405. smalltalk.SequenceNode);
  406. smalltalk.addMethod(
  407. '_asBlockSequenceNode',
  408. smalltalk.method({
  409. selector: 'asBlockSequenceNode',
  410. category: 'testing',
  411. fn: function () {
  412. var self = this;
  413. return function ($rec) {$rec._nodes_(self._nodes());$rec._temps_(self._temps());return $rec._yourself();}(smalltalk.BlockSequenceNode._new());
  414. return self;
  415. },
  416. source: unescape('asBlockSequenceNode%0A%09%5EBlockSequenceNode%20new%0A%09%20%20%20%20nodes%3A%20self%20nodes%3B%0A%09%20%20%20%20temps%3A%20self%20temps%3B%0A%09%20%20%20%20yourself%0A')}),
  417. smalltalk.SequenceNode);
  418. smalltalk.addMethod(
  419. '_accept_',
  420. smalltalk.method({
  421. selector: 'accept:',
  422. category: 'visiting',
  423. fn: function (aVisitor) {
  424. var self = this;
  425. aVisitor._visitSequenceNode_(self);
  426. return self;
  427. },
  428. source: unescape('accept%3A%20aVisitor%0A%09aVisitor%20visitSequenceNode%3A%20self%0A')}),
  429. smalltalk.SequenceNode);
  430. smalltalk.addClass('BlockSequenceNode', smalltalk.SequenceNode, [], 'Compiler');
  431. smalltalk.addMethod(
  432. '_accept_',
  433. smalltalk.method({
  434. selector: 'accept:',
  435. category: 'visiting',
  436. fn: function (aVisitor) {
  437. var self = this;
  438. aVisitor._visitBlockSequenceNode_(self);
  439. return self;
  440. },
  441. source: unescape('accept%3A%20aVisitor%0A%09aVisitor%20visitBlockSequenceNode%3A%20self%0A')}),
  442. smalltalk.BlockSequenceNode);
  443. smalltalk.addClass('ReturnNode', smalltalk.Node, [], 'Compiler');
  444. smalltalk.addMethod(
  445. '_accept_',
  446. smalltalk.method({
  447. selector: 'accept:',
  448. category: 'visiting',
  449. fn: function (aVisitor) {
  450. var self = this;
  451. aVisitor._visitReturnNode_(self);
  452. return self;
  453. },
  454. source: unescape('accept%3A%20aVisitor%0A%09aVisitor%20visitReturnNode%3A%20self%0A')}),
  455. smalltalk.ReturnNode);
  456. smalltalk.addClass('ValueNode', smalltalk.Node, ['value'], 'Compiler');
  457. smalltalk.addMethod(
  458. '_value',
  459. smalltalk.method({
  460. selector: 'value',
  461. category: 'accessing',
  462. fn: function () {
  463. var self = this;
  464. return self['@value'];
  465. return self;
  466. },
  467. source: unescape('value%0A%09%5Evalue%0A')}),
  468. smalltalk.ValueNode);
  469. smalltalk.addMethod(
  470. '_value_',
  471. smalltalk.method({
  472. selector: 'value:',
  473. category: 'accessing',
  474. fn: function (anObject) {
  475. var self = this;
  476. self['@value'] = anObject;
  477. return self;
  478. },
  479. source: unescape('value%3A%20anObject%0A%09value%20%3A%3D%20anObject%0A')}),
  480. smalltalk.ValueNode);
  481. smalltalk.addMethod(
  482. '_accept_',
  483. smalltalk.method({
  484. selector: 'accept:',
  485. category: 'visiting',
  486. fn: function (aVisitor) {
  487. var self = this;
  488. aVisitor._visitValueNode_(self);
  489. return self;
  490. },
  491. source: unescape('accept%3A%20aVisitor%0A%09aVisitor%20visitValueNode%3A%20self%0A')}),
  492. smalltalk.ValueNode);
  493. smalltalk.addClass('VariableNode', smalltalk.ValueNode, [], 'Compiler');
  494. smalltalk.addMethod(
  495. '_accept_',
  496. smalltalk.method({
  497. selector: 'accept:',
  498. category: 'visiting',
  499. fn: function (aVisitor) {
  500. var self = this;
  501. aVisitor._visitVariableNode_(self);
  502. return self;
  503. },
  504. source: unescape('accept%3A%20aVisitor%0A%09aVisitor%20visitVariableNode%3A%20self%0A')}),
  505. smalltalk.VariableNode);
  506. smalltalk.addClass('ClassReferenceNode', smalltalk.VariableNode, [], 'Compiler');
  507. smalltalk.addMethod(
  508. '_accept_',
  509. smalltalk.method({
  510. selector: 'accept:',
  511. category: 'visiting',
  512. fn: function (aVisitor) {
  513. var self = this;
  514. aVisitor._visitClassReferenceNode_(self);
  515. return self;
  516. },
  517. source: unescape('accept%3A%20aVisitor%0A%09aVisitor%20visitClassReferenceNode%3A%20self%0A')}),
  518. smalltalk.ClassReferenceNode);
  519. smalltalk.addClass('JSStatementNode', smalltalk.Node, ['source'], 'Compiler');
  520. smalltalk.addMethod(
  521. '_source',
  522. smalltalk.method({
  523. selector: 'source',
  524. category: 'accessing',
  525. fn: function () {
  526. var self = this;
  527. return self['@source']._ifNil_(function () {return "";});
  528. return self;
  529. },
  530. source: unescape('source%0A%09%5Esource%20ifNil%3A%20%5B%27%27%5D%0A')}),
  531. smalltalk.JSStatementNode);
  532. smalltalk.addMethod(
  533. '_source_',
  534. smalltalk.method({
  535. selector: 'source:',
  536. category: 'accessing',
  537. fn: function (aString) {
  538. var self = this;
  539. self['@source'] = aString;
  540. return self;
  541. },
  542. source: unescape('source%3A%20aString%0A%09source%20%3A%3D%20aString%0A')}),
  543. smalltalk.JSStatementNode);
  544. smalltalk.addMethod(
  545. '_accept_',
  546. smalltalk.method({
  547. selector: 'accept:',
  548. category: 'visiting',
  549. fn: function (aVisitor) {
  550. var self = this;
  551. aVisitor._visitJSStatementNode_(self);
  552. return self;
  553. },
  554. source: unescape('accept%3A%20aVisitor%0A%09aVisitor%20visitJSStatementNode%3A%20self%0A')}),
  555. smalltalk.JSStatementNode);
  556. smalltalk.addClass('NodeVisitor', smalltalk.Object, [], 'Compiler');
  557. smalltalk.addMethod(
  558. '_visit_',
  559. smalltalk.method({
  560. selector: 'visit:',
  561. category: 'visiting',
  562. fn: function (aNode) {
  563. var self = this;
  564. aNode._accept_(self);
  565. return self;
  566. },
  567. source: unescape('visit%3A%20aNode%0A%09aNode%20accept%3A%20self%0A')}),
  568. smalltalk.NodeVisitor);
  569. smalltalk.addMethod(
  570. '_visitNode_',
  571. smalltalk.method({
  572. selector: 'visitNode:',
  573. category: 'visiting',
  574. fn: function (aNode) {
  575. var self = this;
  576. return self;
  577. },
  578. source: unescape('visitNode%3A%20aNode%0A')}),
  579. smalltalk.NodeVisitor);
  580. smalltalk.addMethod(
  581. '_visitMethodNode_',
  582. smalltalk.method({
  583. selector: 'visitMethodNode:',
  584. category: 'visiting',
  585. fn: function (aNode) {
  586. var self = this;
  587. self._visitNode_(aNode);
  588. return self;
  589. },
  590. source: unescape('visitMethodNode%3A%20aNode%0A%09self%20visitNode%3A%20aNode%0A')}),
  591. smalltalk.NodeVisitor);
  592. smalltalk.addMethod(
  593. '_visitSequenceNode_',
  594. smalltalk.method({
  595. selector: 'visitSequenceNode:',
  596. category: 'visiting',
  597. fn: function (aNode) {
  598. var self = this;
  599. self._visitNode_(aNode);
  600. return self;
  601. },
  602. source: unescape('visitSequenceNode%3A%20aNode%0A%09self%20visitNode%3A%20aNode%0A')}),
  603. smalltalk.NodeVisitor);
  604. smalltalk.addMethod(
  605. '_visitBlockSequenceNode_',
  606. smalltalk.method({
  607. selector: 'visitBlockSequenceNode:',
  608. category: 'visiting',
  609. fn: function (aNode) {
  610. var self = this;
  611. self._visitSequenceNode_(aNode);
  612. return self;
  613. },
  614. source: unescape('visitBlockSequenceNode%3A%20aNode%0A%09self%20visitSequenceNode%3A%20aNode%0A')}),
  615. smalltalk.NodeVisitor);
  616. smalltalk.addMethod(
  617. '_visitBlockNode_',
  618. smalltalk.method({
  619. selector: 'visitBlockNode:',
  620. category: 'visiting',
  621. fn: function (aNode) {
  622. var self = this;
  623. self._visitNode_(aNode);
  624. return self;
  625. },
  626. source: unescape('visitBlockNode%3A%20aNode%0A%09self%20visitNode%3A%20aNode%0A')}),
  627. smalltalk.NodeVisitor);
  628. smalltalk.addMethod(
  629. '_visitReturnNode_',
  630. smalltalk.method({
  631. selector: 'visitReturnNode:',
  632. category: 'visiting',
  633. fn: function (aNode) {
  634. var self = this;
  635. self._visitNode_(aNode);
  636. return self;
  637. },
  638. source: unescape('visitReturnNode%3A%20aNode%0A%09self%20visitNode%3A%20aNode%0A')}),
  639. smalltalk.NodeVisitor);
  640. smalltalk.addMethod(
  641. '_visitSendNode_',
  642. smalltalk.method({
  643. selector: 'visitSendNode:',
  644. category: 'visiting',
  645. fn: function (aNode) {
  646. var self = this;
  647. self._visitNode_(aNode);
  648. return self;
  649. },
  650. source: unescape('visitSendNode%3A%20aNode%0A%09self%20visitNode%3A%20aNode%0A')}),
  651. smalltalk.NodeVisitor);
  652. smalltalk.addMethod(
  653. '_visitCascadeNode_',
  654. smalltalk.method({
  655. selector: 'visitCascadeNode:',
  656. category: 'visiting',
  657. fn: function (aNode) {
  658. var self = this;
  659. self._visitNode_(aNode);
  660. return self;
  661. },
  662. source: unescape('visitCascadeNode%3A%20aNode%0A%09self%20visitNode%3A%20aNode%0A')}),
  663. smalltalk.NodeVisitor);
  664. smalltalk.addMethod(
  665. '_visitValueNode_',
  666. smalltalk.method({
  667. selector: 'visitValueNode:',
  668. category: 'visiting',
  669. fn: function (aNode) {
  670. var self = this;
  671. self._visitNode_(aNode);
  672. return self;
  673. },
  674. source: unescape('visitValueNode%3A%20aNode%0A%09self%20visitNode%3A%20aNode%0A')}),
  675. smalltalk.NodeVisitor);
  676. smalltalk.addMethod(
  677. '_visitVariableNode_',
  678. smalltalk.method({
  679. selector: 'visitVariableNode:',
  680. category: 'visiting',
  681. fn: function (aNode) {
  682. var self = this;
  683. return self;
  684. },
  685. source: unescape('visitVariableNode%3A%20aNode%0A')}),
  686. smalltalk.NodeVisitor);
  687. smalltalk.addMethod(
  688. '_visitAssignmentNode_',
  689. smalltalk.method({
  690. selector: 'visitAssignmentNode:',
  691. category: 'visiting',
  692. fn: function (aNode) {
  693. var self = this;
  694. self._visitNode_(aNode);
  695. return self;
  696. },
  697. source: unescape('visitAssignmentNode%3A%20aNode%0A%09self%20visitNode%3A%20aNode%0A')}),
  698. smalltalk.NodeVisitor);
  699. smalltalk.addMethod(
  700. '_visitClassReferenceNode_',
  701. smalltalk.method({
  702. selector: 'visitClassReferenceNode:',
  703. category: 'visiting',
  704. fn: function (aNode) {
  705. var self = this;
  706. (function ($rec) {$rec._nextPutAll_("smalltalk.");return $rec._nextPutAll_(aNode._value());}(self));
  707. return self;
  708. },
  709. source: unescape('visitClassReferenceNode%3A%20aNode%0A%09self%20%0A%09%20%20%20%20nextPutAll%3A%20%27smalltalk.%27%3B%0A%09%20%20%20%20nextPutAll%3A%20aNode%20value%0A')}),
  710. smalltalk.NodeVisitor);
  711. smalltalk.addMethod(
  712. '_visitJSStatementNode_',
  713. smalltalk.method({
  714. selector: 'visitJSStatementNode:',
  715. category: 'visiting',
  716. fn: function (aNode) {
  717. var self = this;
  718. (function ($rec) {$rec._nextPutAll_(unescape("function%28%29%7B"));$rec._nextPutAll_(aNode._source());return $rec._nextPutAll_(unescape("%7D%29%28%29"));}(self));
  719. return self;
  720. },
  721. source: unescape('visitJSStatementNode%3A%20aNode%0A%09self%20%0A%09%20%20%20%20nextPutAll%3A%20%27function%28%29%7B%27%3B%0A%09%20%20%20%20nextPutAll%3A%20aNode%20source%3B%0A%09%20%20%20%20nextPutAll%3A%20%27%7D%29%28%29%27%0A')}),
  722. smalltalk.NodeVisitor);
  723. smalltalk.addClass('Compiler', smalltalk.NodeVisitor, ['stream', 'nestedBlocks', 'earlyReturn', 'currentClass', 'currentSelector', 'unknownVariables', 'tempVariables'], 'Compiler');
  724. smalltalk.addMethod(
  725. '_initialize',
  726. smalltalk.method({
  727. selector: 'initialize',
  728. category: 'initialization',
  729. fn: function () {
  730. var self = this;
  731. self.klass.superclass.fn.prototype._initialize.apply(self, []);
  732. self['@stream'] = ""._writeStream();
  733. self['@unknownVariables'] = [];
  734. self['@tempVariables'] = [];
  735. return self;
  736. },
  737. source: unescape('initialize%0A%09super%20initialize.%0A%09stream%20%3A%3D%20%27%27%20writeStream.%0A%09unknownVariables%20%3A%3D%20%23%28%29.%0A%09tempVariables%20%3A%3D%20%23%28%29%0A')}),
  738. smalltalk.Compiler);
  739. smalltalk.addMethod(
  740. '_parser',
  741. smalltalk.method({
  742. selector: 'parser',
  743. category: 'accessing',
  744. fn: function () {
  745. var self = this;
  746. return smalltalk.SmalltalkParser._new();
  747. return self;
  748. },
  749. source: unescape('parser%0A%09%5ESmalltalkParser%20new%0A')}),
  750. smalltalk.Compiler);
  751. smalltalk.addMethod(
  752. '_currentClass',
  753. smalltalk.method({
  754. selector: 'currentClass',
  755. category: 'accessing',
  756. fn: function () {
  757. var self = this;
  758. return self['@currentClass'];
  759. return self;
  760. },
  761. source: unescape('currentClass%0A%09%5EcurrentClass%0A')}),
  762. smalltalk.Compiler);
  763. smalltalk.addMethod(
  764. '_currentClass_',
  765. smalltalk.method({
  766. selector: 'currentClass:',
  767. category: 'accessing',
  768. fn: function (aClass) {
  769. var self = this;
  770. self['@currentClass'] = aClass;
  771. return self;
  772. },
  773. source: unescape('currentClass%3A%20aClass%0A%09currentClass%20%3A%3D%20aClass%0A')}),
  774. smalltalk.Compiler);
  775. smalltalk.addMethod(
  776. '_loadExpression_',
  777. smalltalk.method({
  778. selector: 'loadExpression:',
  779. category: 'compiling',
  780. fn: function (aString) {
  781. var self = this;
  782. smalltalk.DoIt._addCompiledMethod_(self._eval_(self._compileExpression_(aString)));
  783. return smalltalk.DoIt._new()._doIt();
  784. return self;
  785. },
  786. source: unescape('loadExpression%3A%20aString%0A%09DoIt%20addCompiledMethod%3A%20%28self%20eval%3A%20%28self%20compileExpression%3A%20aString%29%29.%0A%09%5EDoIt%20new%20doIt%0A')}),
  787. smalltalk.Compiler);
  788. smalltalk.addMethod(
  789. '_load_forClass_',
  790. smalltalk.method({
  791. selector: 'load:forClass:',
  792. category: 'compiling',
  793. fn: function (aString, aClass) {
  794. var self = this;
  795. return self._eval_(self._compile_forClass_(aString, aClass));
  796. return self;
  797. },
  798. source: unescape('load%3A%20aString%20forClass%3A%20aClass%0A%09%5Eself%20eval%3A%20%28self%20compile%3A%20aString%20forClass%3A%20aClass%29%0A')}),
  799. smalltalk.Compiler);
  800. smalltalk.addMethod(
  801. '_compile_forClass_',
  802. smalltalk.method({
  803. selector: 'compile:forClass:',
  804. category: 'compiling',
  805. fn: function (aString, aClass) {
  806. var self = this;
  807. self._currentClass_(aClass);
  808. return self._compile_(aString);
  809. return self;
  810. },
  811. source: unescape('compile%3A%20aString%20forClass%3A%20aClass%0A%09self%20currentClass%3A%20aClass.%0A%09%5Eself%20compile%3A%20aString%0A')}),
  812. smalltalk.Compiler);
  813. smalltalk.addMethod(
  814. '_compileExpression_',
  815. smalltalk.method({
  816. selector: 'compileExpression:',
  817. category: 'compiling',
  818. fn: function (aString) {
  819. var self = this;
  820. self._currentClass_(smalltalk.DoIt);
  821. return self._compileNode_(self._parseExpression_(aString));
  822. return self;
  823. },
  824. source: unescape('compileExpression%3A%20aString%0A%09self%20currentClass%3A%20DoIt.%0A%09%5Eself%20compileNode%3A%20%28self%20parseExpression%3A%20aString%29%0A')}),
  825. smalltalk.Compiler);
  826. smalltalk.addMethod(
  827. '_eval_',
  828. smalltalk.method({
  829. selector: 'eval:',
  830. category: 'compiling',
  831. fn: function (aString) {
  832. var self = this;
  833. return eval(aString);
  834. return self;
  835. },
  836. source: unescape('eval%3A%20aString%0A%09%7B%27return%20eval%28aString%29%27%7D')}),
  837. smalltalk.Compiler);
  838. smalltalk.addMethod(
  839. '_compile_',
  840. smalltalk.method({
  841. selector: 'compile:',
  842. category: 'compiling',
  843. fn: function (aString) {
  844. var self = this;
  845. return self._compileNode_(self._parse_(aString));
  846. return self;
  847. },
  848. source: unescape('compile%3A%20aString%0A%09%5Eself%20compileNode%3A%20%28self%20parse%3A%20aString%29%0A')}),
  849. smalltalk.Compiler);
  850. smalltalk.addMethod(
  851. '_compileNode_',
  852. smalltalk.method({
  853. selector: 'compileNode:',
  854. category: 'compiling',
  855. fn: function (aNode) {
  856. var self = this;
  857. self['@stream'] = ""._writeStream();
  858. self._visit_(aNode);
  859. return self['@stream']._contents();
  860. return self;
  861. },
  862. source: unescape('compileNode%3A%20aNode%0A%09stream%20%3A%3D%20%27%27%20writeStream.%0A%09self%20visit%3A%20aNode.%0A%09%5Estream%20contents%0A')}),
  863. smalltalk.Compiler);
  864. smalltalk.addMethod(
  865. '_visit_',
  866. smalltalk.method({
  867. selector: 'visit:',
  868. category: 'visiting',
  869. fn: function (aNode) {
  870. var self = this;
  871. aNode._accept_(self);
  872. return self;
  873. },
  874. source: unescape('visit%3A%20aNode%0A%09aNode%20accept%3A%20self%0A')}),
  875. smalltalk.Compiler);
  876. smalltalk.addMethod(
  877. '_visitMethodNode_',
  878. smalltalk.method({
  879. selector: 'visitMethodNode:',
  880. category: 'visiting',
  881. fn: function (aNode) {
  882. var self = this;
  883. var str = nil;
  884. var currentSelector = nil;
  885. self['@currentSelector'] = aNode._selector()._asSelector();
  886. self['@nestedBlocks'] = 0;
  887. self['@earlyReturn'] = false;
  888. self['@unknownVariables'] = [];
  889. self['@tempVariables'] = [];
  890. (function ($rec) {$rec._nextPutAll_(unescape("smalltalk.method%28%7B").__comma(smalltalk.String._cr()));$rec._nextPutAll_(unescape("selector%3A%20%22").__comma(aNode._selector()).__comma(unescape("%22%2C")).__comma(smalltalk.String._cr()));$rec._nextPutAll_(unescape("source%3A%20unescape%28%22").__comma(aNode._source()._escaped()).__comma(unescape("%22%29%2C")).__comma(smalltalk.String._cr()));return $rec._nextPutAll_(unescape("fn%3A%20function%28"));}(self['@stream']));
  891. aNode._arguments()._do_separatedBy_(function (each) {self['@tempVariables']._add_(each);return self['@stream']._nextPutAll_(each);}, function () {return self['@stream']._nextPutAll_(unescape("%2C%20"));});
  892. (function ($rec) {$rec._nextPutAll_(unescape("%29%7B").__comma(smalltalk.String._cr()));return $rec._nextPutAll_(unescape("var%20self%3Dthis%3B").__comma(smalltalk.String._cr()));}(self['@stream']));
  893. str = self['@stream'];
  894. self['@stream'] = ""._writeStream();
  895. aNode._nodes()._do_(function (each) {return self._visit_(each);});
  896. self['@earlyReturn']._ifTrue_(function () {return str._nextPutAll_(unescape("try%7B"));});
  897. str._nextPutAll_(self['@stream']._contents());
  898. self['@stream'] = str;
  899. (function ($rec) {$rec._nextPutAll_(smalltalk.String._cr());return $rec._nextPutAll_(unescape("return%20self%3B"));}(self['@stream']));
  900. self['@earlyReturn']._ifTrue_(function () {return self['@stream']._nextPutAll_(smalltalk.String._cr().__comma(unescape("%7D%20catch%28e%29%20%7Bif%28e.name%20%3D%3D%3D%20%27stReturn%27%20%26%26%20e.selector%20%3D%3D%3D%20")).__comma(self['@currentSelector']._printString()).__comma(unescape("%29%7Breturn%20e.fn%28%29%7D%20throw%28e%29%7D")));});
  901. (function ($rec) {$rec._nextPutAll_(unescape("%7D").__comma(smalltalk.String._cr()));return $rec._nextPutAll_(unescape("%7D%29"));}(self['@stream']));
  902. return self;
  903. },
  904. source: unescape('visitMethodNode%3A%20aNode%0A%09%7C%20str%20currentSelector%20%7C%0A%09currentSelector%20%3A%3D%20aNode%20selector%20asSelector.%0A%09nestedBlocks%20%3A%3D%200.%0A%09earlyReturn%20%3A%3D%20false.%0A%09unknownVariables%20%3A%3D%20%23%28%29.%0A%09tempVariables%20%3A%3D%20%23%28%29.%0A%09stream%20%0A%09%20%20%20%20nextPutAll%3A%20%27smalltalk.method%28%7B%27%2C%20String%20cr%3B%0A%09%20%20%20%20nextPutAll%3A%20%27selector%3A%20%22%27%2C%20aNode%20selector%2C%20%27%22%2C%27%2C%20String%20cr%3B%0A%09%20%20%20%20nextPutAll%3A%20%27source%3A%20unescape%28%22%27%2C%20aNode%20source%20escaped%2C%20%27%22%29%2C%27%2C%20String%20cr%3B%0A%09%20%20%20%20nextPutAll%3A%20%27fn%3A%20function%28%27.%0A%09aNode%20arguments%20%0A%09%20%20%20%20do%3A%20%5B%3Aeach%20%7C%20%0A%09%09tempVariables%20add%3A%20each.%0A%09%09stream%20nextPutAll%3A%20each%5D%0A%09%20%20%20%20separatedBy%3A%20%5Bstream%20nextPutAll%3A%20%27%2C%20%27%5D.%0A%09stream%20%0A%09%20%20%20%20nextPutAll%3A%20%27%29%7B%27%2C%20String%20cr%3B%0A%09%20%20%20%20nextPutAll%3A%20%27var%20self%3Dthis%3B%27%2C%20String%20cr.%0A%09str%20%3A%3D%20stream.%0A%09stream%20%3A%3D%20%27%27%20writeStream.%0A%09aNode%20nodes%20do%3A%20%5B%3Aeach%20%7C%0A%09%20%20%20%20self%20visit%3A%20each%5D.%0A%09earlyReturn%20ifTrue%3A%20%5B%0A%09%20%20%20%20str%20nextPutAll%3A%20%27try%7B%27%5D.%0A%09str%20nextPutAll%3A%20stream%20contents.%0A%09stream%20%3A%3D%20str.%0A%09stream%20%0A%09%20%20%20%20nextPutAll%3A%20String%20cr%3B%20%0A%09%20%20%20%20nextPutAll%3A%20%27return%20self%3B%27.%0A%09earlyReturn%20ifTrue%3A%20%5B%0A%09%20%20%20%20stream%20nextPutAll%3A%20String%20cr%2C%20%27%7D%20catch%28e%29%20%7Bif%28e.name%20%3D%3D%3D%20%27%27stReturn%27%27%20%26%26%20e.selector%20%3D%3D%3D%20%27%2C%20currentSelector%20printString%2C%20%27%29%7Breturn%20e.fn%28%29%7D%20throw%28e%29%7D%27%5D.%0A%09stream%20%0A%09%20%20%20%20nextPutAll%3A%20%27%7D%27%2C%20String%20cr%3B%0A%09%20%20%20%20nextPutAll%3A%20%27%7D%29%27%0A')}),
  905. smalltalk.Compiler);
  906. smalltalk.addMethod(
  907. '_visitBlockNode_',
  908. smalltalk.method({
  909. selector: 'visitBlockNode:',
  910. category: 'visiting',
  911. fn: function (aNode) {
  912. var self = this;
  913. self['@stream']._nextPutAll_(unescape("%28function%28"));
  914. aNode._parameters()._do_separatedBy_(function (each) {self['@tempVariables']._add_(each);return self['@stream']._nextPutAll_(each);}, function () {return self['@stream']._nextPutAll_(unescape("%2C%20"));});
  915. self['@stream']._nextPutAll_(unescape("%29%7B"));
  916. aNode._nodes()._do_(function (each) {return self._visit_(each);});
  917. self['@stream']._nextPutAll_(unescape("%7D%29"));
  918. return self;
  919. },
  920. source: unescape('visitBlockNode%3A%20aNode%0A%09stream%20nextPutAll%3A%20%27%28function%28%27.%0A%09aNode%20parameters%20%0A%09%20%20%20%20do%3A%20%5B%3Aeach%20%7C%0A%09%09tempVariables%20add%3A%20each.%0A%09%09stream%20nextPutAll%3A%20each%5D%0A%09%20%20%20%20separatedBy%3A%20%5Bstream%20nextPutAll%3A%20%27%2C%20%27%5D.%0A%09stream%20nextPutAll%3A%20%27%29%7B%27.%0A%09aNode%20nodes%20do%3A%20%5B%3Aeach%20%7C%20self%20visit%3A%20each%5D.%0A%09stream%20nextPutAll%3A%20%27%7D%29%27%0A')}),
  921. smalltalk.Compiler);
  922. smalltalk.addMethod(
  923. '_visitSequenceNode_',
  924. smalltalk.method({
  925. selector: 'visitSequenceNode:',
  926. category: 'visiting',
  927. fn: function (aNode) {
  928. var self = this;
  929. aNode._temps()._do_(function (each) {self['@tempVariables']._add_(each);self['@stream']._nextPutAll_("var ".__comma(each).__comma(unescape("%3Dnil%3B")));return self['@stream']._nextPutAll_(smalltalk.String._cr());});
  930. aNode._nodes()._do_separatedBy_(function (each) {self._visit_(each);return self['@stream']._nextPutAll_(unescape("%3B"));}, function () {return self['@stream']._nextPutAll_(smalltalk.String._cr());});
  931. return self;
  932. },
  933. source: unescape('visitSequenceNode%3A%20aNode%0A%09aNode%20temps%20do%3A%20%5B%3Aeach%20%7C%0A%09%20%20%20%20tempVariables%20add%3A%20each.%0A%09%20%20%20%20stream%20nextPutAll%3A%20%27var%20%27%2C%20each%2C%20%27%3Dnil%3B%27.%0A%09%20%20%20%20stream%20nextPutAll%3A%20String%20cr%5D.%0A%09aNode%20nodes%20do%3A%20%5B%3Aeach%20%7C%0A%09%20%20%20%20self%20visit%3A%20each.%0A%09%20%20%20%20stream%20nextPutAll%3A%20%27%3B%27%5D%0A%09%20%20%20%20separatedBy%3A%20%5Bstream%20nextPutAll%3A%20String%20cr%5D%0A')}),
  934. smalltalk.Compiler);
  935. smalltalk.addMethod(
  936. '_visitBlockSequenceNode_',
  937. smalltalk.method({
  938. selector: 'visitBlockSequenceNode:',
  939. category: 'visiting',
  940. fn: function (aNode) {
  941. var self = this;
  942. var index = nil;
  943. self['@nestedBlocks'] = self['@nestedBlocks'].__plus(1);
  944. aNode._nodes()._isEmpty()._ifTrue_ifFalse_(function () {return self['@stream']._nextPutAll_(unescape("return%20nil%3B"));}, function () {aNode._temps()._do_(function (each) {self['@tempVariables']._add_(each);self['@stream']._nextPutAll_("var ".__comma(each).__comma(unescape("%3Dnil%3B")));return self['@stream']._nextPutAll_(smalltalk.String._cr());});index = 0;return aNode._nodes()._do_(function (each) {index = index.__plus(1);index.__eq(aNode._nodes()._size())._ifTrue_(function () {return self['@stream']._nextPutAll_("return ");});self._visit_(each);return self['@stream']._nextPutAll_(unescape("%3B"));});});
  945. self['@nestedBlocks'] = self['@nestedBlocks'].__minus(1);
  946. return self;
  947. },
  948. source: unescape('visitBlockSequenceNode%3A%20aNode%0A%09%7C%20index%20%7C%0A%09nestedBlocks%20%3A%3D%20nestedBlocks%20+%201.%0A%09aNode%20nodes%20isEmpty%0A%09%20%20%20%20ifTrue%3A%20%5B%0A%09%09stream%20nextPutAll%3A%20%27return%20nil%3B%27%5D%0A%09%20%20%20%20ifFalse%3A%20%5B%0A%09%09aNode%20temps%20do%3A%20%5B%3Aeach%20%7C%0A%09%09%20%20%20%20tempVariables%20add%3A%20each.%0A%09%09%20%20%20%20stream%20nextPutAll%3A%20%27var%20%27%2C%20each%2C%20%27%3Dnil%3B%27.%0A%09%09%20%20%20%20stream%20nextPutAll%3A%20String%20cr%5D.%0A%09%09index%20%3A%3D%200.%0A%09%09aNode%20nodes%20do%3A%20%5B%3Aeach%20%7C%0A%09%09%20%20%20%20index%20%3A%3D%20index%20+%201.%0A%09%09%20%20%20%20index%20%3D%20aNode%20nodes%20size%20ifTrue%3A%20%5B%0A%09%09%09stream%20nextPutAll%3A%20%27return%20%27%5D.%0A%09%09%20%20%20%20self%20visit%3A%20each.%0A%09%09%20%20%20%20stream%20nextPutAll%3A%20%27%3B%27%5D%5D.%0A%09nestedBlocks%20%3A%3D%20nestedBlocks%20-%201%0A')}),
  949. smalltalk.Compiler);
  950. smalltalk.addMethod(
  951. '_visitReturnNode_',
  952. smalltalk.method({
  953. selector: 'visitReturnNode:',
  954. category: 'visiting',
  955. fn: function (aNode) {
  956. var self = this;
  957. self['@nestedBlocks'].__gt(0)._ifTrue_(function () {return self['@earlyReturn'] = true;});
  958. self['@earlyReturn']._ifTrue_ifFalse_(function () {return function ($rec) {$rec._nextPutAll_(unescape("%28function%28%29%7Bthrow%28"));$rec._nextPutAll_(unescape("%7Bname%3A%20%27stReturn%27%2C%20selector%3A%20"));$rec._nextPutAll_(self['@currentSelector']._printString());return $rec._nextPutAll_(unescape("%2C%20fn%3A%20function%28%29%7Breturn%20"));}(self['@stream']);}, function () {return self['@stream']._nextPutAll_("return ");});
  959. aNode._nodes()._do_(function (each) {return self._visit_(each);});
  960. self['@earlyReturn']._ifTrue_(function () {return self['@stream']._nextPutAll_(unescape("%7D%7D%29%7D%29%28%29"));});
  961. return self;
  962. },
  963. source: unescape('visitReturnNode%3A%20aNode%0A%09nestedBlocks%20%3E%200%20ifTrue%3A%20%5B%0A%09%20%20%20%20earlyReturn%20%3A%3D%20true%5D.%0A%09earlyReturn%0A%09%20%20%20%20ifTrue%3A%20%5B%0A%09%09stream%0A%09%09%20%20%20%20nextPutAll%3A%20%27%28function%28%29%7Bthrow%28%27%3B%0A%09%09%20%20%20%20nextPutAll%3A%20%27%7Bname%3A%20%27%27stReturn%27%27%2C%20selector%3A%20%27%3B%0A%09%09%20%20%20%20nextPutAll%3A%20currentSelector%20printString%3B%0A%09%09%20%20%20%20nextPutAll%3A%20%27%2C%20fn%3A%20function%28%29%7Breturn%20%27%5D%0A%09%20%20%20%20ifFalse%3A%20%5Bstream%20nextPutAll%3A%20%27return%20%27%5D.%0A%09aNode%20nodes%20do%3A%20%5B%3Aeach%20%7C%0A%09%20%20%20%20self%20visit%3A%20each%5D.%0A%09earlyReturn%20ifTrue%3A%20%5B%0A%09%20%20%20%20stream%20nextPutAll%3A%20%27%7D%7D%29%7D%29%28%29%27%5D%0A')}),
  964. smalltalk.Compiler);
  965. smalltalk.addMethod(
  966. '_visitSendNode_',
  967. smalltalk.method({
  968. selector: 'visitSendNode:',
  969. category: 'visiting',
  970. fn: function (aNode) {
  971. var self = this;
  972. var str = nil;
  973. str = self['@stream'];
  974. self['@stream'] = ""._writeStream();
  975. self._visit_(aNode._receiver());
  976. self['@stream']._contents().__eq("super")._ifTrue_ifFalse_(function () {self['@stream'] = str;(function ($rec) {$rec._nextPutAll_(unescape("self.klass.superclass.fn.prototype%5B%27"));$rec._nextPutAll_(aNode._selector()._asSelector());return $rec._nextPutAll_(unescape("%27%5D.apply%28self%2C%20%5B"));}(self['@stream']));aNode._arguments()._do_separatedBy_(function (each) {return self._visit_(each);}, function () {return self['@stream']._nextPutAll_(unescape("%2C"));});return self['@stream']._nextPutAll_(unescape("%5D%29"));}, function () {str._nextPutAll_(self['@stream']._contents());self['@stream'] = str;self['@stream']._nextPutAll_(".".__comma(aNode._selector()._asSelector()).__comma(unescape("%28")));aNode._arguments()._do_separatedBy_(function (each) {return self._visit_(each);}, function () {return self['@stream']._nextPutAll_(unescape("%2C"));});return self['@stream']._nextPutAll_(unescape("%29"));});
  977. return self;
  978. },
  979. source: unescape('visitSendNode%3A%20aNode%0A%09%7C%20str%20%7C%0A%09str%20%3A%3D%20stream.%0A%09stream%20%3A%3D%20%27%27%20writeStream.%0A%09self%20visit%3A%20aNode%20receiver.%0A%09stream%20contents%20%3D%20%27super%27%20%0A%09%20%20%20%20ifTrue%3A%20%5B%0A%09%09stream%20%3A%3D%20str.%0A%09%09stream%20%0A%09%09%20%20%20%20nextPutAll%3A%20%27self.klass.superclass.fn.prototype%5B%27%27%27%3B%0A%09%09%20%20%20%20nextPutAll%3A%20aNode%20selector%20asSelector%3B%0A%09%09%20%20%20%20nextPutAll%3A%20%27%27%27%5D.apply%28self%2C%20%5B%27.%0A%09%09aNode%20arguments%20%0A%09%09%20%20%20%20do%3A%20%5B%3Aeach%20%7C%20self%20visit%3A%20each%5D%0A%09%09%20%20%20%20separatedBy%3A%20%5Bstream%20nextPutAll%3A%20%27%2C%27%5D.%0A%09%09stream%20nextPutAll%3A%20%27%5D%29%27%5D%0A%09%20%20%20%20ifFalse%3A%20%5B%0A%09%09str%20nextPutAll%3A%20stream%20contents.%0A%09%09stream%20%3A%3D%20str.%0A%09%09stream%20nextPutAll%3A%20%27.%27%2C%20aNode%20selector%20asSelector%2C%20%27%28%27.%0A%09%09aNode%20arguments%20%0A%09%09%20%20%20%20do%3A%20%5B%3Aeach%20%7C%20self%20visit%3A%20each%5D%0A%09%09%20%20%20%20separatedBy%3A%20%5Bstream%20nextPutAll%3A%20%27%2C%27%5D.%0A%09%09stream%20nextPutAll%3A%20%27%29%27%5D%0A')}),
  980. smalltalk.Compiler);
  981. smalltalk.addMethod(
  982. '_visitCascadeNode_',
  983. smalltalk.method({
  984. selector: 'visitCascadeNode:',
  985. category: 'visiting',
  986. fn: function (aNode) {
  987. var self = this;
  988. var index = nil;
  989. index = 0;
  990. self['@tempVariables']._includes_("$rec")._ifFalse_(function () {return self['@tempVariables']._add_("$rec");});
  991. self['@stream']._nextPutAll_(unescape("%28function%28%24rec%29%7B"));
  992. aNode._nodes()._do_(function (each) {index = index.__plus(1);index.__eq(aNode._nodes()._size())._ifTrue_(function () {return self['@stream']._nextPutAll_("return ");});each._receiver_(smalltalk.VariableNode._new()._value_("$rec"));self._visit_(each);return self['@stream']._nextPutAll_(unescape("%3B"));});
  993. self['@stream']._nextPutAll_(unescape("%7D%29%28"));
  994. self._visit_(aNode._receiver());
  995. self['@stream']._nextPutAll_(unescape("%29"));
  996. return self;
  997. },
  998. source: unescape('visitCascadeNode%3A%20aNode%0A%09%7C%20index%20%7C%0A%09index%20%3A%3D%200.%0A%09%28tempVariables%20includes%3A%20%27%24rec%27%29%20ifFalse%3A%20%5B%0A%09%09tempVariables%20add%3A%20%27%24rec%27%5D.%0A%09stream%20nextPutAll%3A%20%27%28function%28%24rec%29%7B%27.%0A%09aNode%20nodes%20do%3A%20%5B%3Aeach%20%7C%0A%09%20%20%20%20index%20%3A%3D%20index%20+%201.%0A%09%20%20%20%20index%20%3D%20aNode%20nodes%20size%20ifTrue%3A%20%5B%0A%09%09stream%20nextPutAll%3A%20%27return%20%27%5D.%0A%09%20%20%20%20each%20receiver%3A%20%28VariableNode%20new%20value%3A%20%27%24rec%27%29.%0A%09%20%20%20%20self%20visit%3A%20each.%0A%09%20%20%20%20stream%20nextPutAll%3A%20%27%3B%27%5D.%0A%09stream%20nextPutAll%3A%20%27%7D%29%28%27.%0A%09self%20visit%3A%20aNode%20receiver.%0A%09stream%20nextPutAll%3A%20%27%29%27%0A')}),
  999. smalltalk.Compiler);
  1000. smalltalk.addMethod(
  1001. '_visitValueNode_',
  1002. smalltalk.method({
  1003. selector: 'visitValueNode:',
  1004. category: 'visiting',
  1005. fn: function (aNode) {
  1006. var self = this;
  1007. self['@stream']._nextPutAll_(aNode._value()._asJavascript());
  1008. return self;
  1009. },
  1010. source: unescape('visitValueNode%3A%20aNode%0A%09stream%20nextPutAll%3A%20aNode%20value%20asJavascript%0A')}),
  1011. smalltalk.Compiler);
  1012. smalltalk.addMethod(
  1013. '_visitAssignmentNode_',
  1014. smalltalk.method({
  1015. selector: 'visitAssignmentNode:',
  1016. category: 'visiting',
  1017. fn: function (aNode) {
  1018. var self = this;
  1019. self._visit_(aNode._left());
  1020. self['@stream']._nextPutAll_(unescape("%3D"));
  1021. self._visit_(aNode._right());
  1022. return self;
  1023. },
  1024. source: unescape('visitAssignmentNode%3A%20aNode%0A%09self%20visit%3A%20aNode%20left.%0A%09stream%20nextPutAll%3A%20%27%3D%27.%0A%09self%20visit%3A%20aNode%20right%0A')}),
  1025. smalltalk.Compiler);
  1026. smalltalk.addMethod(
  1027. '_visitClassReferenceNode_',
  1028. smalltalk.method({
  1029. selector: 'visitClassReferenceNode:',
  1030. category: 'visiting',
  1031. fn: function (aNode) {
  1032. var self = this;
  1033. (function ($rec) {$rec._nextPutAll_("smalltalk.");return $rec._nextPutAll_(aNode._value());}(self['@stream']));
  1034. return self;
  1035. },
  1036. source: unescape('visitClassReferenceNode%3A%20aNode%0A%09stream%0A%09%20%20%20%20nextPutAll%3A%20%27smalltalk.%27%3B%0A%09%20%20%20%20nextPutAll%3A%20aNode%20value%0A')}),
  1037. smalltalk.Compiler);
  1038. smalltalk.addMethod(
  1039. '_visitVariableNode_',
  1040. smalltalk.method({
  1041. selector: 'visitVariableNode:',
  1042. category: 'visiting',
  1043. fn: function (aNode) {
  1044. var self = this;
  1045. self._currentClass()._instanceVariableNames()._includes_(aNode._value())._ifTrue_ifFalse_(function () {return self['@stream']._nextPutAll_(unescape("self%5B%27@").__comma(aNode._value()).__comma(unescape("%27%5D")));}, function () {self._knownVariables()._includes_(aNode._value())._ifFalse_(function () {return self['@unknownVariables']._add_(aNode._value());});return self['@stream']._nextPutAll_(aNode._value());});
  1046. return self;
  1047. },
  1048. source: unescape('visitVariableNode%3A%20aNode%0A%09%28self%20currentClass%20instanceVariableNames%20includes%3A%20aNode%20value%29%20%0A%09%09ifTrue%3A%20%5Bstream%20nextPutAll%3A%20%27self%5B%27%27@%27%2C%20aNode%20value%2C%20%27%27%27%5D%27%5D%0A%09%09ifFalse%3A%20%5B%0A%09%09%09%28self%20knownVariables%20includes%3A%20aNode%20value%29%20ifFalse%3A%20%5B%0A%09%09%09%09unknownVariables%20add%3A%20aNode%20value%5D.%0A%09%09%09stream%20nextPutAll%3A%20aNode%20value%5D%0A')}),
  1049. smalltalk.Compiler);
  1050. smalltalk.addMethod(
  1051. '_visitJSStatementNode_',
  1052. smalltalk.method({
  1053. selector: 'visitJSStatementNode:',
  1054. category: 'visiting',
  1055. fn: function (aNode) {
  1056. var self = this;
  1057. self['@stream']._nextPutAll_(aNode._source()._value()._replace_with_(unescape("%27%27"), unescape("%27")));
  1058. return self;
  1059. },
  1060. source: unescape('visitJSStatementNode%3A%20aNode%0A%09stream%20nextPutAll%3A%20%28aNode%20source%20value%20replace%3A%20%27%27%27%27%27%27%20with%3A%20%27%27%27%27%29')}),
  1061. smalltalk.Compiler);
  1062. smalltalk.addMethod(
  1063. '_parse_',
  1064. smalltalk.method({
  1065. selector: 'parse:',
  1066. category: 'compiling',
  1067. fn: function (aString) {
  1068. var self = this;
  1069. return self._parser()._parse_(aString._readStream());
  1070. return self;
  1071. },
  1072. source: unescape('parse%3A%20aString%0A%20%20%20%20%5Eself%20parser%20parse%3A%20aString%20readStream%0A')}),
  1073. smalltalk.Compiler);
  1074. smalltalk.addMethod(
  1075. '_parseExpression_',
  1076. smalltalk.method({
  1077. selector: 'parseExpression:',
  1078. category: 'compiling',
  1079. fn: function (aString) {
  1080. var self = this;
  1081. return self._parse_(unescape("doIt%20%5E%5B").__comma(aString).__comma(unescape("%5D%20value")));
  1082. return self;
  1083. },
  1084. source: unescape('parseExpression%3A%20aString%0A%20%20%20%20%5Eself%20parse%3A%20%27doIt%20%5E%5B%27%2C%20aString%2C%20%27%5D%20value%27%0A')}),
  1085. smalltalk.Compiler);
  1086. smalltalk.addMethod(
  1087. '_unknownVariables',
  1088. smalltalk.method({
  1089. selector: 'unknownVariables',
  1090. category: 'accessing',
  1091. fn: function () {
  1092. var self = this;
  1093. return self['@unknownVariables']._copy();
  1094. return self;
  1095. },
  1096. source: unescape('unknownVariables%0A%09%5EunknownVariables%20copy')}),
  1097. smalltalk.Compiler);
  1098. smalltalk.addMethod(
  1099. '_pseudoVariables',
  1100. smalltalk.method({
  1101. selector: 'pseudoVariables',
  1102. category: 'accessing',
  1103. fn: function () {
  1104. var self = this;
  1105. return ["self", "super", "true", "false", "nil", "thisContext"];
  1106. return self;
  1107. },
  1108. source: unescape('pseudoVariables%0A%09%5E%23%28%27self%27%20%27super%27%20%27true%27%20%27false%27%20%27nil%27%20%27thisContext%27%29')}),
  1109. smalltalk.Compiler);
  1110. smalltalk.addMethod(
  1111. '_tempVariables',
  1112. smalltalk.method({
  1113. selector: 'tempVariables',
  1114. category: 'accessing',
  1115. fn: function () {
  1116. var self = this;
  1117. return self['@tempVariables']._copy();
  1118. return self;
  1119. },
  1120. source: unescape('tempVariables%0A%09%5EtempVariables%20copy')}),
  1121. smalltalk.Compiler);
  1122. smalltalk.addMethod(
  1123. '_knownVariables',
  1124. smalltalk.method({
  1125. selector: 'knownVariables',
  1126. category: 'accessing',
  1127. fn: function () {
  1128. var self = this;
  1129. return function ($rec) {$rec._addAll_(self._tempVariables());return $rec._yourself();}(self._pseudoVariables());
  1130. return self;
  1131. },
  1132. source: unescape('knownVariables%0A%09%5Eself%20pseudoVariables%20%0A%09%09addAll%3A%20self%20tempVariables%3B%0A%09%09yourself')}),
  1133. smalltalk.Compiler);
  1134. smalltalk.addMethod(
  1135. '_recompile_',
  1136. smalltalk.method({
  1137. selector: 'recompile:',
  1138. category: 'compiling',
  1139. fn: function (aClass) {
  1140. var self = this;
  1141. aClass._methodDictionary()._do_(function (each) {var method = nil;method = self._load_forClass_(each._source(), aClass);method._category_(each._category());return aClass._addCompiledMethod_(method);});
  1142. aClass._isMetaclass()._ifFalse_(function () {return self._recompile_(aClass._class());});
  1143. return self;
  1144. },
  1145. source: unescape('recompile%3A%20aClass%0A%09aClass%20methodDictionary%20do%3A%20%5B%3Aeach%20%7C%7C%20method%20%7C%0A%09%09method%20%3A%3D%20self%20load%3A%20each%20source%20forClass%3A%20aClass.%0A%09%09method%20category%3A%20each%20category.%0A%09%09aClass%20addCompiledMethod%3A%20method%5D.%0A%09aClass%20isMetaclass%20ifFalse%3A%20%5Bself%20recompile%3A%20aClass%20class%5D')}),
  1146. smalltalk.Compiler);
  1147. smalltalk.addMethod(
  1148. '_recompileAll',
  1149. smalltalk.method({
  1150. selector: 'recompileAll',
  1151. category: 'compiling',
  1152. fn: function () {
  1153. var self = this;
  1154. smalltalk.Smalltalk._current()._classes()._do_(function (each) {return self._recompile_(each);});
  1155. return self;
  1156. },
  1157. source: unescape('recompileAll%0A%09Smalltalk%20current%20classes%20do%3A%20%5B%3Aeach%20%7C%0A%09%09self%20recompile%3A%20each%5D')}),
  1158. smalltalk.Compiler);
  1159. smalltalk.addClass('DoIt', smalltalk.Object, [], 'Compiler');
  1160. smalltalk.addMethod(
  1161. '_doIt',
  1162. smalltalk.method({
  1163. selector: 'doIt',
  1164. category: '',
  1165. fn: function () {
  1166. var self = this;
  1167. return function () {var results = nil;results = [];smalltalk.Smalltalk._current()._classes()._do_(function (each) {return each._class()._methodDictionary()._do_(function (method) {return method._source()._match_(unescape("%5C%5E%7B"))._ifTrue_(function () {return results._add_(each);});});});return results._printNl();}._value();
  1168. return self;
  1169. },
  1170. source: unescape('doIt%20%5E%5B%7C%20results%20%7C%0Aresults%20%3A%3D%20%23%28%29.%0A%0ASmalltalk%20current%20classes%20do%3A%20%5B%3Aeach%20%7C%0A%09each%20class%20methodDictionary%20do%3A%20%5B%3Amethod%20%7C%0A%09%09%28method%20source%20match%3A%20%27%5C%5E%7B%27%29%20ifTrue%3A%20%5B%0A%09%09%09results%20add%3A%20each%5D%5D%5D.%0A%0Aresults%20printNl%5D%20value')}),
  1171. smalltalk.DoIt);