Compiler.js 64 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798991001011021031041051061071081091101111121131141151161171181191201211221231241251261271281291301311321331341351361371381391401411421431441451461471481491501511521531541551561571581591601611621631641651661671681691701711721731741751761771781791801811821831841851861871881891901911921931941951961971981992002012022032042052062072082092102112122132142152162172182192202212222232242252262272282292302312322332342352362372382392402412422432442452462472482492502512522532542552562572582592602612622632642652662672682692702712722732742752762772782792802812822832842852862872882892902912922932942952962972982993003013023033043053063073083093103113123133143153163173183193203213223233243253263273283293303313323333343353363373383393403413423433443453463473483493503513523533543553563573583593603613623633643653663673683693703713723733743753763773783793803813823833843853863873883893903913923933943953963973983994004014024034044054064074084094104114124134144154164174184194204214224234244254264274284294304314324334344354364374384394404414424434444454464474484494504514524534544554564574584594604614624634644654664674684694704714724734744754764774784794804814824834844854864874884894904914924934944954964974984995005015025035045055065075085095105115125135145155165175185195205215225235245255265275285295305315325335345355365375385395405415425435445455465475485495505515525535545555565575585595605615625635645655665675685695705715725735745755765775785795805815825835845855865875885895905915925935945955965975985996006016026036046056066076086096106116126136146156166176186196206216226236246256266276286296306316326336346356366376386396406416426436446456466476486496506516526536546556566576586596606616626636646656666676686696706716726736746756766776786796806816826836846856866876886896906916926936946956966976986997007017027037047057067077087097107117127137147157167177187197207217227237247257267277287297307317327337347357367377387397407417427437447457467477487497507517527537547557567577587597607617627637647657667677687697707717727737747757767777787797807817827837847857867877887897907917927937947957967977987998008018028038048058068078088098108118128138148158168178188198208218228238248258268278288298308318328338348358368378388398408418428438448458468478488498508518528538548558568578588598608618628638648658668678688698708718728738748758768778788798808818828838848858868878888898908918928938948958968978988999009019029039049059069079089099109119129139149159169179189199209219229239249259269279289299309319329339349359369379389399409419429439449459469479489499509519529539549559569579589599609619629639649659669679689699709719729739749759769779789799809819829839849859869879889899909919929939949959969979989991000100110021003100410051006100710081009101010111012101310141015101610171018101910201021102210231024102510261027102810291030103110321033103410351036103710381039104010411042104310441045104610471048104910501051105210531054105510561057105810591060106110621063106410651066106710681069107010711072107310741075107610771078107910801081108210831084108510861087108810891090109110921093109410951096109710981099110011011102110311041105110611071108110911101111111211131114111511161117111811191120112111221123112411251126112711281129113011311132113311341135113611371138113911401141114211431144114511461147114811491150115111521153115411551156115711581159116011611162116311641165116611671168116911701171117211731174117511761177117811791180118111821183118411851186118711881189119011911192119311941195119611971198119912001201120212031204120512061207120812091210121112121213121412151216121712181219122012211222122312241225122612271228122912301231123212331234123512361237123812391240124112421243124412451246124712481249125012511252125312541255125612571258125912601261126212631264126512661267126812691270127112721273127412751276127712781279128012811282128312841285128612871288128912901291129212931294129512961297129812991300130113021303130413051306130713081309131013111312131313141315131613171318131913201321132213231324132513261327132813291330133113321333133413351336133713381339134013411342134313441345134613471348134913501351135213531354135513561357135813591360136113621363136413651366136713681369137013711372137313741375137613771378137913801381138213831384138513861387138813891390139113921393139413951396139713981399140014011402140314041405140614071408140914101411141214131414141514161417141814191420142114221423142414251426142714281429143014311432143314341435143614371438143914401441144214431444144514461447144814491450145114521453145414551456145714581459146014611462146314641465146614671468146914701471147214731474147514761477147814791480148114821483148414851486148714881489149014911492149314941495149614971498149915001501150215031504150515061507150815091510151115121513151415151516151715181519152015211522152315241525152615271528152915301531153215331534153515361537153815391540154115421543154415451546154715481549155015511552155315541555155615571558155915601561156215631564156515661567156815691570157115721573157415751576157715781579158015811582158315841585158615871588158915901591159215931594159515961597159815991600160116021603
  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. source: unescape('nodes%0A%09%5Enodes%20ifNil%3A%20%5Bnodes%20%3A%3D%20Array%20new%5D'),
  12. messageSends: ["ifNil:", "new"],
  13. referencedClasses: [smalltalk.Array]
  14. }),
  15. smalltalk.Node);
  16. smalltalk.addMethod(
  17. '_nodes_',
  18. smalltalk.method({
  19. selector: 'nodes:',
  20. category: 'building',
  21. fn: function (aCollection){
  22. var self=this;
  23. self['@nodes']=aCollection;
  24. return self;},
  25. source: unescape('nodes%3A%20aCollection%0A%09nodes%20%3A%3D%20aCollection'),
  26. messageSends: [],
  27. referencedClasses: []
  28. }),
  29. smalltalk.Node);
  30. smalltalk.addMethod(
  31. '_addNode_',
  32. smalltalk.method({
  33. selector: 'addNode:',
  34. category: 'accessing',
  35. fn: function (aNode){
  36. var self=this;
  37. smalltalk.send(smalltalk.send(self, "_nodes", []), "_add_", [aNode]);
  38. return self;},
  39. source: unescape('addNode%3A%20aNode%0A%09self%20nodes%20add%3A%20aNode'),
  40. messageSends: ["add:", "nodes"],
  41. referencedClasses: []
  42. }),
  43. smalltalk.Node);
  44. smalltalk.addMethod(
  45. '_accept_',
  46. smalltalk.method({
  47. selector: 'accept:',
  48. category: 'visiting',
  49. fn: function (aVisitor){
  50. var self=this;
  51. smalltalk.send(aVisitor, "_visitNode_", [self]);
  52. return self;},
  53. source: unescape('accept%3A%20aVisitor%0A%09aVisitor%20visitNode%3A%20self'),
  54. messageSends: ["visitNode:"],
  55. referencedClasses: []
  56. }),
  57. smalltalk.Node);
  58. smalltalk.setup(smalltalk.Node);
  59. smalltalk.addClass('MethodNode', smalltalk.Node, ['selector', 'arguments', 'source'], 'Compiler');
  60. smalltalk.addMethod(
  61. '_selector',
  62. smalltalk.method({
  63. selector: 'selector',
  64. category: 'accessing',
  65. fn: function (){
  66. var self=this;
  67. return self['@selector'];
  68. return self;},
  69. source: unescape('selector%0A%09%5Eselector'),
  70. messageSends: [],
  71. referencedClasses: []
  72. }),
  73. smalltalk.MethodNode);
  74. smalltalk.addMethod(
  75. '_selector_',
  76. smalltalk.method({
  77. selector: 'selector:',
  78. category: 'accessing',
  79. fn: function (aString){
  80. var self=this;
  81. self['@selector']=aString;
  82. return self;},
  83. source: unescape('selector%3A%20aString%0A%09selector%20%3A%3D%20aString'),
  84. messageSends: [],
  85. referencedClasses: []
  86. }),
  87. smalltalk.MethodNode);
  88. smalltalk.addMethod(
  89. '_arguments',
  90. smalltalk.method({
  91. selector: 'arguments',
  92. category: 'accessing',
  93. fn: function (){
  94. var self=this;
  95. return smalltalk.send(self['@arguments'], "_ifNil_", [(function(){return [];})]);
  96. return self;},
  97. source: unescape('arguments%0A%09%5Earguments%20ifNil%3A%20%5B%23%28%29%5D'),
  98. messageSends: ["ifNil:"],
  99. referencedClasses: []
  100. }),
  101. smalltalk.MethodNode);
  102. smalltalk.addMethod(
  103. '_arguments_',
  104. smalltalk.method({
  105. selector: 'arguments:',
  106. category: 'accessing',
  107. fn: function (aCollection){
  108. var self=this;
  109. self['@arguments']=aCollection;
  110. return self;},
  111. source: unescape('arguments%3A%20aCollection%0A%09arguments%20%3A%3D%20aCollection'),
  112. messageSends: [],
  113. referencedClasses: []
  114. }),
  115. smalltalk.MethodNode);
  116. smalltalk.addMethod(
  117. '_source',
  118. smalltalk.method({
  119. selector: 'source',
  120. category: 'accessing',
  121. fn: function (){
  122. var self=this;
  123. return self['@source'];
  124. return self;},
  125. source: unescape('source%0A%09%5Esource'),
  126. messageSends: [],
  127. referencedClasses: []
  128. }),
  129. smalltalk.MethodNode);
  130. smalltalk.addMethod(
  131. '_source_',
  132. smalltalk.method({
  133. selector: 'source:',
  134. category: 'accessing',
  135. fn: function (aString){
  136. var self=this;
  137. self['@source']=aString;
  138. return self;},
  139. source: unescape('source%3A%20aString%0A%09source%20%3A%3D%20aString'),
  140. messageSends: [],
  141. referencedClasses: []
  142. }),
  143. smalltalk.MethodNode);
  144. smalltalk.addMethod(
  145. '_accept_',
  146. smalltalk.method({
  147. selector: 'accept:',
  148. category: 'visiting',
  149. fn: function (aVisitor){
  150. var self=this;
  151. smalltalk.send(aVisitor, "_visitMethodNode_", [self]);
  152. return self;},
  153. source: unescape('accept%3A%20aVisitor%0A%09aVisitor%20visitMethodNode%3A%20self'),
  154. messageSends: ["visitMethodNode:"],
  155. referencedClasses: []
  156. }),
  157. smalltalk.MethodNode);
  158. smalltalk.setup(smalltalk.MethodNode);
  159. smalltalk.addClass('SendNode', smalltalk.Node, ['selector', 'arguments', 'receiver'], 'Compiler');
  160. smalltalk.addMethod(
  161. '_selector',
  162. smalltalk.method({
  163. selector: 'selector',
  164. category: 'accessing',
  165. fn: function (){
  166. var self=this;
  167. return self['@selector'];
  168. return self;},
  169. source: unescape('selector%0A%09%5Eselector'),
  170. messageSends: [],
  171. referencedClasses: []
  172. }),
  173. smalltalk.SendNode);
  174. smalltalk.addMethod(
  175. '_selector_',
  176. smalltalk.method({
  177. selector: 'selector:',
  178. category: 'accessing',
  179. fn: function (aString){
  180. var self=this;
  181. self['@selector']=aString;
  182. return self;},
  183. source: unescape('selector%3A%20aString%0A%09selector%20%3A%3D%20aString'),
  184. messageSends: [],
  185. referencedClasses: []
  186. }),
  187. smalltalk.SendNode);
  188. smalltalk.addMethod(
  189. '_arguments',
  190. smalltalk.method({
  191. selector: 'arguments',
  192. category: 'accessing',
  193. fn: function (){
  194. var self=this;
  195. return smalltalk.send(self['@arguments'], "_ifNil_", [(function(){return self['@arguments']=[];})]);
  196. return self;},
  197. source: unescape('arguments%0A%09%5Earguments%20ifNil%3A%20%5Barguments%20%3A%3D%20%23%28%29%5D'),
  198. messageSends: ["ifNil:"],
  199. referencedClasses: []
  200. }),
  201. smalltalk.SendNode);
  202. smalltalk.addMethod(
  203. '_arguments_',
  204. smalltalk.method({
  205. selector: 'arguments:',
  206. category: 'accessing',
  207. fn: function (aCollection){
  208. var self=this;
  209. self['@arguments']=aCollection;
  210. return self;},
  211. source: unescape('arguments%3A%20aCollection%0A%09arguments%20%3A%3D%20aCollection'),
  212. messageSends: [],
  213. referencedClasses: []
  214. }),
  215. smalltalk.SendNode);
  216. smalltalk.addMethod(
  217. '_receiver',
  218. smalltalk.method({
  219. selector: 'receiver',
  220. category: 'accessing',
  221. fn: function (){
  222. var self=this;
  223. return self['@receiver'];
  224. return self;},
  225. source: unescape('receiver%0A%09%5Ereceiver'),
  226. messageSends: [],
  227. referencedClasses: []
  228. }),
  229. smalltalk.SendNode);
  230. smalltalk.addMethod(
  231. '_receiver_',
  232. smalltalk.method({
  233. selector: 'receiver:',
  234. category: 'accessing',
  235. fn: function (aNode){
  236. var self=this;
  237. self['@receiver']=aNode;
  238. return self;},
  239. source: unescape('receiver%3A%20aNode%0A%09receiver%20%3A%3D%20aNode'),
  240. messageSends: [],
  241. referencedClasses: []
  242. }),
  243. smalltalk.SendNode);
  244. smalltalk.addMethod(
  245. '_valueForReceiver_',
  246. smalltalk.method({
  247. selector: 'valueForReceiver:',
  248. category: 'accessing',
  249. fn: function (anObject){
  250. var self=this;
  251. 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", []));
  252. return self;},
  253. 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'),
  254. messageSends: ["receiver:", "ifNil:ifNotNil:", "receiver", "valueForReceiver:", "selector:", "selector", "arguments:", "arguments", "yourself", "new"],
  255. referencedClasses: [smalltalk.SendNode]
  256. }),
  257. smalltalk.SendNode);
  258. smalltalk.addMethod(
  259. '_cascadeNodeWithMessages_',
  260. smalltalk.method({
  261. selector: 'cascadeNodeWithMessages:',
  262. category: 'accessing',
  263. fn: function (aCollection){
  264. var self=this;
  265. var first=nil;
  266. 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", []));
  267. 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", []));
  268. return self;},
  269. 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'),
  270. messageSends: ["selector:", "selector", "arguments:", "arguments", "yourself", "new", "receiver:", "receiver", "nodes:", unescape("%2C"), "with:"],
  271. referencedClasses: [smalltalk.SendNode,smalltalk.Array,smalltalk.nil]
  272. }),
  273. smalltalk.SendNode);
  274. smalltalk.addMethod(
  275. '_accept_',
  276. smalltalk.method({
  277. selector: 'accept:',
  278. category: 'visiting',
  279. fn: function (aVisitor){
  280. var self=this;
  281. smalltalk.send(aVisitor, "_visitSendNode_", [self]);
  282. return self;},
  283. source: unescape('accept%3A%20aVisitor%0A%09aVisitor%20visitSendNode%3A%20self'),
  284. messageSends: ["visitSendNode:"],
  285. referencedClasses: []
  286. }),
  287. smalltalk.SendNode);
  288. smalltalk.setup(smalltalk.SendNode);
  289. smalltalk.addClass('CascadeNode', smalltalk.Node, ['receiver'], 'Compiler');
  290. smalltalk.addMethod(
  291. '_receiver',
  292. smalltalk.method({
  293. selector: 'receiver',
  294. category: 'accessing',
  295. fn: function (){
  296. var self=this;
  297. return self['@receiver'];
  298. return self;},
  299. source: unescape('receiver%0A%09%5Ereceiver'),
  300. messageSends: [],
  301. referencedClasses: []
  302. }),
  303. smalltalk.CascadeNode);
  304. smalltalk.addMethod(
  305. '_receiver_',
  306. smalltalk.method({
  307. selector: 'receiver:',
  308. category: 'accessing',
  309. fn: function (aNode){
  310. var self=this;
  311. self['@receiver']=aNode;
  312. return self;},
  313. source: unescape('receiver%3A%20aNode%0A%09receiver%20%3A%3D%20aNode'),
  314. messageSends: [],
  315. referencedClasses: []
  316. }),
  317. smalltalk.CascadeNode);
  318. smalltalk.addMethod(
  319. '_accept_',
  320. smalltalk.method({
  321. selector: 'accept:',
  322. category: 'visiting',
  323. fn: function (aVisitor){
  324. var self=this;
  325. smalltalk.send(aVisitor, "_visitCascadeNode_", [self]);
  326. return self;},
  327. source: unescape('accept%3A%20aVisitor%0A%09aVisitor%20visitCascadeNode%3A%20self'),
  328. messageSends: ["visitCascadeNode:"],
  329. referencedClasses: []
  330. }),
  331. smalltalk.CascadeNode);
  332. smalltalk.setup(smalltalk.CascadeNode);
  333. smalltalk.addClass('AssignmentNode', smalltalk.Node, ['left', 'right'], 'Compiler');
  334. smalltalk.addMethod(
  335. '_left',
  336. smalltalk.method({
  337. selector: 'left',
  338. category: 'accessing',
  339. fn: function (){
  340. var self=this;
  341. return self['@left'];
  342. return self;},
  343. source: unescape('left%0A%09%5Eleft'),
  344. messageSends: [],
  345. referencedClasses: []
  346. }),
  347. smalltalk.AssignmentNode);
  348. smalltalk.addMethod(
  349. '_left_',
  350. smalltalk.method({
  351. selector: 'left:',
  352. category: 'accessing',
  353. fn: function (aNode){
  354. var self=this;
  355. self['@left']=aNode;
  356. return self;},
  357. source: unescape('left%3A%20aNode%0A%09left%20%3A%3D%20aNode'),
  358. messageSends: [],
  359. referencedClasses: []
  360. }),
  361. smalltalk.AssignmentNode);
  362. smalltalk.addMethod(
  363. '_right',
  364. smalltalk.method({
  365. selector: 'right',
  366. category: 'accessing',
  367. fn: function (){
  368. var self=this;
  369. return self['@right'];
  370. return self;},
  371. source: unescape('right%0A%09%5Eright'),
  372. messageSends: [],
  373. referencedClasses: []
  374. }),
  375. smalltalk.AssignmentNode);
  376. smalltalk.addMethod(
  377. '_right_',
  378. smalltalk.method({
  379. selector: 'right:',
  380. category: 'accessing',
  381. fn: function (aNode){
  382. var self=this;
  383. self['@right']=aNode;
  384. return self;},
  385. source: unescape('right%3A%20aNode%0A%09right%20%3A%3D%20aNode'),
  386. messageSends: [],
  387. referencedClasses: []
  388. }),
  389. smalltalk.AssignmentNode);
  390. smalltalk.addMethod(
  391. '_accept_',
  392. smalltalk.method({
  393. selector: 'accept:',
  394. category: 'visiting',
  395. fn: function (aVisitor){
  396. var self=this;
  397. smalltalk.send(aVisitor, "_visitAssignmentNode_", [self]);
  398. return self;},
  399. source: unescape('accept%3A%20aVisitor%0A%09aVisitor%20visitAssignmentNode%3A%20self'),
  400. messageSends: ["visitAssignmentNode:"],
  401. referencedClasses: []
  402. }),
  403. smalltalk.AssignmentNode);
  404. smalltalk.setup(smalltalk.AssignmentNode);
  405. smalltalk.addClass('BlockNode', smalltalk.Node, ['parameters'], 'Compiler');
  406. smalltalk.addMethod(
  407. '_parameters',
  408. smalltalk.method({
  409. selector: 'parameters',
  410. category: 'accessing',
  411. fn: function (){
  412. var self=this;
  413. return smalltalk.send(self['@parameters'], "_ifNil_", [(function(){return self['@parameters']=smalltalk.send(smalltalk.Array, "_new", []);})]);
  414. return self;},
  415. source: unescape('parameters%0A%09%5Eparameters%20ifNil%3A%20%5Bparameters%20%3A%3D%20Array%20new%5D'),
  416. messageSends: ["ifNil:", "new"],
  417. referencedClasses: [smalltalk.Array]
  418. }),
  419. smalltalk.BlockNode);
  420. smalltalk.addMethod(
  421. '_parameters_',
  422. smalltalk.method({
  423. selector: 'parameters:',
  424. category: 'accessing',
  425. fn: function (aCollection){
  426. var self=this;
  427. self['@parameters']=aCollection;
  428. return self;},
  429. source: unescape('parameters%3A%20aCollection%0A%09parameters%20%3A%3D%20aCollection'),
  430. messageSends: [],
  431. referencedClasses: []
  432. }),
  433. smalltalk.BlockNode);
  434. smalltalk.addMethod(
  435. '_accept_',
  436. smalltalk.method({
  437. selector: 'accept:',
  438. category: 'visiting',
  439. fn: function (aVisitor){
  440. var self=this;
  441. smalltalk.send(aVisitor, "_visitBlockNode_", [self]);
  442. return self;},
  443. source: unescape('accept%3A%20aVisitor%0A%09aVisitor%20visitBlockNode%3A%20self'),
  444. messageSends: ["visitBlockNode:"],
  445. referencedClasses: []
  446. }),
  447. smalltalk.BlockNode);
  448. smalltalk.setup(smalltalk.BlockNode);
  449. smalltalk.addClass('SequenceNode', smalltalk.Node, ['temps'], 'Compiler');
  450. smalltalk.addMethod(
  451. '_temps',
  452. smalltalk.method({
  453. selector: 'temps',
  454. category: 'accessing',
  455. fn: function (){
  456. var self=this;
  457. return smalltalk.send(self['@temps'], "_ifNil_", [(function(){return [];})]);
  458. return self;},
  459. source: unescape('temps%0A%09%5Etemps%20ifNil%3A%20%5B%23%28%29%5D'),
  460. messageSends: ["ifNil:"],
  461. referencedClasses: []
  462. }),
  463. smalltalk.SequenceNode);
  464. smalltalk.addMethod(
  465. '_temps_',
  466. smalltalk.method({
  467. selector: 'temps:',
  468. category: 'accessing',
  469. fn: function (aCollection){
  470. var self=this;
  471. self['@temps']=aCollection;
  472. return self;},
  473. source: unescape('temps%3A%20aCollection%0A%09temps%20%3A%3D%20aCollection'),
  474. messageSends: [],
  475. referencedClasses: []
  476. }),
  477. smalltalk.SequenceNode);
  478. smalltalk.addMethod(
  479. '_asBlockSequenceNode',
  480. smalltalk.method({
  481. selector: 'asBlockSequenceNode',
  482. category: 'testing',
  483. fn: function (){
  484. var self=this;
  485. 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", []));
  486. return self;},
  487. 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'),
  488. messageSends: ["nodes:", "nodes", "temps:", "temps", "yourself", "new"],
  489. referencedClasses: [smalltalk.nil]
  490. }),
  491. smalltalk.SequenceNode);
  492. smalltalk.addMethod(
  493. '_accept_',
  494. smalltalk.method({
  495. selector: 'accept:',
  496. category: 'visiting',
  497. fn: function (aVisitor){
  498. var self=this;
  499. smalltalk.send(aVisitor, "_visitSequenceNode_", [self]);
  500. return self;},
  501. source: unescape('accept%3A%20aVisitor%0A%09aVisitor%20visitSequenceNode%3A%20self'),
  502. messageSends: ["visitSequenceNode:"],
  503. referencedClasses: []
  504. }),
  505. smalltalk.SequenceNode);
  506. smalltalk.setup(smalltalk.SequenceNode);
  507. smalltalk.addClass('BlockSequenceNode', smalltalk.SequenceNode, [], 'Compiler');
  508. smalltalk.addMethod(
  509. '_accept_',
  510. smalltalk.method({
  511. selector: 'accept:',
  512. category: 'visiting',
  513. fn: function (aVisitor){
  514. var self=this;
  515. smalltalk.send(aVisitor, "_visitBlockSequenceNode_", [self]);
  516. return self;},
  517. source: unescape('accept%3A%20aVisitor%0A%09aVisitor%20visitBlockSequenceNode%3A%20self'),
  518. messageSends: ["visitBlockSequenceNode:"],
  519. referencedClasses: []
  520. }),
  521. smalltalk.BlockSequenceNode);
  522. smalltalk.setup(smalltalk.BlockSequenceNode);
  523. smalltalk.addClass('ReturnNode', smalltalk.Node, [], 'Compiler');
  524. smalltalk.addMethod(
  525. '_accept_',
  526. smalltalk.method({
  527. selector: 'accept:',
  528. category: 'visiting',
  529. fn: function (aVisitor){
  530. var self=this;
  531. smalltalk.send(aVisitor, "_visitReturnNode_", [self]);
  532. return self;},
  533. source: unescape('accept%3A%20aVisitor%0A%09aVisitor%20visitReturnNode%3A%20self'),
  534. messageSends: ["visitReturnNode:"],
  535. referencedClasses: []
  536. }),
  537. smalltalk.ReturnNode);
  538. smalltalk.setup(smalltalk.ReturnNode);
  539. smalltalk.addClass('ValueNode', smalltalk.Node, ['value'], 'Compiler');
  540. smalltalk.addMethod(
  541. '_value',
  542. smalltalk.method({
  543. selector: 'value',
  544. category: 'accessing',
  545. fn: function (){
  546. var self=this;
  547. return self['@value'];
  548. return self;},
  549. source: unescape('value%0A%09%5Evalue'),
  550. messageSends: [],
  551. referencedClasses: []
  552. }),
  553. smalltalk.ValueNode);
  554. smalltalk.addMethod(
  555. '_value_',
  556. smalltalk.method({
  557. selector: 'value:',
  558. category: 'accessing',
  559. fn: function (anObject){
  560. var self=this;
  561. self['@value']=anObject;
  562. return self;},
  563. source: unescape('value%3A%20anObject%0A%09value%20%3A%3D%20anObject'),
  564. messageSends: [],
  565. referencedClasses: []
  566. }),
  567. smalltalk.ValueNode);
  568. smalltalk.addMethod(
  569. '_accept_',
  570. smalltalk.method({
  571. selector: 'accept:',
  572. category: 'visiting',
  573. fn: function (aVisitor){
  574. var self=this;
  575. smalltalk.send(aVisitor, "_visitValueNode_", [self]);
  576. return self;},
  577. source: unescape('accept%3A%20aVisitor%0A%09aVisitor%20visitValueNode%3A%20self'),
  578. messageSends: ["visitValueNode:"],
  579. referencedClasses: []
  580. }),
  581. smalltalk.ValueNode);
  582. smalltalk.setup(smalltalk.ValueNode);
  583. smalltalk.addClass('VariableNode', smalltalk.ValueNode, [], 'Compiler');
  584. smalltalk.addMethod(
  585. '_accept_',
  586. smalltalk.method({
  587. selector: 'accept:',
  588. category: 'visiting',
  589. fn: function (aVisitor){
  590. var self=this;
  591. smalltalk.send(aVisitor, "_visitVariableNode_", [self]);
  592. return self;},
  593. source: unescape('accept%3A%20aVisitor%0A%09aVisitor%20visitVariableNode%3A%20self'),
  594. messageSends: ["visitVariableNode:"],
  595. referencedClasses: []
  596. }),
  597. smalltalk.VariableNode);
  598. smalltalk.setup(smalltalk.VariableNode);
  599. smalltalk.addClass('ClassReferenceNode', smalltalk.VariableNode, [], 'Compiler');
  600. smalltalk.addMethod(
  601. '_accept_',
  602. smalltalk.method({
  603. selector: 'accept:',
  604. category: 'visiting',
  605. fn: function (aVisitor){
  606. var self=this;
  607. smalltalk.send(aVisitor, "_visitClassReferenceNode_", [self]);
  608. return self;},
  609. source: unescape('accept%3A%20aVisitor%0A%09aVisitor%20visitClassReferenceNode%3A%20self'),
  610. messageSends: ["visitClassReferenceNode:"],
  611. referencedClasses: []
  612. }),
  613. smalltalk.ClassReferenceNode);
  614. smalltalk.setup(smalltalk.ClassReferenceNode);
  615. smalltalk.addClass('JSStatementNode', smalltalk.Node, ['source'], 'Compiler');
  616. smalltalk.addMethod(
  617. '_source',
  618. smalltalk.method({
  619. selector: 'source',
  620. category: 'accessing',
  621. fn: function (){
  622. var self=this;
  623. return smalltalk.send(self['@source'], "_ifNil_", [(function(){return "";})]);
  624. return self;},
  625. source: unescape('source%0A%09%5Esource%20ifNil%3A%20%5B%27%27%5D'),
  626. messageSends: ["ifNil:"],
  627. referencedClasses: []
  628. }),
  629. smalltalk.JSStatementNode);
  630. smalltalk.addMethod(
  631. '_source_',
  632. smalltalk.method({
  633. selector: 'source:',
  634. category: 'accessing',
  635. fn: function (aString){
  636. var self=this;
  637. self['@source']=aString;
  638. return self;},
  639. source: unescape('source%3A%20aString%0A%09source%20%3A%3D%20aString'),
  640. messageSends: [],
  641. referencedClasses: []
  642. }),
  643. smalltalk.JSStatementNode);
  644. smalltalk.addMethod(
  645. '_accept_',
  646. smalltalk.method({
  647. selector: 'accept:',
  648. category: 'visiting',
  649. fn: function (aVisitor){
  650. var self=this;
  651. smalltalk.send(aVisitor, "_visitJSStatementNode_", [self]);
  652. return self;},
  653. source: unescape('accept%3A%20aVisitor%0A%09aVisitor%20visitJSStatementNode%3A%20self'),
  654. messageSends: ["visitJSStatementNode:"],
  655. referencedClasses: []
  656. }),
  657. smalltalk.JSStatementNode);
  658. smalltalk.setup(smalltalk.JSStatementNode);
  659. smalltalk.addClass('NodeVisitor', smalltalk.Object, [], 'Compiler');
  660. smalltalk.addMethod(
  661. '_visit_',
  662. smalltalk.method({
  663. selector: 'visit:',
  664. category: 'visiting',
  665. fn: function (aNode){
  666. var self=this;
  667. smalltalk.send(aNode, "_accept_", [self]);
  668. return self;},
  669. source: unescape('visit%3A%20aNode%0A%09aNode%20accept%3A%20self'),
  670. messageSends: ["accept:"],
  671. referencedClasses: []
  672. }),
  673. smalltalk.NodeVisitor);
  674. smalltalk.addMethod(
  675. '_visitNode_',
  676. smalltalk.method({
  677. selector: 'visitNode:',
  678. category: 'visiting',
  679. fn: function (aNode){
  680. var self=this;
  681. return self;},
  682. source: unescape('visitNode%3A%20aNode'),
  683. messageSends: [],
  684. referencedClasses: []
  685. }),
  686. smalltalk.NodeVisitor);
  687. smalltalk.addMethod(
  688. '_visitMethodNode_',
  689. smalltalk.method({
  690. selector: 'visitMethodNode:',
  691. category: 'visiting',
  692. fn: function (aNode){
  693. var self=this;
  694. smalltalk.send(self, "_visitNode_", [aNode]);
  695. return self;},
  696. source: unescape('visitMethodNode%3A%20aNode%0A%09self%20visitNode%3A%20aNode'),
  697. messageSends: ["visitNode:"],
  698. referencedClasses: []
  699. }),
  700. smalltalk.NodeVisitor);
  701. smalltalk.addMethod(
  702. '_visitSequenceNode_',
  703. smalltalk.method({
  704. selector: 'visitSequenceNode:',
  705. category: 'visiting',
  706. fn: function (aNode){
  707. var self=this;
  708. smalltalk.send(self, "_visitNode_", [aNode]);
  709. return self;},
  710. source: unescape('visitSequenceNode%3A%20aNode%0A%09self%20visitNode%3A%20aNode'),
  711. messageSends: ["visitNode:"],
  712. referencedClasses: []
  713. }),
  714. smalltalk.NodeVisitor);
  715. smalltalk.addMethod(
  716. '_visitBlockSequenceNode_',
  717. smalltalk.method({
  718. selector: 'visitBlockSequenceNode:',
  719. category: 'visiting',
  720. fn: function (aNode){
  721. var self=this;
  722. smalltalk.send(self, "_visitSequenceNode_", [aNode]);
  723. return self;},
  724. source: unescape('visitBlockSequenceNode%3A%20aNode%0A%09self%20visitSequenceNode%3A%20aNode'),
  725. messageSends: ["visitSequenceNode:"],
  726. referencedClasses: []
  727. }),
  728. smalltalk.NodeVisitor);
  729. smalltalk.addMethod(
  730. '_visitBlockNode_',
  731. smalltalk.method({
  732. selector: 'visitBlockNode:',
  733. category: 'visiting',
  734. fn: function (aNode){
  735. var self=this;
  736. smalltalk.send(self, "_visitNode_", [aNode]);
  737. return self;},
  738. source: unescape('visitBlockNode%3A%20aNode%0A%09self%20visitNode%3A%20aNode'),
  739. messageSends: ["visitNode:"],
  740. referencedClasses: []
  741. }),
  742. smalltalk.NodeVisitor);
  743. smalltalk.addMethod(
  744. '_visitReturnNode_',
  745. smalltalk.method({
  746. selector: 'visitReturnNode:',
  747. category: 'visiting',
  748. fn: function (aNode){
  749. var self=this;
  750. smalltalk.send(self, "_visitNode_", [aNode]);
  751. return self;},
  752. source: unescape('visitReturnNode%3A%20aNode%0A%09self%20visitNode%3A%20aNode'),
  753. messageSends: ["visitNode:"],
  754. referencedClasses: []
  755. }),
  756. smalltalk.NodeVisitor);
  757. smalltalk.addMethod(
  758. '_visitSendNode_',
  759. smalltalk.method({
  760. selector: 'visitSendNode:',
  761. category: 'visiting',
  762. fn: function (aNode){
  763. var self=this;
  764. smalltalk.send(self, "_visitNode_", [aNode]);
  765. return self;},
  766. source: unescape('visitSendNode%3A%20aNode%0A%09self%20visitNode%3A%20aNode'),
  767. messageSends: ["visitNode:"],
  768. referencedClasses: []
  769. }),
  770. smalltalk.NodeVisitor);
  771. smalltalk.addMethod(
  772. '_visitCascadeNode_',
  773. smalltalk.method({
  774. selector: 'visitCascadeNode:',
  775. category: 'visiting',
  776. fn: function (aNode){
  777. var self=this;
  778. smalltalk.send(self, "_visitNode_", [aNode]);
  779. return self;},
  780. source: unescape('visitCascadeNode%3A%20aNode%0A%09self%20visitNode%3A%20aNode'),
  781. messageSends: ["visitNode:"],
  782. referencedClasses: []
  783. }),
  784. smalltalk.NodeVisitor);
  785. smalltalk.addMethod(
  786. '_visitValueNode_',
  787. smalltalk.method({
  788. selector: 'visitValueNode:',
  789. category: 'visiting',
  790. fn: function (aNode){
  791. var self=this;
  792. smalltalk.send(self, "_visitNode_", [aNode]);
  793. return self;},
  794. source: unescape('visitValueNode%3A%20aNode%0A%09self%20visitNode%3A%20aNode'),
  795. messageSends: ["visitNode:"],
  796. referencedClasses: []
  797. }),
  798. smalltalk.NodeVisitor);
  799. smalltalk.addMethod(
  800. '_visitVariableNode_',
  801. smalltalk.method({
  802. selector: 'visitVariableNode:',
  803. category: 'visiting',
  804. fn: function (aNode){
  805. var self=this;
  806. return self;},
  807. source: unescape('visitVariableNode%3A%20aNode'),
  808. messageSends: [],
  809. referencedClasses: []
  810. }),
  811. smalltalk.NodeVisitor);
  812. smalltalk.addMethod(
  813. '_visitAssignmentNode_',
  814. smalltalk.method({
  815. selector: 'visitAssignmentNode:',
  816. category: 'visiting',
  817. fn: function (aNode){
  818. var self=this;
  819. smalltalk.send(self, "_visitNode_", [aNode]);
  820. return self;},
  821. source: unescape('visitAssignmentNode%3A%20aNode%0A%09self%20visitNode%3A%20aNode'),
  822. messageSends: ["visitNode:"],
  823. referencedClasses: []
  824. }),
  825. smalltalk.NodeVisitor);
  826. smalltalk.addMethod(
  827. '_visitClassReferenceNode_',
  828. smalltalk.method({
  829. selector: 'visitClassReferenceNode:',
  830. category: 'visiting',
  831. fn: function (aNode){
  832. var self=this;
  833. (function($rec){smalltalk.send($rec, "_nextPutAll_", ["smalltalk."]);return smalltalk.send($rec, "_nextPutAll_", [smalltalk.send(aNode, "_value", [])]);})(self);
  834. return self;},
  835. 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'),
  836. messageSends: ["nextPutAll:", "value"],
  837. referencedClasses: []
  838. }),
  839. smalltalk.NodeVisitor);
  840. smalltalk.addMethod(
  841. '_visitJSStatementNode_',
  842. smalltalk.method({
  843. selector: 'visitJSStatementNode:',
  844. category: 'visiting',
  845. fn: function (aNode){
  846. var self=this;
  847. (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);
  848. return self;},
  849. 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'),
  850. messageSends: ["nextPutAll:", "source"],
  851. referencedClasses: []
  852. }),
  853. smalltalk.NodeVisitor);
  854. smalltalk.setup(smalltalk.NodeVisitor);
  855. smalltalk.addClass('Compiler', smalltalk.NodeVisitor, ['stream', 'nestedBlocks', 'earlyReturn', 'currentClass', 'currentSelector', 'unknownVariables', 'tempVariables', 'messageSends', 'referencedClasses'], 'Compiler');
  856. smalltalk.addMethod(
  857. '_initialize',
  858. smalltalk.method({
  859. selector: 'initialize',
  860. category: 'initialization',
  861. fn: function (){
  862. var self=this;
  863. smalltalk.send(self, "_initialize", [], smalltalk.NodeVisitor);
  864. self['@stream']=smalltalk.send("", "_writeStream", []);
  865. self['@unknownVariables']=[];
  866. self['@tempVariables']=[];
  867. self['@messageSends']=[];
  868. classReferenced=[];
  869. return self;},
  870. 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%09messageSends%20%3A%3D%20%23%28%29.%0A%09classReferenced%20%3A%3D%20%23%28%29'),
  871. messageSends: ["initialize", "writeStream"],
  872. referencedClasses: []
  873. }),
  874. smalltalk.Compiler);
  875. smalltalk.addMethod(
  876. '_parser',
  877. smalltalk.method({
  878. selector: 'parser',
  879. category: 'accessing',
  880. fn: function (){
  881. var self=this;
  882. return smalltalk.send(smalltalk.SmalltalkParser, "_new", []);
  883. return self;},
  884. source: unescape('parser%0A%09%5ESmalltalkParser%20new'),
  885. messageSends: ["new"],
  886. referencedClasses: [smalltalk.SmalltalkParser]
  887. }),
  888. smalltalk.Compiler);
  889. smalltalk.addMethod(
  890. '_currentClass',
  891. smalltalk.method({
  892. selector: 'currentClass',
  893. category: 'accessing',
  894. fn: function (){
  895. var self=this;
  896. return self['@currentClass'];
  897. return self;},
  898. source: unescape('currentClass%0A%09%5EcurrentClass'),
  899. messageSends: [],
  900. referencedClasses: []
  901. }),
  902. smalltalk.Compiler);
  903. smalltalk.addMethod(
  904. '_currentClass_',
  905. smalltalk.method({
  906. selector: 'currentClass:',
  907. category: 'accessing',
  908. fn: function (aClass){
  909. var self=this;
  910. self['@currentClass']=aClass;
  911. return self;},
  912. source: unescape('currentClass%3A%20aClass%0A%09currentClass%20%3A%3D%20aClass'),
  913. messageSends: [],
  914. referencedClasses: []
  915. }),
  916. smalltalk.Compiler);
  917. smalltalk.addMethod(
  918. '_loadExpression_',
  919. smalltalk.method({
  920. selector: 'loadExpression:',
  921. category: 'compiling',
  922. fn: function (aString){
  923. var self=this;
  924. smalltalk.send(smalltalk.DoIt, "_addCompiledMethod_", [smalltalk.send(self, "_eval_", [smalltalk.send(self, "_compileExpression_", [aString])])]);
  925. return smalltalk.send(smalltalk.send(smalltalk.DoIt, "_new", []), "_doIt", []);
  926. return self;},
  927. 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'),
  928. messageSends: ["addCompiledMethod:", "eval:", "compileExpression:", "doIt", "new"],
  929. referencedClasses: [smalltalk.nil]
  930. }),
  931. smalltalk.Compiler);
  932. smalltalk.addMethod(
  933. '_load_forClass_',
  934. smalltalk.method({
  935. selector: 'load:forClass:',
  936. category: 'compiling',
  937. fn: function (aString, aClass){
  938. var self=this;
  939. var compiled=nil;
  940. compiled=smalltalk.send(self, "_eval_", [smalltalk.send(self, "_compile_forClass_", [aString, aClass])]);
  941. smalltalk.send(self, "_setupClass_", [aClass]);
  942. return compiled;
  943. return self;},
  944. source: unescape('load%3A%20aString%20forClass%3A%20aClass%0A%09%7C%20compiled%20%7C%0A%09compiled%20%3A%3D%20self%20eval%3A%20%28self%20compile%3A%20aString%20forClass%3A%20aClass%29.%0A%09self%20setupClass%3A%20aClass.%0A%09%5Ecompiled'),
  945. messageSends: ["eval:", "compile:forClass:", "setupClass:"],
  946. referencedClasses: []
  947. }),
  948. smalltalk.Compiler);
  949. smalltalk.addMethod(
  950. '_compile_forClass_',
  951. smalltalk.method({
  952. selector: 'compile:forClass:',
  953. category: 'compiling',
  954. fn: function (aString, aClass){
  955. var self=this;
  956. smalltalk.send(self, "_currentClass_", [aClass]);
  957. return smalltalk.send(self, "_compile_", [aString]);
  958. return self;},
  959. source: unescape('compile%3A%20aString%20forClass%3A%20aClass%0A%09self%20currentClass%3A%20aClass.%0A%09%5Eself%20compile%3A%20aString'),
  960. messageSends: ["currentClass:", "compile:"],
  961. referencedClasses: []
  962. }),
  963. smalltalk.Compiler);
  964. smalltalk.addMethod(
  965. '_compileExpression_',
  966. smalltalk.method({
  967. selector: 'compileExpression:',
  968. category: 'compiling',
  969. fn: function (aString){
  970. var self=this;
  971. smalltalk.send(self, "_currentClass_", [smalltalk.DoIt]);
  972. return smalltalk.send(self, "_compileNode_", [smalltalk.send(self, "_parseExpression_", [aString])]);
  973. return self;},
  974. source: unescape('compileExpression%3A%20aString%0A%09self%20currentClass%3A%20DoIt.%0A%09%5Eself%20compileNode%3A%20%28self%20parseExpression%3A%20aString%29'),
  975. messageSends: ["currentClass:", "compileNode:", "parseExpression:"],
  976. referencedClasses: [smalltalk.nil]
  977. }),
  978. smalltalk.Compiler);
  979. smalltalk.addMethod(
  980. '_eval_',
  981. smalltalk.method({
  982. selector: 'eval:',
  983. category: 'compiling',
  984. fn: function (aString){
  985. var self=this;
  986. return eval(aString);
  987. return self;},
  988. source: unescape('eval%3A%20aString%0A%09%3Creturn%20eval%28aString%29%3E'),
  989. messageSends: [],
  990. referencedClasses: []
  991. }),
  992. smalltalk.Compiler);
  993. smalltalk.addMethod(
  994. '_compile_',
  995. smalltalk.method({
  996. selector: 'compile:',
  997. category: 'compiling',
  998. fn: function (aString){
  999. var self=this;
  1000. return smalltalk.send(self, "_compileNode_", [smalltalk.send(self, "_parse_", [aString])]);
  1001. return self;},
  1002. source: unescape('compile%3A%20aString%0A%09%5Eself%20compileNode%3A%20%28self%20parse%3A%20aString%29'),
  1003. messageSends: ["compileNode:", "parse:"],
  1004. referencedClasses: []
  1005. }),
  1006. smalltalk.Compiler);
  1007. smalltalk.addMethod(
  1008. '_compileNode_',
  1009. smalltalk.method({
  1010. selector: 'compileNode:',
  1011. category: 'compiling',
  1012. fn: function (aNode){
  1013. var self=this;
  1014. self['@stream']=smalltalk.send("", "_writeStream", []);
  1015. smalltalk.send(self, "_visit_", [aNode]);
  1016. return smalltalk.send(self['@stream'], "_contents", []);
  1017. return self;},
  1018. source: unescape('compileNode%3A%20aNode%0A%09stream%20%3A%3D%20%27%27%20writeStream.%0A%09self%20visit%3A%20aNode.%0A%09%5Estream%20contents'),
  1019. messageSends: ["writeStream", "visit:", "contents"],
  1020. referencedClasses: []
  1021. }),
  1022. smalltalk.Compiler);
  1023. smalltalk.addMethod(
  1024. '_visit_',
  1025. smalltalk.method({
  1026. selector: 'visit:',
  1027. category: 'visiting',
  1028. fn: function (aNode){
  1029. var self=this;
  1030. smalltalk.send(aNode, "_accept_", [self]);
  1031. return self;},
  1032. source: unescape('visit%3A%20aNode%0A%09aNode%20accept%3A%20self'),
  1033. messageSends: ["accept:"],
  1034. referencedClasses: []
  1035. }),
  1036. smalltalk.Compiler);
  1037. smalltalk.addMethod(
  1038. '_visitMethodNode_',
  1039. smalltalk.method({
  1040. selector: 'visitMethodNode:',
  1041. category: 'visiting',
  1042. fn: function (aNode){
  1043. var self=this;
  1044. var str=nil;
  1045. var currentSelector=nil;
  1046. self['@currentSelector']=smalltalk.send(smalltalk.send(aNode, "_selector", []), "_asSelector", []);
  1047. self['@nestedBlocks']=(0);
  1048. self['@earlyReturn']=false;
  1049. self['@messageSends']=[];
  1050. self['@referencedClasses']=[];
  1051. self['@unknownVariables']=[];
  1052. self['@tempVariables']=[];
  1053. (function($rec){smalltalk.send($rec, "_nextPutAll_", [unescape("smalltalk.method%28%7B")]);smalltalk.send($rec, "_lf", []);smalltalk.send($rec, "_nextPutAll_", [smalltalk.send(smalltalk.send(unescape("selector%3A%20%22"), "__comma", [smalltalk.send(aNode, "_selector", [])]), "__comma", [unescape("%22%2C")])]);return smalltalk.send($rec, "_lf", []);})(self['@stream']);
  1054. (function($rec){smalltalk.send($rec, "_nextPutAll_", [smalltalk.send(smalltalk.send(unescape("source%3A%20unescape%28%22"), "__comma", [smalltalk.send(smalltalk.send(aNode, "_source", []), "_escaped", [])]), "__comma", [unescape("%22%29%2C")])]);return smalltalk.send($rec, "_lf", []);})(self['@stream']);
  1055. smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("fn%3A%20function%28")]);
  1056. 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")]);})]);
  1057. (function($rec){smalltalk.send($rec, "_nextPutAll_", [unescape("%29%7B")]);smalltalk.send($rec, "_lf", []);smalltalk.send($rec, "_nextPutAll_", [unescape("var%20self%3Dthis%3B")]);return smalltalk.send($rec, "_lf", []);})(self['@stream']);
  1058. str=self['@stream'];
  1059. self['@stream']=smalltalk.send("", "_writeStream", []);
  1060. smalltalk.send(smalltalk.send(aNode, "_nodes", []), "_do_", [(function(each){return smalltalk.send(self, "_visit_", [each]);})]);
  1061. smalltalk.send(self['@earlyReturn'], "_ifTrue_", [(function(){return smalltalk.send(str, "_nextPutAll_", [unescape("try%7B")]);})]);
  1062. smalltalk.send(str, "_nextPutAll_", [smalltalk.send(self['@stream'], "_contents", [])]);
  1063. self['@stream']=str;
  1064. (function($rec){smalltalk.send($rec, "_lf", []);return smalltalk.send($rec, "_nextPutAll_", [unescape("return%20self%3B")]);})(self['@stream']);
  1065. smalltalk.send(self['@earlyReturn'], "_ifTrue_", [(function(){return (function($rec){smalltalk.send($rec, "_lf", []);return smalltalk.send($rec, "_nextPutAll_", [smalltalk.send(smalltalk.send(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")])]);})(self['@stream']);})]);
  1066. smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%7D")]);
  1067. (function($rec){smalltalk.send($rec, "_nextPutAll_", [smalltalk.send(smalltalk.send(unescape("%2C"), "__comma", [smalltalk.send(smalltalk.String, "_lf", [])]), "__comma", ["messageSends: "])]);smalltalk.send($rec, "_nextPutAll_", [smalltalk.send(smalltalk.send(self['@messageSends'], "_asJavascript", []), "__comma", [unescape("%2C")])]);smalltalk.send($rec, "_lf", []);return smalltalk.send($rec, "_nextPutAll_", [unescape("referencedClasses%3A%20%5B")]);})(self['@stream']);
  1068. smalltalk.send(self['@referencedClasses'], "_do_separatedBy_", [(function(each){return smalltalk.send(self['@stream'], "_nextPutAll_", [each]);}), (function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%2C")]);})]);
  1069. smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%5D")]);
  1070. smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%7D%29")]);
  1071. return self;},
  1072. 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%09messageSends%20%3A%3D%20%23%28%29.%0A%09referencedClasses%20%3A%3D%20%23%28%29.%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%3B%20lf%3B%0A%09%20%20%20%20nextPutAll%3A%20%27selector%3A%20%22%27%2C%20aNode%20selector%2C%20%27%22%2C%27%3B%20lf.%0A%09stream%20nextPutAll%3A%20%27source%3A%20unescape%28%22%27%2C%20aNode%20source%20escaped%2C%20%27%22%29%2C%27%3Blf.%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%3B%20lf%3B%0A%09%20%20%20%20nextPutAll%3A%20%27var%20self%3Dthis%3B%27%3B%20lf.%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%20lf%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%20lf%3B%20nextPutAll%3A%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%20nextPutAll%3A%20%27%7D%27.%0A%09stream%20%0A%09%09nextPutAll%3A%20%27%2C%27%2C%20String%20lf%2C%20%27messageSends%3A%20%27%3B%0A%09%09nextPutAll%3A%20messageSends%20asJavascript%2C%20%27%2C%27%3B%20lf%3B%0A%09%09nextPutAll%3A%20%27referencedClasses%3A%20%5B%27.%0A%09referencedClasses%20%0A%09%09do%3A%20%5B%3Aeach%20%7C%20stream%20nextPutAll%3A%20each%5D%0A%09%09separatedBy%3A%20%5Bstream%20nextPutAll%3A%20%27%2C%27%5D.%0A%09stream%20nextPutAll%3A%20%27%5D%27.%0A%09stream%20nextPutAll%3A%20%27%7D%29%27'),
  1073. messageSends: ["asSelector", "selector", "nextPutAll:", "lf", unescape("%2C"), "escaped", "source", "do:separatedBy:", "arguments", "add:", "writeStream", "do:", "nodes", "visit:", "ifTrue:", "contents", "printString", "asJavascript"],
  1074. referencedClasses: [smalltalk.String]
  1075. }),
  1076. smalltalk.Compiler);
  1077. smalltalk.addMethod(
  1078. '_visitBlockNode_',
  1079. smalltalk.method({
  1080. selector: 'visitBlockNode:',
  1081. category: 'visiting',
  1082. fn: function (aNode){
  1083. var self=this;
  1084. smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28function%28")]);
  1085. 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")]);})]);
  1086. smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%29%7B")]);
  1087. smalltalk.send(smalltalk.send(aNode, "_nodes", []), "_do_", [(function(each){return smalltalk.send(self, "_visit_", [each]);})]);
  1088. smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%7D%29")]);
  1089. return self;},
  1090. 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'),
  1091. messageSends: ["nextPutAll:", "do:separatedBy:", "parameters", "add:", "do:", "nodes", "visit:"],
  1092. referencedClasses: []
  1093. }),
  1094. smalltalk.Compiler);
  1095. smalltalk.addMethod(
  1096. '_visitSequenceNode_',
  1097. smalltalk.method({
  1098. selector: 'visitSequenceNode:',
  1099. category: 'visiting',
  1100. fn: function (aNode){
  1101. var self=this;
  1102. smalltalk.send(smalltalk.send(aNode, "_temps", []), "_do_", [(function(each){smalltalk.send(self['@tempVariables'], "_add_", [each]);return (function($rec){smalltalk.send($rec, "_nextPutAll_", [smalltalk.send(smalltalk.send("var ", "__comma", [each]), "__comma", [unescape("%3Dnil%3B")])]);return smalltalk.send($rec, "_lf", []);})(self['@stream']);})]);
  1103. 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'], "_lf", []);})]);
  1104. return self;},
  1105. 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%3B%20lf%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%20lf%5D'),
  1106. messageSends: ["do:", "temps", "add:", "nextPutAll:", unescape("%2C"), "lf", "do:separatedBy:", "nodes", "visit:"],
  1107. referencedClasses: []
  1108. }),
  1109. smalltalk.Compiler);
  1110. smalltalk.addMethod(
  1111. '_visitBlockSequenceNode_',
  1112. smalltalk.method({
  1113. selector: 'visitBlockSequenceNode:',
  1114. category: 'visiting',
  1115. fn: function (aNode){
  1116. var self=this;
  1117. var index=nil;
  1118. self['@nestedBlocks']=smalltalk.send(self['@nestedBlocks'], "__plus", [(1)]);
  1119. 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]);return (function($rec){smalltalk.send($rec, "_nextPutAll_", [smalltalk.send(smalltalk.send("var ", "__comma", [each]), "__comma", [unescape("%3Dnil%3B")])]);return smalltalk.send($rec, "_lf", []);})(self['@stream']);})]);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")]);})]);})]);
  1120. self['@nestedBlocks']=smalltalk.send(self['@nestedBlocks'], "__minus", [(1)]);
  1121. return self;},
  1122. 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%3B%20lf%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'),
  1123. messageSends: [unescape("+"), "ifTrue:ifFalse:", "isEmpty", "nodes", "nextPutAll:", "do:", "temps", "add:", unescape("%2C"), "lf", "ifTrue:", unescape("%3D"), "size", "visit:", unescape("-")],
  1124. referencedClasses: []
  1125. }),
  1126. smalltalk.Compiler);
  1127. smalltalk.addMethod(
  1128. '_visitReturnNode_',
  1129. smalltalk.method({
  1130. selector: 'visitReturnNode:',
  1131. category: 'visiting',
  1132. fn: function (aNode){
  1133. var self=this;
  1134. smalltalk.send(smalltalk.send(self['@nestedBlocks'], "__gt", [(0)]), "_ifTrue_", [(function(){return self['@earlyReturn']=true;})]);
  1135. 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 "]);})]);
  1136. smalltalk.send(smalltalk.send(aNode, "_nodes", []), "_do_", [(function(each){return smalltalk.send(self, "_visit_", [each]);})]);
  1137. smalltalk.send(self['@earlyReturn'], "_ifTrue_", [(function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%7D%7D%29%7D%29%28%29")]);})]);
  1138. return self;},
  1139. 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'),
  1140. messageSends: ["ifTrue:", unescape("%3E"), "ifTrue:ifFalse:", "nextPutAll:", "printString", "do:", "nodes", "visit:"],
  1141. referencedClasses: []
  1142. }),
  1143. smalltalk.Compiler);
  1144. smalltalk.addMethod(
  1145. '_visitSendNode_',
  1146. smalltalk.method({
  1147. selector: 'visitSendNode:',
  1148. category: 'visiting',
  1149. fn: function (aNode){
  1150. var self=this;
  1151. var str=nil;
  1152. var receiver=nil;
  1153. var superSend=nil;
  1154. str=self['@stream'];
  1155. smalltalk.send(smalltalk.send(self['@messageSends'], "_includes_", [smalltalk.send(aNode, "_selector", [])]), "_ifFalse_", [(function(){return smalltalk.send(self['@messageSends'], "_add_", [smalltalk.send(aNode, "_selector", [])]);})]);
  1156. self['@stream']=smalltalk.send("", "_writeStream", []);
  1157. smalltalk.send(self, "_visit_", [smalltalk.send(aNode, "_receiver", [])]);
  1158. superSend=smalltalk.send(smalltalk.send(self['@stream'], "_contents", []), "__eq", ["super"]);
  1159. receiver=smalltalk.send(superSend, "_ifTrue_ifFalse_", [(function(){return "self";}), (function(){return smalltalk.send(self['@stream'], "_contents", []);})]);
  1160. smalltalk.send(str, "_nextPutAll_", [unescape("smalltalk.send%28")]);
  1161. smalltalk.send(str, "_nextPutAll_", [receiver]);
  1162. self['@stream']=str;
  1163. 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")])]);
  1164. 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")]);})]);
  1165. smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%5D")]);
  1166. smalltalk.send(superSend, "_ifTrue_", [(function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [smalltalk.send(unescape("%2C%20smalltalk."), "__comma", [smalltalk.send(self, "_classNameFor_", [smalltalk.send(smalltalk.send(self, "_currentClass", []), "_superclass", [])])])]);})]);
  1167. smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%29")]);
  1168. return self;},
  1169. source: unescape('visitSendNode%3A%20aNode%0A%09%7C%20str%20receiver%20superSend%20%7C%0A%09str%20%3A%3D%20stream.%0A%09%28messageSends%20includes%3A%20aNode%20selector%29%20ifFalse%3A%20%5B%0A%09%09messageSends%20add%3A%20aNode%20selector%5D.%0A%09stream%20%3A%3D%20%27%27%20writeStream.%0A%09self%20visit%3A%20aNode%20receiver.%0A%09superSend%20%3A%3D%20stream%20contents%20%3D%20%27super%27.%0A%09receiver%20%3A%3D%20superSend%20ifTrue%3A%20%5B%27self%27%5D%20ifFalse%3A%20%5Bstream%20contents%5D.%0A%09str%20nextPutAll%3A%20%27smalltalk.send%28%27.%0A%09str%20nextPutAll%3A%20receiver.%0A%09stream%20%3A%3D%20str.%0A%09stream%20nextPutAll%3A%20%27%2C%20%22%27%2C%20aNode%20selector%20asSelector%2C%20%27%22%2C%20%5B%27.%0A%09aNode%20arguments%20%0A%09%20%20%20%20do%3A%20%5B%3Aeach%20%7C%20self%20visit%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%5D%27.%0A%09superSend%20ifTrue%3A%20%5B%0A%09%09stream%20nextPutAll%3A%20%27%2C%20smalltalk.%27%2C%20%28self%20classNameFor%3A%20self%20currentClass%20superclass%29%5D.%0A%09stream%20nextPutAll%3A%20%27%29%27'),
  1170. messageSends: ["ifFalse:", "includes:", "selector", "add:", "writeStream", "visit:", "receiver", unescape("%3D"), "contents", "ifTrue:ifFalse:", "nextPutAll:", unescape("%2C"), "asSelector", "do:separatedBy:", "arguments", "ifTrue:", "classNameFor:", "superclass", "currentClass"],
  1171. referencedClasses: []
  1172. }),
  1173. smalltalk.Compiler);
  1174. smalltalk.addMethod(
  1175. '_visitCascadeNode_',
  1176. smalltalk.method({
  1177. selector: 'visitCascadeNode:',
  1178. category: 'visiting',
  1179. fn: function (aNode){
  1180. var self=this;
  1181. var index=nil;
  1182. index=(0);
  1183. smalltalk.send(smalltalk.send(self['@tempVariables'], "_includes_", ["$rec"]), "_ifFalse_", [(function(){return smalltalk.send(self['@tempVariables'], "_add_", ["$rec"]);})]);
  1184. smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28function%28%24rec%29%7B")]);
  1185. 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")]);})]);
  1186. smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%7D%29%28")]);
  1187. smalltalk.send(self, "_visit_", [smalltalk.send(aNode, "_receiver", [])]);
  1188. smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%29")]);
  1189. return self;},
  1190. 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'),
  1191. messageSends: ["ifFalse:", "includes:", "add:", "nextPutAll:", "do:", "nodes", unescape("+"), "ifTrue:", unescape("%3D"), "size", "receiver:", "value:", "new", "visit:", "receiver"],
  1192. referencedClasses: [smalltalk.VariableNode]
  1193. }),
  1194. smalltalk.Compiler);
  1195. smalltalk.addMethod(
  1196. '_visitValueNode_',
  1197. smalltalk.method({
  1198. selector: 'visitValueNode:',
  1199. category: 'visiting',
  1200. fn: function (aNode){
  1201. var self=this;
  1202. smalltalk.send(self['@stream'], "_nextPutAll_", [smalltalk.send(smalltalk.send(aNode, "_value", []), "_asJavascript", [])]);
  1203. return self;},
  1204. source: unescape('visitValueNode%3A%20aNode%0A%09stream%20nextPutAll%3A%20aNode%20value%20asJavascript'),
  1205. messageSends: ["nextPutAll:", "asJavascript", "value"],
  1206. referencedClasses: []
  1207. }),
  1208. smalltalk.Compiler);
  1209. smalltalk.addMethod(
  1210. '_visitAssignmentNode_',
  1211. smalltalk.method({
  1212. selector: 'visitAssignmentNode:',
  1213. category: 'visiting',
  1214. fn: function (aNode){
  1215. var self=this;
  1216. smalltalk.send(self, "_visit_", [smalltalk.send(aNode, "_left", [])]);
  1217. smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%3D")]);
  1218. smalltalk.send(self, "_visit_", [smalltalk.send(aNode, "_right", [])]);
  1219. return self;},
  1220. 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'),
  1221. messageSends: ["visit:", "left", "nextPutAll:", "right"],
  1222. referencedClasses: []
  1223. }),
  1224. smalltalk.Compiler);
  1225. smalltalk.addMethod(
  1226. '_visitClassReferenceNode_',
  1227. smalltalk.method({
  1228. selector: 'visitClassReferenceNode:',
  1229. category: 'visiting',
  1230. fn: function (aNode){
  1231. var self=this;
  1232. var klass=nil;
  1233. klass=smalltalk.send("smalltalk.", "__comma", [smalltalk.send(aNode, "_value", [])]);
  1234. smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.Smalltalk, "_current", []), "_at_", [smalltalk.send(aNode, "_value", [])]), "_isClass", []), "_ifTrue_", [(function(){return smalltalk.send(smalltalk.send(self['@referencedClasses'], "_includes_", [klass]), "_ifFalse_", [(function(){return smalltalk.send(self['@referencedClasses'], "_add_", [klass]);})]);})]);
  1235. smalltalk.send(self['@stream'], "_nextPutAll_", [klass]);
  1236. return self;},
  1237. source: unescape('visitClassReferenceNode%3A%20aNode%0A%09%7C%20klass%20%7C%0A%09klass%20%3A%3D%20%27smalltalk.%27%2C%20aNode%20value.%0A%09%28Smalltalk%20current%20at%3A%20aNode%20value%29%20isClass%20ifTrue%3A%20%5B%0A%09%09%28referencedClasses%20includes%3A%20klass%29%0A%09%09%09ifFalse%3A%20%5BreferencedClasses%20add%3A%20klass%5D%5D.%0A%09stream%20nextPutAll%3A%20klass'),
  1238. messageSends: [unescape("%2C"), "value", "ifTrue:", "isClass", "at:", "current", "ifFalse:", "includes:", "add:", "nextPutAll:"],
  1239. referencedClasses: [smalltalk.Smalltalk]
  1240. }),
  1241. smalltalk.Compiler);
  1242. smalltalk.addMethod(
  1243. '_visitVariableNode_',
  1244. smalltalk.method({
  1245. selector: 'visitVariableNode:',
  1246. category: 'visiting',
  1247. fn: function (aNode){
  1248. var self=this;
  1249. smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(self, "_currentClass", []), "_allInstanceVariableNames", []), "_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", [])]);})]);
  1250. return self;},
  1251. source: unescape('visitVariableNode%3A%20aNode%0A%09%28self%20currentClass%20allInstanceVariableNames%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'),
  1252. messageSends: ["ifTrue:ifFalse:", "includes:", "allInstanceVariableNames", "currentClass", "value", "nextPutAll:", unescape("%2C"), "ifFalse:", "knownVariables", "add:"],
  1253. referencedClasses: []
  1254. }),
  1255. smalltalk.Compiler);
  1256. smalltalk.addMethod(
  1257. '_visitJSStatementNode_',
  1258. smalltalk.method({
  1259. selector: 'visitJSStatementNode:',
  1260. category: 'visiting',
  1261. fn: function (aNode){
  1262. var self=this;
  1263. smalltalk.send(self['@stream'], "_nextPutAll_", [smalltalk.send(smalltalk.send(aNode, "_source", []), "_replace_with_", [unescape("%3E%3E"), unescape("%3E")])]);
  1264. return self;},
  1265. source: unescape('visitJSStatementNode%3A%20aNode%0A%09stream%20nextPutAll%3A%20%28aNode%20source%20replace%3A%20%27%3E%3E%27%20with%3A%20%27%3E%27%29'),
  1266. messageSends: ["nextPutAll:", "replace:with:", "source"],
  1267. referencedClasses: []
  1268. }),
  1269. smalltalk.Compiler);
  1270. smalltalk.addMethod(
  1271. '_parse_',
  1272. smalltalk.method({
  1273. selector: 'parse:',
  1274. category: 'compiling',
  1275. fn: function (aString){
  1276. var self=this;
  1277. return smalltalk.send(smalltalk.send(self, "_parser", []), "_parse_", [smalltalk.send(aString, "_readStream", [])]);
  1278. return self;},
  1279. source: unescape('parse%3A%20aString%0A%20%20%20%20%5Eself%20parser%20parse%3A%20aString%20readStream'),
  1280. messageSends: ["parse:", "parser", "readStream"],
  1281. referencedClasses: []
  1282. }),
  1283. smalltalk.Compiler);
  1284. smalltalk.addMethod(
  1285. '_parseExpression_',
  1286. smalltalk.method({
  1287. selector: 'parseExpression:',
  1288. category: 'compiling',
  1289. fn: function (aString){
  1290. var self=this;
  1291. return smalltalk.send(self, "_parse_", [smalltalk.send(smalltalk.send(unescape("doIt%20%5E%5B"), "__comma", [aString]), "__comma", [unescape("%5D%20value")])]);
  1292. return self;},
  1293. 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'),
  1294. messageSends: ["parse:", unescape("%2C")],
  1295. referencedClasses: []
  1296. }),
  1297. smalltalk.Compiler);
  1298. smalltalk.addMethod(
  1299. '_unknownVariables',
  1300. smalltalk.method({
  1301. selector: 'unknownVariables',
  1302. category: 'accessing',
  1303. fn: function (){
  1304. var self=this;
  1305. return smalltalk.send(self['@unknownVariables'], "_copy", []);
  1306. return self;},
  1307. source: unescape('unknownVariables%0A%09%5EunknownVariables%20copy'),
  1308. messageSends: ["copy"],
  1309. referencedClasses: []
  1310. }),
  1311. smalltalk.Compiler);
  1312. smalltalk.addMethod(
  1313. '_pseudoVariables',
  1314. smalltalk.method({
  1315. selector: 'pseudoVariables',
  1316. category: 'accessing',
  1317. fn: function (){
  1318. var self=this;
  1319. return ["self", "super", "true", "false", "nil", "thisContext"];
  1320. return self;},
  1321. 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'),
  1322. messageSends: [],
  1323. referencedClasses: []
  1324. }),
  1325. smalltalk.Compiler);
  1326. smalltalk.addMethod(
  1327. '_tempVariables',
  1328. smalltalk.method({
  1329. selector: 'tempVariables',
  1330. category: 'accessing',
  1331. fn: function (){
  1332. var self=this;
  1333. return smalltalk.send(self['@tempVariables'], "_copy", []);
  1334. return self;},
  1335. source: unescape('tempVariables%0A%09%5EtempVariables%20copy'),
  1336. messageSends: ["copy"],
  1337. referencedClasses: []
  1338. }),
  1339. smalltalk.Compiler);
  1340. smalltalk.addMethod(
  1341. '_knownVariables',
  1342. smalltalk.method({
  1343. selector: 'knownVariables',
  1344. category: 'accessing',
  1345. fn: function (){
  1346. var self=this;
  1347. return (function($rec){smalltalk.send($rec, "_addAll_", [smalltalk.send(self, "_tempVariables", [])]);return smalltalk.send($rec, "_yourself", []);})(smalltalk.send(self, "_pseudoVariables", []));
  1348. return self;},
  1349. source: unescape('knownVariables%0A%09%5Eself%20pseudoVariables%20%0A%09%09addAll%3A%20self%20tempVariables%3B%0A%09%09yourself'),
  1350. messageSends: ["addAll:", "tempVariables", "yourself", "pseudoVariables"],
  1351. referencedClasses: []
  1352. }),
  1353. smalltalk.Compiler);
  1354. smalltalk.addMethod(
  1355. '_recompile_',
  1356. smalltalk.method({
  1357. selector: 'recompile:',
  1358. category: 'compiling',
  1359. fn: function (aClass){
  1360. var self=this;
  1361. smalltalk.send(smalltalk.send(aClass, "_methodDictionary", []), "_do_", [(function(each){var method=nil;
  1362. 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]);})]);
  1363. smalltalk.send(smalltalk.send(aClass, "_isMetaclass", []), "_ifFalse_", [(function(){return smalltalk.send(self, "_recompile_", [smalltalk.send(aClass, "_class", [])]);})]);
  1364. return self;},
  1365. 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'),
  1366. messageSends: ["do:", "methodDictionary", "load:forClass:", "source", "category:", "category", "addCompiledMethod:", "ifFalse:", "isMetaclass", "recompile:", "class"],
  1367. referencedClasses: []
  1368. }),
  1369. smalltalk.Compiler);
  1370. smalltalk.addMethod(
  1371. '_recompileAll',
  1372. smalltalk.method({
  1373. selector: 'recompileAll',
  1374. category: 'compiling',
  1375. fn: function (){
  1376. var self=this;
  1377. smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.Smalltalk, "_current", []), "_classes", []), "_do_", [(function(each){(function($rec){smalltalk.send($rec, "_show_", [each]);return smalltalk.send($rec, "_cr", []);})(smalltalk.Transcript);return smalltalk.send((function(){return smalltalk.send(self, "_recompile_", [each]);}), "_valueWithTimeout_", [(100)]);})]);
  1378. return self;},
  1379. source: unescape('recompileAll%0A%09Smalltalk%20current%20classes%20do%3A%20%5B%3Aeach%20%7C%0A%09%09Transcript%20show%3A%20each%3B%20cr.%0A%09%09%5Bself%20recompile%3A%20each%5D%20valueWithTimeout%3A%20100%5D'),
  1380. messageSends: ["do:", "classes", "current", "show:", "cr", "valueWithTimeout:", "recompile:"],
  1381. referencedClasses: [smalltalk.Smalltalk,smalltalk.nil]
  1382. }),
  1383. smalltalk.Compiler);
  1384. smalltalk.addMethod(
  1385. '_classNameFor_',
  1386. smalltalk.method({
  1387. selector: 'classNameFor:',
  1388. category: 'accessing',
  1389. fn: function (aClass){
  1390. var self=this;
  1391. return smalltalk.send(smalltalk.send(aClass, "_isMetaclass", []), "_ifTrue_ifFalse_", [(function(){return smalltalk.send(smalltalk.send(smalltalk.send(aClass, "_instanceClass", []), "_name", []), "__comma", [".klass"]);}), (function(){return smalltalk.send(smalltalk.send(aClass, "_isNil", []), "_ifTrue_ifFalse_", [(function(){return "nil";}), (function(){return smalltalk.send(aClass, "_name", []);})]);})]);
  1392. return self;},
  1393. source: unescape('classNameFor%3A%20aClass%0A%09%5EaClass%20isMetaclass%0A%09%20%20%20%20ifTrue%3A%20%5BaClass%20instanceClass%20name%2C%20%27.klass%27%5D%0A%09%20%20%20%20ifFalse%3A%20%5B%0A%09%09aClass%20isNil%0A%09%09%20%20%20%20ifTrue%3A%20%5B%27nil%27%5D%0A%09%09%20%20%20%20ifFalse%3A%20%5BaClass%20name%5D%5D'),
  1394. messageSends: ["ifTrue:ifFalse:", "isMetaclass", unescape("%2C"), "name", "instanceClass", "isNil"],
  1395. referencedClasses: []
  1396. }),
  1397. smalltalk.Compiler);
  1398. smalltalk.addMethod(
  1399. '_visitFailure_',
  1400. smalltalk.method({
  1401. selector: 'visitFailure:',
  1402. category: 'visiting',
  1403. fn: function (aFailure){
  1404. var self=this;
  1405. smalltalk.send(self, "_error_", [smalltalk.send(aFailure, "_asString", [])]);
  1406. return self;},
  1407. source: unescape('visitFailure%3A%20aFailure%0A%09self%20error%3A%20aFailure%20asString'),
  1408. messageSends: ["error:", "asString"],
  1409. referencedClasses: []
  1410. }),
  1411. smalltalk.Compiler);
  1412. smalltalk.addMethod(
  1413. '_setupClass_',
  1414. smalltalk.method({
  1415. selector: 'setupClass:',
  1416. category: 'compiling',
  1417. fn: function (aClass){
  1418. var self=this;
  1419. smalltalk.init(aClass);
  1420. return self;},
  1421. source: unescape('setupClass%3A%20aClass%0A%09%3Csmalltalk.init%28aClass%29%3E'),
  1422. messageSends: [],
  1423. referencedClasses: []
  1424. }),
  1425. smalltalk.Compiler);
  1426. smalltalk.addMethod(
  1427. '_recompile_',
  1428. smalltalk.method({
  1429. selector: 'recompile:',
  1430. category: 'compiling',
  1431. fn: function (aClass){
  1432. var self=this;
  1433. smalltalk.send(smalltalk.send(aClass, "_methodDictionary", []), "_do_", [(function(each){var method=nil;
  1434. method=smalltalk.send(smalltalk.send(self, "_new", []), "_load_forClass_", [smalltalk.send(each, "_source", []), aClass]);smalltalk.send(method, "_category_", [smalltalk.send(each, "_category", [])]);return smalltalk.send(aClass, "_addCompiledMethod_", [method]);})]);
  1435. smalltalk.send(smalltalk.send(aClass, "_isMetaclass", []), "_ifFalse_", [(function(){return smalltalk.send(self, "_recompile_", [smalltalk.send(aClass, "_class", [])]);})]);
  1436. return self;},
  1437. 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%20new%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'),
  1438. messageSends: ["do:", "methodDictionary", "load:forClass:", "new", "source", "category:", "category", "addCompiledMethod:", "ifFalse:", "isMetaclass", "recompile:", "class"],
  1439. referencedClasses: []
  1440. }),
  1441. smalltalk.Compiler.klass);
  1442. smalltalk.addMethod(
  1443. '_recompileAll',
  1444. smalltalk.method({
  1445. selector: 'recompileAll',
  1446. category: 'compiling',
  1447. fn: function (){
  1448. var self=this;
  1449. smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.Smalltalk, "_current", []), "_classes", []), "_do_", [(function(each){return smalltalk.send(self, "_recompile_", [each]);})]);
  1450. return self;},
  1451. source: unescape('recompileAll%0A%09Smalltalk%20current%20classes%20do%3A%20%5B%3Aeach%20%7C%0A%09%09self%20recompile%3A%20each%5D'),
  1452. messageSends: ["do:", "classes", "current", "recompile:"],
  1453. referencedClasses: [smalltalk.Smalltalk]
  1454. }),
  1455. smalltalk.Compiler.klass);
  1456. smalltalk.setup(smalltalk.Compiler);
  1457. smalltalk.addClass('DoIt', smalltalk.Object, [], 'Compiler');
  1458. smalltalk.addMethod(
  1459. '_doIt',
  1460. smalltalk.method({
  1461. selector: 'doIt',
  1462. category: '',
  1463. fn: function (){
  1464. var self=this;
  1465. return smalltalk.send((function(){return smalltalk.send(smalltalk.send(smalltalk.StrippedExporter, "_new", []), "_exportCategory_", ["IDE"]);}), "_value", []);
  1466. return self;},
  1467. source: unescape('doIt%20%5E%5BStrippedExporter%20new%20exportCategory%3A%20%27IDE%27%5D%20value'),
  1468. messageSends: ["value", "exportCategory:", "new"],
  1469. referencedClasses: [smalltalk.StrippedExporter]
  1470. }),
  1471. smalltalk.DoIt);
  1472. smalltalk.setup(smalltalk.DoIt);