1
0

Compiler.js 53 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798991001011021031041051061071081091101111121131141151161171181191201211221231241251261271281291301311321331341351361371381391401411421431441451461471481491501511521531541551561571581591601611621631641651661671681691701711721731741751761771781791801811821831841851861871881891901911921931941951961971981992002012022032042052062072082092102112122132142152162172182192202212222232242252262272282292302312322332342352362372382392402412422432442452462472482492502512522532542552562572582592602612622632642652662672682692702712722732742752762772782792802812822832842852862872882892902912922932942952962972982993003013023033043053063073083093103113123133143153163173183193203213223233243253263273283293303313323333343353363373383393403413423433443453463473483493503513523533543553563573583593603613623633643653663673683693703713723733743753763773783793803813823833843853863873883893903913923933943953963973983994004014024034044054064074084094104114124134144154164174184194204214224234244254264274284294304314324334344354364374384394404414424434444454464474484494504514524534544554564574584594604614624634644654664674684694704714724734744754764774784794804814824834844854864874884894904914924934944954964974984995005015025035045055065075085095105115125135145155165175185195205215225235245255265275285295305315325335345355365375385395405415425435445455465475485495505515525535545555565575585595605615625635645655665675685695705715725735745755765775785795805815825835845855865875885895905915925935945955965975985996006016026036046056066076086096106116126136146156166176186196206216226236246256266276286296306316326336346356366376386396406416426436446456466476486496506516526536546556566576586596606616626636646656666676686696706716726736746756766776786796806816826836846856866876886896906916926936946956966976986997007017027037047057067077087097107117127137147157167177187197207217227237247257267277287297307317327337347357367377387397407417427437447457467477487497507517527537547557567577587597607617627637647657667677687697707717727737747757767777787797807817827837847857867877887897907917927937947957967977987998008018028038048058068078088098108118128138148158168178188198208218228238248258268278288298308318328338348358368378388398408418428438448458468478488498508518528538548558568578588598608618628638648658668678688698708718728738748758768778788798808818828838848858868878888898908918928938948958968978988999009019029039049059069079089099109119129139149159169179189199209219229239249259269279289299309319329339349359369379389399409419429439449459469479489499509519529539549559569579589599609619629639649659669679689699709719729739749759769779789799809819829839849859869879889899909919929939949959969979989991000100110021003100410051006100710081009101010111012101310141015101610171018101910201021102210231024102510261027102810291030103110321033103410351036103710381039104010411042104310441045104610471048104910501051105210531054105510561057105810591060106110621063106410651066106710681069107010711072107310741075107610771078107910801081108210831084108510861087108810891090109110921093109410951096109710981099110011011102110311041105110611071108110911101111111211131114111511161117111811191120112111221123112411251126112711281129113011311132113311341135113611371138113911401141114211431144114511461147114811491150115111521153115411551156115711581159116011611162116311641165116611671168116911701171117211731174117511761177117811791180118111821183118411851186118711881189119011911192119311941195119611971198119912001201120212031204120512061207120812091210121112121213121412151216121712181219122012211222122312241225122612271228122912301231123212331234123512361237123812391240124112421243124412451246124712481249125012511252125312541255125612571258125912601261126212631264126512661267126812691270127112721273127412751276127712781279128012811282128312841285128612871288128912901291129212931294129512961297
  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 smalltalk.send(self['@nodes'], "_ifNil_", [function () {return self['@nodes'] = smalltalk.send(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. smalltalk.send(smalltalk.send(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. smalltalk.send(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 smalltalk.send(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. smalltalk.send(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 smalltalk.send(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) {smalltalk.send($rec, "_receiver_", [smalltalk.send(smalltalk.send(self, "_receiver", []), "_ifNil_ifNotNil_", [function () {return anObject;}, function () {return smalltalk.send(smalltalk.send(self, "_receiver", []), "_valueForReceiver_", [anObject]);}])]);smalltalk.send($rec, "_selector_", [smalltalk.send(self, "_selector", [])]);smalltalk.send($rec, "_arguments_", [smalltalk.send(self, "_arguments", [])]);return smalltalk.send($rec, "_yourself", []);}(smalltalk.send(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) {smalltalk.send($rec, "_selector_", [smalltalk.send(self, "_selector", [])]);smalltalk.send($rec, "_arguments_", [smalltalk.send(self, "_arguments", [])]);return smalltalk.send($rec, "_yourself", []);}(smalltalk.send(smalltalk.SendNode, "_new", []));
  229. return function ($rec) {smalltalk.send($rec, "_receiver_", [smalltalk.send(self, "_receiver", [])]);smalltalk.send($rec, "_nodes_", [smalltalk.send(smalltalk.send(smalltalk.Array, "_with_", [first]), "__comma", [aCollection])]);return smalltalk.send($rec, "_yourself", []);}(smalltalk.send(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. smalltalk.send(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. smalltalk.send(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. smalltalk.send(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 smalltalk.send(self['@parameters'], "_ifNil_", [function () {return self['@parameters'] = smalltalk.send(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. smalltalk.send(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 smalltalk.send(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) {smalltalk.send($rec, "_nodes_", [smalltalk.send(self, "_nodes", [])]);smalltalk.send($rec, "_temps_", [smalltalk.send(self, "_temps", [])]);return smalltalk.send($rec, "_yourself", []);}(smalltalk.send(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. smalltalk.send(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. smalltalk.send(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. smalltalk.send(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. smalltalk.send(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. smalltalk.send(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. smalltalk.send(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 smalltalk.send(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. smalltalk.send(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. smalltalk.send(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. smalltalk.send(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. smalltalk.send(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. smalltalk.send(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. smalltalk.send(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. smalltalk.send(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. smalltalk.send(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. smalltalk.send(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. smalltalk.send(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. smalltalk.send(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) {smalltalk.send($rec, "_nextPutAll_", ["smalltalk."]);return smalltalk.send($rec, "_nextPutAll_", [smalltalk.send(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) {smalltalk.send($rec, "_nextPutAll_", [unescape("function%28%29%7B")]);smalltalk.send($rec, "_nextPutAll_", [smalltalk.send(aNode, "_source", [])]);return smalltalk.send($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'] = smalltalk.send("", "_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.send(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.send(smalltalk.DoIt, "_addCompiledMethod_", [smalltalk.send(self, "_eval_", [smalltalk.send(self, "_compileExpression_", [aString])])]);
  783. return smalltalk.send(smalltalk.send(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 smalltalk.send(self, "_eval_", [smalltalk.send(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. smalltalk.send(self, "_currentClass_", [aClass]);
  808. return smalltalk.send(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. smalltalk.send(self, "_currentClass_", [smalltalk.DoIt]);
  821. return smalltalk.send(self, "_compileNode_", [smalltalk.send(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 smalltalk.send(self, "_compileNode_", [smalltalk.send(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'] = smalltalk.send("", "_writeStream", []);
  858. smalltalk.send(self, "_visit_", [aNode]);
  859. return smalltalk.send(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. smalltalk.send(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'] = smalltalk.send(smalltalk.send(aNode, "_selector", []), "_asSelector", []);
  886. self['@nestedBlocks'] = 0;
  887. self['@earlyReturn'] = false;
  888. self['@unknownVariables'] = [];
  889. self['@tempVariables'] = [];
  890. (function ($rec) {smalltalk.send($rec, "_nextPutAll_", [smalltalk.send(unescape("smalltalk.method%28%7B"), "__comma", [smalltalk.send(smalltalk.String, "_cr", [])])]);return smalltalk.send($rec, "_nextPutAll_", [smalltalk.send(smalltalk.send(smalltalk.send(unescape("selector%3A%20%22"), "__comma", [smalltalk.send(aNode, "_selector", [])]), "__comma", [unescape("%22%2C")]), "__comma", [smalltalk.send(smalltalk.String, "_cr", [])])]);}(self['@stream']));
  891. smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.Smalltalk, "_current", []), "_debugMode", []), "_ifTrue_", [function () {return smalltalk.send(self['@stream'], "_nextPutAll_", [smalltalk.send(smalltalk.send(smalltalk.send(unescape("source%3A%20unescape%28%22"), "__comma", [smalltalk.send(smalltalk.send(aNode, "_source", []), "_escaped", [])]), "__comma", [unescape("%22%29%2C")]), "__comma", [smalltalk.send(smalltalk.String, "_cr", [])])]);}]);
  892. smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("fn%3A%20function%28")]);
  893. smalltalk.send(smalltalk.send(aNode, "_arguments", []), "_do_separatedBy_", [function (each) {smalltalk.send(self['@tempVariables'], "_add_", [each]);return smalltalk.send(self['@stream'], "_nextPutAll_", [each]);}, function () {return smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%2C%20")]);}]);
  894. (function ($rec) {smalltalk.send($rec, "_nextPutAll_", [smalltalk.send(unescape("%29%7B"), "__comma", [smalltalk.send(smalltalk.String, "_cr", [])])]);return smalltalk.send($rec, "_nextPutAll_", [smalltalk.send(unescape("var%20self%3Dthis%3B"), "__comma", [smalltalk.send(smalltalk.String, "_cr", [])])]);}(self['@stream']));
  895. str = self['@stream'];
  896. self['@stream'] = smalltalk.send("", "_writeStream", []);
  897. smalltalk.send(smalltalk.send(aNode, "_nodes", []), "_do_", [function (each) {return smalltalk.send(self, "_visit_", [each]);}]);
  898. smalltalk.send(self['@earlyReturn'], "_ifTrue_", [function () {return smalltalk.send(str, "_nextPutAll_", [unescape("try%7B")]);}]);
  899. smalltalk.send(str, "_nextPutAll_", [smalltalk.send(self['@stream'], "_contents", [])]);
  900. self['@stream'] = str;
  901. (function ($rec) {smalltalk.send($rec, "_nextPutAll_", [smalltalk.send(smalltalk.String, "_cr", [])]);return smalltalk.send($rec, "_nextPutAll_", [unescape("return%20self%3B")]);}(self['@stream']));
  902. smalltalk.send(self['@earlyReturn'], "_ifTrue_", [function () {return smalltalk.send(self['@stream'], "_nextPutAll_", [smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(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", [smalltalk.send(self['@currentSelector'], "_printString", [])]), "__comma", [unescape("%29%7Breturn%20e.fn%28%29%7D%20throw%28e%29%7D")])]);}]);
  903. (function ($rec) {smalltalk.send($rec, "_nextPutAll_", [smalltalk.send(unescape("%7D"), "__comma", [smalltalk.send(smalltalk.String, "_cr", [])])]);return smalltalk.send($rec, "_nextPutAll_", [unescape("%7D%29")]);}(self['@stream']));
  904. return self;
  905. },
  906. 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.%0A%09Smalltalk%20current%20debugMode%20ifTrue%3A%20%5B%0A%09%20%20%20%20stream%20nextPutAll%3A%20%27source%3A%20unescape%28%22%27%2C%20aNode%20source%20escaped%2C%20%27%22%29%2C%27%2C%20String%20cr%5D.%0A%09stream%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')}),
  907. smalltalk.Compiler);
  908. smalltalk.addMethod(
  909. '_visitBlockNode_',
  910. smalltalk.method({
  911. selector: 'visitBlockNode:',
  912. category: 'visiting',
  913. fn: function (aNode) {
  914. var self = this;
  915. smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28function%28")]);
  916. smalltalk.send(smalltalk.send(aNode, "_parameters", []), "_do_separatedBy_", [function (each) {smalltalk.send(self['@tempVariables'], "_add_", [each]);return smalltalk.send(self['@stream'], "_nextPutAll_", [each]);}, function () {return smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%2C%20")]);}]);
  917. smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%29%7B")]);
  918. smalltalk.send(smalltalk.send(aNode, "_nodes", []), "_do_", [function (each) {return smalltalk.send(self, "_visit_", [each]);}]);
  919. smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%7D%29")]);
  920. return self;
  921. },
  922. 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')}),
  923. smalltalk.Compiler);
  924. smalltalk.addMethod(
  925. '_visitSequenceNode_',
  926. smalltalk.method({
  927. selector: 'visitSequenceNode:',
  928. category: 'visiting',
  929. fn: function (aNode) {
  930. var self = this;
  931. smalltalk.send(smalltalk.send(aNode, "_temps", []), "_do_", [function (each) {smalltalk.send(self['@tempVariables'], "_add_", [each]);smalltalk.send(self['@stream'], "_nextPutAll_", [smalltalk.send(smalltalk.send("var ", "__comma", [each]), "__comma", [unescape("%3Dnil%3B")])]);return smalltalk.send(self['@stream'], "_nextPutAll_", [smalltalk.send(smalltalk.String, "_cr", [])]);}]);
  932. smalltalk.send(smalltalk.send(aNode, "_nodes", []), "_do_separatedBy_", [function (each) {smalltalk.send(self, "_visit_", [each]);return smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%3B")]);}, function () {return smalltalk.send(self['@stream'], "_nextPutAll_", [smalltalk.send(smalltalk.String, "_cr", [])]);}]);
  933. return self;
  934. },
  935. 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')}),
  936. smalltalk.Compiler);
  937. smalltalk.addMethod(
  938. '_visitBlockSequenceNode_',
  939. smalltalk.method({
  940. selector: 'visitBlockSequenceNode:',
  941. category: 'visiting',
  942. fn: function (aNode) {
  943. var self = this;
  944. var index = nil;
  945. self['@nestedBlocks'] = smalltalk.send(self['@nestedBlocks'], "__plus", [1]);
  946. smalltalk.send(smalltalk.send(smalltalk.send(aNode, "_nodes", []), "_isEmpty", []), "_ifTrue_ifFalse_", [function () {return smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("return%20nil%3B")]);}, function () {smalltalk.send(smalltalk.send(aNode, "_temps", []), "_do_", [function (each) {smalltalk.send(self['@tempVariables'], "_add_", [each]);smalltalk.send(self['@stream'], "_nextPutAll_", [smalltalk.send(smalltalk.send("var ", "__comma", [each]), "__comma", [unescape("%3Dnil%3B")])]);return smalltalk.send(self['@stream'], "_nextPutAll_", [smalltalk.send(smalltalk.String, "_cr", [])]);}]);index = 0;return smalltalk.send(smalltalk.send(aNode, "_nodes", []), "_do_", [function (each) {index = smalltalk.send(index, "__plus", [1]);smalltalk.send(smalltalk.send(index, "__eq", [smalltalk.send(smalltalk.send(aNode, "_nodes", []), "_size", [])]), "_ifTrue_", [function () {return smalltalk.send(self['@stream'], "_nextPutAll_", ["return "]);}]);smalltalk.send(self, "_visit_", [each]);return smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%3B")]);}]);}]);
  947. self['@nestedBlocks'] = smalltalk.send(self['@nestedBlocks'], "__minus", [1]);
  948. return self;
  949. },
  950. 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')}),
  951. smalltalk.Compiler);
  952. smalltalk.addMethod(
  953. '_visitReturnNode_',
  954. smalltalk.method({
  955. selector: 'visitReturnNode:',
  956. category: 'visiting',
  957. fn: function (aNode) {
  958. var self = this;
  959. smalltalk.send(smalltalk.send(self['@nestedBlocks'], "__gt", [0]), "_ifTrue_", [function () {return self['@earlyReturn'] = true;}]);
  960. smalltalk.send(self['@earlyReturn'], "_ifTrue_ifFalse_", [function () {return function ($rec) {smalltalk.send($rec, "_nextPutAll_", [unescape("%28function%28%29%7Bthrow%28")]);smalltalk.send($rec, "_nextPutAll_", [unescape("%7Bname%3A%20%27stReturn%27%2C%20selector%3A%20")]);smalltalk.send($rec, "_nextPutAll_", [smalltalk.send(self['@currentSelector'], "_printString", [])]);return smalltalk.send($rec, "_nextPutAll_", [unescape("%2C%20fn%3A%20function%28%29%7Breturn%20")]);}(self['@stream']);}, function () {return smalltalk.send(self['@stream'], "_nextPutAll_", ["return "]);}]);
  961. smalltalk.send(smalltalk.send(aNode, "_nodes", []), "_do_", [function (each) {return smalltalk.send(self, "_visit_", [each]);}]);
  962. smalltalk.send(self['@earlyReturn'], "_ifTrue_", [function () {return smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%7D%7D%29%7D%29%28%29")]);}]);
  963. return self;
  964. },
  965. 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')}),
  966. smalltalk.Compiler);
  967. smalltalk.addMethod(
  968. '_visitSendNode_',
  969. smalltalk.method({
  970. selector: 'visitSendNode:',
  971. category: 'visiting',
  972. fn: function (aNode) {
  973. var self = this;
  974. var str = nil;
  975. str = self['@stream'];
  976. self['@stream'] = smalltalk.send("", "_writeStream", []);
  977. smalltalk.send(self, "_visit_", [smalltalk.send(aNode, "_receiver", [])]);
  978. smalltalk.send(smalltalk.send(smalltalk.send(self['@stream'], "_contents", []), "__eq", ["super"]), "_ifTrue_ifFalse_", [function () {self['@stream'] = str;(function ($rec) {smalltalk.send($rec, "_nextPutAll_", [unescape("self.klass.superclass.fn.prototype%5B%27")]);smalltalk.send($rec, "_nextPutAll_", [smalltalk.send(smalltalk.send(aNode, "_selector", []), "_asSelector", [])]);return smalltalk.send($rec, "_nextPutAll_", [unescape("%27%5D.apply%28self%2C%20%5B")]);}(self['@stream']));smalltalk.send(smalltalk.send(aNode, "_arguments", []), "_do_separatedBy_", [function (each) {return smalltalk.send(self, "_visit_", [each]);}, function () {return smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%2C")]);}]);return smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%5D%29")]);}, function () {smalltalk.send(str, "_nextPutAll_", [unescape("smalltalk.send%28")]);smalltalk.send(str, "_nextPutAll_", [smalltalk.send(self['@stream'], "_contents", [])]);self['@stream'] = str;smalltalk.send(self['@stream'], "_nextPutAll_", [smalltalk.send(smalltalk.send(unescape("%2C%20%22"), "__comma", [smalltalk.send(smalltalk.send(aNode, "_selector", []), "_asSelector", [])]), "__comma", [unescape("%22%2C%20%5B")])]);smalltalk.send(smalltalk.send(aNode, "_arguments", []), "_do_separatedBy_", [function (each) {return smalltalk.send(self, "_visit_", [each]);}, function () {return smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%2C%20")]);}]);return smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%5D%29")]);}]);
  979. return self;
  980. },
  981. 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%20%27smalltalk.send%28%27.%0A%09%09str%20nextPutAll%3A%20stream%20contents.%0A%09%09stream%20%3A%3D%20str.%0A%09%09stream%20nextPutAll%3A%20%27%2C%20%22%27%2C%20aNode%20selector%20asSelector%2C%20%27%22%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%20%27%5D.%0A%09%09stream%20nextPutAll%3A%20%27%5D%29%27%5D')}),
  982. smalltalk.Compiler);
  983. smalltalk.addMethod(
  984. '_visitCascadeNode_',
  985. smalltalk.method({
  986. selector: 'visitCascadeNode:',
  987. category: 'visiting',
  988. fn: function (aNode) {
  989. var self = this;
  990. var index = nil;
  991. index = 0;
  992. smalltalk.send(smalltalk.send(self['@tempVariables'], "_includes_", ["$rec"]), "_ifFalse_", [function () {return smalltalk.send(self['@tempVariables'], "_add_", ["$rec"]);}]);
  993. smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28function%28%24rec%29%7B")]);
  994. smalltalk.send(smalltalk.send(aNode, "_nodes", []), "_do_", [function (each) {index = smalltalk.send(index, "__plus", [1]);smalltalk.send(smalltalk.send(index, "__eq", [smalltalk.send(smalltalk.send(aNode, "_nodes", []), "_size", [])]), "_ifTrue_", [function () {return smalltalk.send(self['@stream'], "_nextPutAll_", ["return "]);}]);smalltalk.send(each, "_receiver_", [smalltalk.send(smalltalk.send(smalltalk.VariableNode, "_new", []), "_value_", ["$rec"])]);smalltalk.send(self, "_visit_", [each]);return smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%3B")]);}]);
  995. smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%7D%29%28")]);
  996. smalltalk.send(self, "_visit_", [smalltalk.send(aNode, "_receiver", [])]);
  997. smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%29")]);
  998. return self;
  999. },
  1000. 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')}),
  1001. smalltalk.Compiler);
  1002. smalltalk.addMethod(
  1003. '_visitValueNode_',
  1004. smalltalk.method({
  1005. selector: 'visitValueNode:',
  1006. category: 'visiting',
  1007. fn: function (aNode) {
  1008. var self = this;
  1009. smalltalk.send(self['@stream'], "_nextPutAll_", [smalltalk.send(smalltalk.send(aNode, "_value", []), "_asJavascript", [])]);
  1010. return self;
  1011. },
  1012. source: unescape('visitValueNode%3A%20aNode%0A%09stream%20nextPutAll%3A%20aNode%20value%20asJavascript%0A')}),
  1013. smalltalk.Compiler);
  1014. smalltalk.addMethod(
  1015. '_visitAssignmentNode_',
  1016. smalltalk.method({
  1017. selector: 'visitAssignmentNode:',
  1018. category: 'visiting',
  1019. fn: function (aNode) {
  1020. var self = this;
  1021. smalltalk.send(self, "_visit_", [smalltalk.send(aNode, "_left", [])]);
  1022. smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%3D")]);
  1023. smalltalk.send(self, "_visit_", [smalltalk.send(aNode, "_right", [])]);
  1024. return self;
  1025. },
  1026. 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')}),
  1027. smalltalk.Compiler);
  1028. smalltalk.addMethod(
  1029. '_visitClassReferenceNode_',
  1030. smalltalk.method({
  1031. selector: 'visitClassReferenceNode:',
  1032. category: 'visiting',
  1033. fn: function (aNode) {
  1034. var self = this;
  1035. (function ($rec) {smalltalk.send($rec, "_nextPutAll_", ["smalltalk."]);return smalltalk.send($rec, "_nextPutAll_", [smalltalk.send(aNode, "_value", [])]);}(self['@stream']));
  1036. return self;
  1037. },
  1038. 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')}),
  1039. smalltalk.Compiler);
  1040. smalltalk.addMethod(
  1041. '_visitVariableNode_',
  1042. smalltalk.method({
  1043. selector: 'visitVariableNode:',
  1044. category: 'visiting',
  1045. fn: function (aNode) {
  1046. var self = this;
  1047. smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(self, "_currentClass", []), "_instanceVariableNames", []), "_includes_", [smalltalk.send(aNode, "_value", [])]), "_ifTrue_ifFalse_", [function () {return smalltalk.send(self['@stream'], "_nextPutAll_", [smalltalk.send(smalltalk.send(unescape("self%5B%27@"), "__comma", [smalltalk.send(aNode, "_value", [])]), "__comma", [unescape("%27%5D")])]);}, function () {smalltalk.send(smalltalk.send(smalltalk.send(self, "_knownVariables", []), "_includes_", [smalltalk.send(aNode, "_value", [])]), "_ifFalse_", [function () {return smalltalk.send(self['@unknownVariables'], "_add_", [smalltalk.send(aNode, "_value", [])]);}]);return smalltalk.send(self['@stream'], "_nextPutAll_", [smalltalk.send(aNode, "_value", [])]);}]);
  1048. return self;
  1049. },
  1050. 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')}),
  1051. smalltalk.Compiler);
  1052. smalltalk.addMethod(
  1053. '_visitJSStatementNode_',
  1054. smalltalk.method({
  1055. selector: 'visitJSStatementNode:',
  1056. category: 'visiting',
  1057. fn: function (aNode) {
  1058. var self = this;
  1059. smalltalk.send(self['@stream'], "_nextPutAll_", [smalltalk.send(smalltalk.send(smalltalk.send(aNode, "_source", []), "_value", []), "_replace_with_", [unescape("%27%27"), unescape("%27")])]);
  1060. return self;
  1061. },
  1062. 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')}),
  1063. smalltalk.Compiler);
  1064. smalltalk.addMethod(
  1065. '_parse_',
  1066. smalltalk.method({
  1067. selector: 'parse:',
  1068. category: 'compiling',
  1069. fn: function (aString) {
  1070. var self = this;
  1071. return smalltalk.send(smalltalk.send(self, "_parser", []), "_parse_", [smalltalk.send(aString, "_readStream", [])]);
  1072. return self;
  1073. },
  1074. source: unescape('parse%3A%20aString%0A%20%20%20%20%5Eself%20parser%20parse%3A%20aString%20readStream%0A')}),
  1075. smalltalk.Compiler);
  1076. smalltalk.addMethod(
  1077. '_parseExpression_',
  1078. smalltalk.method({
  1079. selector: 'parseExpression:',
  1080. category: 'compiling',
  1081. fn: function (aString) {
  1082. var self = this;
  1083. return smalltalk.send(self, "_parse_", [smalltalk.send(smalltalk.send(unescape("doIt%20%5E%5B"), "__comma", [aString]), "__comma", [unescape("%5D%20value")])]);
  1084. return self;
  1085. },
  1086. 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')}),
  1087. smalltalk.Compiler);
  1088. smalltalk.addMethod(
  1089. '_unknownVariables',
  1090. smalltalk.method({
  1091. selector: 'unknownVariables',
  1092. category: 'accessing',
  1093. fn: function () {
  1094. var self = this;
  1095. return smalltalk.send(self['@unknownVariables'], "_copy", []);
  1096. return self;
  1097. },
  1098. source: unescape('unknownVariables%0A%09%5EunknownVariables%20copy')}),
  1099. smalltalk.Compiler);
  1100. smalltalk.addMethod(
  1101. '_pseudoVariables',
  1102. smalltalk.method({
  1103. selector: 'pseudoVariables',
  1104. category: 'accessing',
  1105. fn: function () {
  1106. var self = this;
  1107. return ["self", "super", "true", "false", "nil", "thisContext"];
  1108. return self;
  1109. },
  1110. 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')}),
  1111. smalltalk.Compiler);
  1112. smalltalk.addMethod(
  1113. '_tempVariables',
  1114. smalltalk.method({
  1115. selector: 'tempVariables',
  1116. category: 'accessing',
  1117. fn: function () {
  1118. var self = this;
  1119. return smalltalk.send(self['@tempVariables'], "_copy", []);
  1120. return self;
  1121. },
  1122. source: unescape('tempVariables%0A%09%5EtempVariables%20copy')}),
  1123. smalltalk.Compiler);
  1124. smalltalk.addMethod(
  1125. '_knownVariables',
  1126. smalltalk.method({
  1127. selector: 'knownVariables',
  1128. category: 'accessing',
  1129. fn: function () {
  1130. var self = this;
  1131. return function ($rec) {smalltalk.send($rec, "_addAll_", [smalltalk.send(self, "_tempVariables", [])]);return smalltalk.send($rec, "_yourself", []);}(smalltalk.send(self, "_pseudoVariables", []));
  1132. return self;
  1133. },
  1134. source: unescape('knownVariables%0A%09%5Eself%20pseudoVariables%20%0A%09%09addAll%3A%20self%20tempVariables%3B%0A%09%09yourself')}),
  1135. smalltalk.Compiler);
  1136. smalltalk.addMethod(
  1137. '_recompile_',
  1138. smalltalk.method({
  1139. selector: 'recompile:',
  1140. category: 'compiling',
  1141. fn: function (aClass) {
  1142. var self = this;
  1143. smalltalk.send(smalltalk.send(aClass, "_methodDictionary", []), "_do_", [function (each) {var method = nil;method = smalltalk.send(self, "_load_forClass_", [smalltalk.send(each, "_source", []), aClass]);smalltalk.send(method, "_category_", [smalltalk.send(each, "_category", [])]);return smalltalk.send(aClass, "_addCompiledMethod_", [method]);}]);
  1144. smalltalk.send(smalltalk.send(aClass, "_isMetaclass", []), "_ifFalse_", [function () {return smalltalk.send(self, "_recompile_", [smalltalk.send(aClass, "_class", [])]);}]);
  1145. return self;
  1146. },
  1147. 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')}),
  1148. smalltalk.Compiler);
  1149. smalltalk.addMethod(
  1150. '_recompileAll',
  1151. smalltalk.method({
  1152. selector: 'recompileAll',
  1153. category: 'compiling',
  1154. fn: function () {
  1155. var self = this;
  1156. smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.Smalltalk, "_current", []), "_classes", []), "_do_", [function (each) {return smalltalk.send(self, "_recompile_", [each]);}]);
  1157. return self;
  1158. },
  1159. source: unescape('recompileAll%0A%09Smalltalk%20current%20classes%20do%3A%20%5B%3Aeach%20%7C%0A%09%09self%20recompile%3A%20each%5D')}),
  1160. smalltalk.Compiler);
  1161. smalltalk.addClass('DoIt', smalltalk.Object, [], 'Compiler');
  1162. smalltalk.addMethod(
  1163. '_doIt',
  1164. smalltalk.method({
  1165. selector: 'doIt',
  1166. category: '',
  1167. fn: function () {
  1168. var self = this;
  1169. return smalltalk.send(function () {return smalltalk.send(1, "__plus", [1]);}, "_value", []);
  1170. return self;
  1171. },
  1172. source: unescape('doIt%20%5E%5B1+1%5D%20value')}),
  1173. smalltalk.DoIt);