123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989990991992993994995996997998999100010011002100310041005100610071008100910101011101210131014101510161017101810191020102110221023102410251026102710281029103010311032103310341035103610371038103910401041104210431044104510461047104810491050105110521053105410551056105710581059106010611062106310641065106610671068106910701071107210731074107510761077107810791080108110821083108410851086108710881089109010911092109310941095109610971098109911001101110211031104110511061107110811091110111111121113111411151116111711181119112011211122112311241125112611271128112911301131113211331134113511361137113811391140114111421143114411451146114711481149115011511152115311541155115611571158115911601161116211631164116511661167116811691170117111721173117411751176117711781179118011811182118311841185118611871188118911901191119211931194119511961197119811991200120112021203120412051206120712081209121012111212121312141215121612171218121912201221122212231224122512261227122812291230123112321233123412351236123712381239124012411242124312441245124612471248124912501251125212531254125512561257125812591260126112621263126412651266126712681269127012711272127312741275127612771278127912801281128212831284128512861287128812891290129112921293129412951296129712981299130013011302130313041305130613071308130913101311131213131314131513161317131813191320132113221323132413251326132713281329133013311332133313341335133613371338133913401341134213431344134513461347134813491350135113521353135413551356135713581359136013611362136313641365136613671368136913701371137213731374137513761377137813791380138113821383138413851386138713881389139013911392139313941395139613971398139914001401140214031404140514061407140814091410141114121413141414151416141714181419142014211422142314241425142614271428142914301431143214331434143514361437143814391440144114421443144414451446144714481449145014511452145314541455145614571458145914601461146214631464146514661467146814691470147114721473147414751476147714781479148014811482148314841485148614871488148914901491149214931494149514961497149814991500150115021503150415051506150715081509151015111512151315141515151615171518151915201521152215231524152515261527152815291530153115321533153415351536153715381539154015411542154315441545154615471548154915501551155215531554155515561557155815591560156115621563156415651566156715681569157015711572157315741575157615771578157915801581158215831584158515861587 |
- smalltalk.addClass('Node', smalltalk.Object, ['nodes'], 'Compiler');
- smalltalk.addMethod(
- '_nodes',
- smalltalk.method({
- selector: 'nodes',
- category: 'accessing',
- fn: function (){
- var self=this;
- return smalltalk.send(self['@nodes'], "_ifNil_", [(function(){return self['@nodes']=smalltalk.send(smalltalk.Array, "_new", []);})]);
- return self;},
- source: unescape('nodes%0A%09%5Enodes%20ifNil%3A%20%5Bnodes%20%3A%3D%20Array%20new%5D'),
- messageSends: ["ifNil:", "new"],
- referencedClasses: [smalltalk.Array]
- }),
- smalltalk.Node);
- smalltalk.addMethod(
- '_nodes_',
- smalltalk.method({
- selector: 'nodes:',
- category: 'building',
- fn: function (aCollection){
- var self=this;
- self['@nodes']=aCollection;
- return self;},
- source: unescape('nodes%3A%20aCollection%0A%09nodes%20%3A%3D%20aCollection'),
- messageSends: [],
- referencedClasses: []
- }),
- smalltalk.Node);
- smalltalk.addMethod(
- '_addNode_',
- smalltalk.method({
- selector: 'addNode:',
- category: 'accessing',
- fn: function (aNode){
- var self=this;
- smalltalk.send(smalltalk.send(self, "_nodes", []), "_add_", [aNode]);
- return self;},
- source: unescape('addNode%3A%20aNode%0A%09self%20nodes%20add%3A%20aNode'),
- messageSends: ["add:", "nodes"],
- referencedClasses: []
- }),
- smalltalk.Node);
- smalltalk.addMethod(
- '_accept_',
- smalltalk.method({
- selector: 'accept:',
- category: 'visiting',
- fn: function (aVisitor){
- var self=this;
- smalltalk.send(aVisitor, "_visitNode_", [self]);
- return self;},
- source: unescape('accept%3A%20aVisitor%0A%09aVisitor%20visitNode%3A%20self'),
- messageSends: ["visitNode:"],
- referencedClasses: []
- }),
- smalltalk.Node);
- smalltalk.addClass('MethodNode', smalltalk.Node, ['selector', 'arguments', 'source'], 'Compiler');
- smalltalk.addMethod(
- '_selector',
- smalltalk.method({
- selector: 'selector',
- category: 'accessing',
- fn: function (){
- var self=this;
- return self['@selector'];
- return self;},
- source: unescape('selector%0A%09%5Eselector'),
- messageSends: [],
- referencedClasses: []
- }),
- smalltalk.MethodNode);
- smalltalk.addMethod(
- '_selector_',
- smalltalk.method({
- selector: 'selector:',
- category: 'accessing',
- fn: function (aString){
- var self=this;
- self['@selector']=aString;
- return self;},
- source: unescape('selector%3A%20aString%0A%09selector%20%3A%3D%20aString'),
- messageSends: [],
- referencedClasses: []
- }),
- smalltalk.MethodNode);
- smalltalk.addMethod(
- '_arguments',
- smalltalk.method({
- selector: 'arguments',
- category: 'accessing',
- fn: function (){
- var self=this;
- return smalltalk.send(self['@arguments'], "_ifNil_", [(function(){return [];})]);
- return self;},
- source: unescape('arguments%0A%09%5Earguments%20ifNil%3A%20%5B%23%28%29%5D'),
- messageSends: ["ifNil:"],
- referencedClasses: []
- }),
- smalltalk.MethodNode);
- smalltalk.addMethod(
- '_arguments_',
- smalltalk.method({
- selector: 'arguments:',
- category: 'accessing',
- fn: function (aCollection){
- var self=this;
- self['@arguments']=aCollection;
- return self;},
- source: unescape('arguments%3A%20aCollection%0A%09arguments%20%3A%3D%20aCollection'),
- messageSends: [],
- referencedClasses: []
- }),
- smalltalk.MethodNode);
- smalltalk.addMethod(
- '_source',
- smalltalk.method({
- selector: 'source',
- category: 'accessing',
- fn: function (){
- var self=this;
- return self['@source'];
- return self;},
- source: unescape('source%0A%09%5Esource'),
- messageSends: [],
- referencedClasses: []
- }),
- smalltalk.MethodNode);
- smalltalk.addMethod(
- '_source_',
- smalltalk.method({
- selector: 'source:',
- category: 'accessing',
- fn: function (aString){
- var self=this;
- self['@source']=aString;
- return self;},
- source: unescape('source%3A%20aString%0A%09source%20%3A%3D%20aString'),
- messageSends: [],
- referencedClasses: []
- }),
- smalltalk.MethodNode);
- smalltalk.addMethod(
- '_accept_',
- smalltalk.method({
- selector: 'accept:',
- category: 'visiting',
- fn: function (aVisitor){
- var self=this;
- smalltalk.send(aVisitor, "_visitMethodNode_", [self]);
- return self;},
- source: unescape('accept%3A%20aVisitor%0A%09aVisitor%20visitMethodNode%3A%20self'),
- messageSends: ["visitMethodNode:"],
- referencedClasses: []
- }),
- smalltalk.MethodNode);
- smalltalk.addClass('SendNode', smalltalk.Node, ['selector', 'arguments', 'receiver'], 'Compiler');
- smalltalk.addMethod(
- '_selector',
- smalltalk.method({
- selector: 'selector',
- category: 'accessing',
- fn: function (){
- var self=this;
- return self['@selector'];
- return self;},
- source: unescape('selector%0A%09%5Eselector'),
- messageSends: [],
- referencedClasses: []
- }),
- smalltalk.SendNode);
- smalltalk.addMethod(
- '_selector_',
- smalltalk.method({
- selector: 'selector:',
- category: 'accessing',
- fn: function (aString){
- var self=this;
- self['@selector']=aString;
- return self;},
- source: unescape('selector%3A%20aString%0A%09selector%20%3A%3D%20aString'),
- messageSends: [],
- referencedClasses: []
- }),
- smalltalk.SendNode);
- smalltalk.addMethod(
- '_arguments',
- smalltalk.method({
- selector: 'arguments',
- category: 'accessing',
- fn: function (){
- var self=this;
- return smalltalk.send(self['@arguments'], "_ifNil_", [(function(){return self['@arguments']=[];})]);
- return self;},
- source: unescape('arguments%0A%09%5Earguments%20ifNil%3A%20%5Barguments%20%3A%3D%20%23%28%29%5D'),
- messageSends: ["ifNil:"],
- referencedClasses: []
- }),
- smalltalk.SendNode);
- smalltalk.addMethod(
- '_arguments_',
- smalltalk.method({
- selector: 'arguments:',
- category: 'accessing',
- fn: function (aCollection){
- var self=this;
- self['@arguments']=aCollection;
- return self;},
- source: unescape('arguments%3A%20aCollection%0A%09arguments%20%3A%3D%20aCollection'),
- messageSends: [],
- referencedClasses: []
- }),
- smalltalk.SendNode);
- smalltalk.addMethod(
- '_receiver',
- smalltalk.method({
- selector: 'receiver',
- category: 'accessing',
- fn: function (){
- var self=this;
- return self['@receiver'];
- return self;},
- source: unescape('receiver%0A%09%5Ereceiver'),
- messageSends: [],
- referencedClasses: []
- }),
- smalltalk.SendNode);
- smalltalk.addMethod(
- '_receiver_',
- smalltalk.method({
- selector: 'receiver:',
- category: 'accessing',
- fn: function (aNode){
- var self=this;
- self['@receiver']=aNode;
- return self;},
- source: unescape('receiver%3A%20aNode%0A%09receiver%20%3A%3D%20aNode'),
- messageSends: [],
- referencedClasses: []
- }),
- smalltalk.SendNode);
- smalltalk.addMethod(
- '_valueForReceiver_',
- smalltalk.method({
- selector: 'valueForReceiver:',
- category: 'accessing',
- fn: function (anObject){
- var self=this;
- 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", []));
- return self;},
- 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'),
- messageSends: ["receiver:", "ifNil:ifNotNil:", "receiver", "valueForReceiver:", "selector:", "selector", "arguments:", "arguments", "yourself", "new"],
- referencedClasses: [smalltalk.SendNode]
- }),
- smalltalk.SendNode);
- smalltalk.addMethod(
- '_cascadeNodeWithMessages_',
- smalltalk.method({
- selector: 'cascadeNodeWithMessages:',
- category: 'accessing',
- fn: function (aCollection){
- var self=this;
- var first=nil;
- 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", []));
- 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", []));
- return self;},
- 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'),
- messageSends: ["selector:", "selector", "arguments:", "arguments", "yourself", "new", "receiver:", "receiver", "nodes:", unescape("%2C"), "with:"],
- referencedClasses: [smalltalk.SendNode,smalltalk.Array,smalltalk.nil]
- }),
- smalltalk.SendNode);
- smalltalk.addMethod(
- '_accept_',
- smalltalk.method({
- selector: 'accept:',
- category: 'visiting',
- fn: function (aVisitor){
- var self=this;
- smalltalk.send(aVisitor, "_visitSendNode_", [self]);
- return self;},
- source: unescape('accept%3A%20aVisitor%0A%09aVisitor%20visitSendNode%3A%20self'),
- messageSends: ["visitSendNode:"],
- referencedClasses: []
- }),
- smalltalk.SendNode);
- smalltalk.addClass('CascadeNode', smalltalk.Node, ['receiver'], 'Compiler');
- smalltalk.addMethod(
- '_receiver',
- smalltalk.method({
- selector: 'receiver',
- category: 'accessing',
- fn: function (){
- var self=this;
- return self['@receiver'];
- return self;},
- source: unescape('receiver%0A%09%5Ereceiver'),
- messageSends: [],
- referencedClasses: []
- }),
- smalltalk.CascadeNode);
- smalltalk.addMethod(
- '_receiver_',
- smalltalk.method({
- selector: 'receiver:',
- category: 'accessing',
- fn: function (aNode){
- var self=this;
- self['@receiver']=aNode;
- return self;},
- source: unescape('receiver%3A%20aNode%0A%09receiver%20%3A%3D%20aNode'),
- messageSends: [],
- referencedClasses: []
- }),
- smalltalk.CascadeNode);
- smalltalk.addMethod(
- '_accept_',
- smalltalk.method({
- selector: 'accept:',
- category: 'visiting',
- fn: function (aVisitor){
- var self=this;
- smalltalk.send(aVisitor, "_visitCascadeNode_", [self]);
- return self;},
- source: unescape('accept%3A%20aVisitor%0A%09aVisitor%20visitCascadeNode%3A%20self'),
- messageSends: ["visitCascadeNode:"],
- referencedClasses: []
- }),
- smalltalk.CascadeNode);
- smalltalk.addClass('AssignmentNode', smalltalk.Node, ['left', 'right'], 'Compiler');
- smalltalk.addMethod(
- '_left',
- smalltalk.method({
- selector: 'left',
- category: 'accessing',
- fn: function (){
- var self=this;
- return self['@left'];
- return self;},
- source: unescape('left%0A%09%5Eleft'),
- messageSends: [],
- referencedClasses: []
- }),
- smalltalk.AssignmentNode);
- smalltalk.addMethod(
- '_left_',
- smalltalk.method({
- selector: 'left:',
- category: 'accessing',
- fn: function (aNode){
- var self=this;
- self['@left']=aNode;
- return self;},
- source: unescape('left%3A%20aNode%0A%09left%20%3A%3D%20aNode'),
- messageSends: [],
- referencedClasses: []
- }),
- smalltalk.AssignmentNode);
- smalltalk.addMethod(
- '_right',
- smalltalk.method({
- selector: 'right',
- category: 'accessing',
- fn: function (){
- var self=this;
- return self['@right'];
- return self;},
- source: unescape('right%0A%09%5Eright'),
- messageSends: [],
- referencedClasses: []
- }),
- smalltalk.AssignmentNode);
- smalltalk.addMethod(
- '_right_',
- smalltalk.method({
- selector: 'right:',
- category: 'accessing',
- fn: function (aNode){
- var self=this;
- self['@right']=aNode;
- return self;},
- source: unescape('right%3A%20aNode%0A%09right%20%3A%3D%20aNode'),
- messageSends: [],
- referencedClasses: []
- }),
- smalltalk.AssignmentNode);
- smalltalk.addMethod(
- '_accept_',
- smalltalk.method({
- selector: 'accept:',
- category: 'visiting',
- fn: function (aVisitor){
- var self=this;
- smalltalk.send(aVisitor, "_visitAssignmentNode_", [self]);
- return self;},
- source: unescape('accept%3A%20aVisitor%0A%09aVisitor%20visitAssignmentNode%3A%20self'),
- messageSends: ["visitAssignmentNode:"],
- referencedClasses: []
- }),
- smalltalk.AssignmentNode);
- smalltalk.addClass('BlockNode', smalltalk.Node, ['parameters'], 'Compiler');
- smalltalk.addMethod(
- '_parameters',
- smalltalk.method({
- selector: 'parameters',
- category: 'accessing',
- fn: function (){
- var self=this;
- return smalltalk.send(self['@parameters'], "_ifNil_", [(function(){return self['@parameters']=smalltalk.send(smalltalk.Array, "_new", []);})]);
- return self;},
- source: unescape('parameters%0A%09%5Eparameters%20ifNil%3A%20%5Bparameters%20%3A%3D%20Array%20new%5D'),
- messageSends: ["ifNil:", "new"],
- referencedClasses: [smalltalk.Array]
- }),
- smalltalk.BlockNode);
- smalltalk.addMethod(
- '_parameters_',
- smalltalk.method({
- selector: 'parameters:',
- category: 'accessing',
- fn: function (aCollection){
- var self=this;
- self['@parameters']=aCollection;
- return self;},
- source: unescape('parameters%3A%20aCollection%0A%09parameters%20%3A%3D%20aCollection'),
- messageSends: [],
- referencedClasses: []
- }),
- smalltalk.BlockNode);
- smalltalk.addMethod(
- '_accept_',
- smalltalk.method({
- selector: 'accept:',
- category: 'visiting',
- fn: function (aVisitor){
- var self=this;
- smalltalk.send(aVisitor, "_visitBlockNode_", [self]);
- return self;},
- source: unescape('accept%3A%20aVisitor%0A%09aVisitor%20visitBlockNode%3A%20self'),
- messageSends: ["visitBlockNode:"],
- referencedClasses: []
- }),
- smalltalk.BlockNode);
- smalltalk.addClass('SequenceNode', smalltalk.Node, ['temps'], 'Compiler');
- smalltalk.addMethod(
- '_temps',
- smalltalk.method({
- selector: 'temps',
- category: 'accessing',
- fn: function (){
- var self=this;
- return smalltalk.send(self['@temps'], "_ifNil_", [(function(){return [];})]);
- return self;},
- source: unescape('temps%0A%09%5Etemps%20ifNil%3A%20%5B%23%28%29%5D'),
- messageSends: ["ifNil:"],
- referencedClasses: []
- }),
- smalltalk.SequenceNode);
- smalltalk.addMethod(
- '_temps_',
- smalltalk.method({
- selector: 'temps:',
- category: 'accessing',
- fn: function (aCollection){
- var self=this;
- self['@temps']=aCollection;
- return self;},
- source: unescape('temps%3A%20aCollection%0A%09temps%20%3A%3D%20aCollection'),
- messageSends: [],
- referencedClasses: []
- }),
- smalltalk.SequenceNode);
- smalltalk.addMethod(
- '_asBlockSequenceNode',
- smalltalk.method({
- selector: 'asBlockSequenceNode',
- category: 'testing',
- fn: function (){
- var self=this;
- 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", []));
- return self;},
- 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'),
- messageSends: ["nodes:", "nodes", "temps:", "temps", "yourself", "new"],
- referencedClasses: [smalltalk.nil]
- }),
- smalltalk.SequenceNode);
- smalltalk.addMethod(
- '_accept_',
- smalltalk.method({
- selector: 'accept:',
- category: 'visiting',
- fn: function (aVisitor){
- var self=this;
- smalltalk.send(aVisitor, "_visitSequenceNode_", [self]);
- return self;},
- source: unescape('accept%3A%20aVisitor%0A%09aVisitor%20visitSequenceNode%3A%20self'),
- messageSends: ["visitSequenceNode:"],
- referencedClasses: []
- }),
- smalltalk.SequenceNode);
- smalltalk.addClass('BlockSequenceNode', smalltalk.SequenceNode, [], 'Compiler');
- smalltalk.addMethod(
- '_accept_',
- smalltalk.method({
- selector: 'accept:',
- category: 'visiting',
- fn: function (aVisitor){
- var self=this;
- smalltalk.send(aVisitor, "_visitBlockSequenceNode_", [self]);
- return self;},
- source: unescape('accept%3A%20aVisitor%0A%09aVisitor%20visitBlockSequenceNode%3A%20self'),
- messageSends: ["visitBlockSequenceNode:"],
- referencedClasses: []
- }),
- smalltalk.BlockSequenceNode);
- smalltalk.addClass('ReturnNode', smalltalk.Node, [], 'Compiler');
- smalltalk.addMethod(
- '_accept_',
- smalltalk.method({
- selector: 'accept:',
- category: 'visiting',
- fn: function (aVisitor){
- var self=this;
- smalltalk.send(aVisitor, "_visitReturnNode_", [self]);
- return self;},
- source: unescape('accept%3A%20aVisitor%0A%09aVisitor%20visitReturnNode%3A%20self'),
- messageSends: ["visitReturnNode:"],
- referencedClasses: []
- }),
- smalltalk.ReturnNode);
- smalltalk.addClass('ValueNode', smalltalk.Node, ['value'], 'Compiler');
- smalltalk.addMethod(
- '_value',
- smalltalk.method({
- selector: 'value',
- category: 'accessing',
- fn: function (){
- var self=this;
- return self['@value'];
- return self;},
- source: unescape('value%0A%09%5Evalue'),
- messageSends: [],
- referencedClasses: []
- }),
- smalltalk.ValueNode);
- smalltalk.addMethod(
- '_value_',
- smalltalk.method({
- selector: 'value:',
- category: 'accessing',
- fn: function (anObject){
- var self=this;
- self['@value']=anObject;
- return self;},
- source: unescape('value%3A%20anObject%0A%09value%20%3A%3D%20anObject'),
- messageSends: [],
- referencedClasses: []
- }),
- smalltalk.ValueNode);
- smalltalk.addMethod(
- '_accept_',
- smalltalk.method({
- selector: 'accept:',
- category: 'visiting',
- fn: function (aVisitor){
- var self=this;
- smalltalk.send(aVisitor, "_visitValueNode_", [self]);
- return self;},
- source: unescape('accept%3A%20aVisitor%0A%09aVisitor%20visitValueNode%3A%20self'),
- messageSends: ["visitValueNode:"],
- referencedClasses: []
- }),
- smalltalk.ValueNode);
- smalltalk.addClass('VariableNode', smalltalk.ValueNode, [], 'Compiler');
- smalltalk.addMethod(
- '_accept_',
- smalltalk.method({
- selector: 'accept:',
- category: 'visiting',
- fn: function (aVisitor){
- var self=this;
- smalltalk.send(aVisitor, "_visitVariableNode_", [self]);
- return self;},
- source: unescape('accept%3A%20aVisitor%0A%09aVisitor%20visitVariableNode%3A%20self'),
- messageSends: ["visitVariableNode:"],
- referencedClasses: []
- }),
- smalltalk.VariableNode);
- smalltalk.addClass('ClassReferenceNode', smalltalk.VariableNode, [], 'Compiler');
- smalltalk.addMethod(
- '_accept_',
- smalltalk.method({
- selector: 'accept:',
- category: 'visiting',
- fn: function (aVisitor){
- var self=this;
- smalltalk.send(aVisitor, "_visitClassReferenceNode_", [self]);
- return self;},
- source: unescape('accept%3A%20aVisitor%0A%09aVisitor%20visitClassReferenceNode%3A%20self'),
- messageSends: ["visitClassReferenceNode:"],
- referencedClasses: []
- }),
- smalltalk.ClassReferenceNode);
- smalltalk.addClass('JSStatementNode', smalltalk.Node, ['source'], 'Compiler');
- smalltalk.addMethod(
- '_source',
- smalltalk.method({
- selector: 'source',
- category: 'accessing',
- fn: function (){
- var self=this;
- return smalltalk.send(self['@source'], "_ifNil_", [(function(){return "";})]);
- return self;},
- source: unescape('source%0A%09%5Esource%20ifNil%3A%20%5B%27%27%5D'),
- messageSends: ["ifNil:"],
- referencedClasses: []
- }),
- smalltalk.JSStatementNode);
- smalltalk.addMethod(
- '_source_',
- smalltalk.method({
- selector: 'source:',
- category: 'accessing',
- fn: function (aString){
- var self=this;
- self['@source']=aString;
- return self;},
- source: unescape('source%3A%20aString%0A%09source%20%3A%3D%20aString'),
- messageSends: [],
- referencedClasses: []
- }),
- smalltalk.JSStatementNode);
- smalltalk.addMethod(
- '_accept_',
- smalltalk.method({
- selector: 'accept:',
- category: 'visiting',
- fn: function (aVisitor){
- var self=this;
- smalltalk.send(aVisitor, "_visitJSStatementNode_", [self]);
- return self;},
- source: unescape('accept%3A%20aVisitor%0A%09aVisitor%20visitJSStatementNode%3A%20self'),
- messageSends: ["visitJSStatementNode:"],
- referencedClasses: []
- }),
- smalltalk.JSStatementNode);
- smalltalk.addClass('NodeVisitor', smalltalk.Object, [], 'Compiler');
- smalltalk.addMethod(
- '_visit_',
- smalltalk.method({
- selector: 'visit:',
- category: 'visiting',
- fn: function (aNode){
- var self=this;
- smalltalk.send(aNode, "_accept_", [self]);
- return self;},
- source: unescape('visit%3A%20aNode%0A%09aNode%20accept%3A%20self'),
- messageSends: ["accept:"],
- referencedClasses: []
- }),
- smalltalk.NodeVisitor);
- smalltalk.addMethod(
- '_visitNode_',
- smalltalk.method({
- selector: 'visitNode:',
- category: 'visiting',
- fn: function (aNode){
- var self=this;
- return self;},
- source: unescape('visitNode%3A%20aNode'),
- messageSends: [],
- referencedClasses: []
- }),
- smalltalk.NodeVisitor);
- smalltalk.addMethod(
- '_visitMethodNode_',
- smalltalk.method({
- selector: 'visitMethodNode:',
- category: 'visiting',
- fn: function (aNode){
- var self=this;
- smalltalk.send(self, "_visitNode_", [aNode]);
- return self;},
- source: unescape('visitMethodNode%3A%20aNode%0A%09self%20visitNode%3A%20aNode'),
- messageSends: ["visitNode:"],
- referencedClasses: []
- }),
- smalltalk.NodeVisitor);
- smalltalk.addMethod(
- '_visitSequenceNode_',
- smalltalk.method({
- selector: 'visitSequenceNode:',
- category: 'visiting',
- fn: function (aNode){
- var self=this;
- smalltalk.send(self, "_visitNode_", [aNode]);
- return self;},
- source: unescape('visitSequenceNode%3A%20aNode%0A%09self%20visitNode%3A%20aNode'),
- messageSends: ["visitNode:"],
- referencedClasses: []
- }),
- smalltalk.NodeVisitor);
- smalltalk.addMethod(
- '_visitBlockSequenceNode_',
- smalltalk.method({
- selector: 'visitBlockSequenceNode:',
- category: 'visiting',
- fn: function (aNode){
- var self=this;
- smalltalk.send(self, "_visitSequenceNode_", [aNode]);
- return self;},
- source: unescape('visitBlockSequenceNode%3A%20aNode%0A%09self%20visitSequenceNode%3A%20aNode'),
- messageSends: ["visitSequenceNode:"],
- referencedClasses: []
- }),
- smalltalk.NodeVisitor);
- smalltalk.addMethod(
- '_visitBlockNode_',
- smalltalk.method({
- selector: 'visitBlockNode:',
- category: 'visiting',
- fn: function (aNode){
- var self=this;
- smalltalk.send(self, "_visitNode_", [aNode]);
- return self;},
- source: unescape('visitBlockNode%3A%20aNode%0A%09self%20visitNode%3A%20aNode'),
- messageSends: ["visitNode:"],
- referencedClasses: []
- }),
- smalltalk.NodeVisitor);
- smalltalk.addMethod(
- '_visitReturnNode_',
- smalltalk.method({
- selector: 'visitReturnNode:',
- category: 'visiting',
- fn: function (aNode){
- var self=this;
- smalltalk.send(self, "_visitNode_", [aNode]);
- return self;},
- source: unescape('visitReturnNode%3A%20aNode%0A%09self%20visitNode%3A%20aNode'),
- messageSends: ["visitNode:"],
- referencedClasses: []
- }),
- smalltalk.NodeVisitor);
- smalltalk.addMethod(
- '_visitSendNode_',
- smalltalk.method({
- selector: 'visitSendNode:',
- category: 'visiting',
- fn: function (aNode){
- var self=this;
- smalltalk.send(self, "_visitNode_", [aNode]);
- return self;},
- source: unescape('visitSendNode%3A%20aNode%0A%09self%20visitNode%3A%20aNode'),
- messageSends: ["visitNode:"],
- referencedClasses: []
- }),
- smalltalk.NodeVisitor);
- smalltalk.addMethod(
- '_visitCascadeNode_',
- smalltalk.method({
- selector: 'visitCascadeNode:',
- category: 'visiting',
- fn: function (aNode){
- var self=this;
- smalltalk.send(self, "_visitNode_", [aNode]);
- return self;},
- source: unescape('visitCascadeNode%3A%20aNode%0A%09self%20visitNode%3A%20aNode'),
- messageSends: ["visitNode:"],
- referencedClasses: []
- }),
- smalltalk.NodeVisitor);
- smalltalk.addMethod(
- '_visitValueNode_',
- smalltalk.method({
- selector: 'visitValueNode:',
- category: 'visiting',
- fn: function (aNode){
- var self=this;
- smalltalk.send(self, "_visitNode_", [aNode]);
- return self;},
- source: unescape('visitValueNode%3A%20aNode%0A%09self%20visitNode%3A%20aNode'),
- messageSends: ["visitNode:"],
- referencedClasses: []
- }),
- smalltalk.NodeVisitor);
- smalltalk.addMethod(
- '_visitVariableNode_',
- smalltalk.method({
- selector: 'visitVariableNode:',
- category: 'visiting',
- fn: function (aNode){
- var self=this;
- return self;},
- source: unescape('visitVariableNode%3A%20aNode'),
- messageSends: [],
- referencedClasses: []
- }),
- smalltalk.NodeVisitor);
- smalltalk.addMethod(
- '_visitAssignmentNode_',
- smalltalk.method({
- selector: 'visitAssignmentNode:',
- category: 'visiting',
- fn: function (aNode){
- var self=this;
- smalltalk.send(self, "_visitNode_", [aNode]);
- return self;},
- source: unescape('visitAssignmentNode%3A%20aNode%0A%09self%20visitNode%3A%20aNode'),
- messageSends: ["visitNode:"],
- referencedClasses: []
- }),
- smalltalk.NodeVisitor);
- smalltalk.addMethod(
- '_visitClassReferenceNode_',
- smalltalk.method({
- selector: 'visitClassReferenceNode:',
- category: 'visiting',
- fn: function (aNode){
- var self=this;
- (function($rec){smalltalk.send($rec, "_nextPutAll_", ["smalltalk."]);return smalltalk.send($rec, "_nextPutAll_", [smalltalk.send(aNode, "_value", [])]);})(self);
- return self;},
- 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'),
- messageSends: ["nextPutAll:", "value"],
- referencedClasses: []
- }),
- smalltalk.NodeVisitor);
- smalltalk.addMethod(
- '_visitJSStatementNode_',
- smalltalk.method({
- selector: 'visitJSStatementNode:',
- category: 'visiting',
- fn: function (aNode){
- var self=this;
- (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);
- return self;},
- 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'),
- messageSends: ["nextPutAll:", "source"],
- referencedClasses: []
- }),
- smalltalk.NodeVisitor);
- smalltalk.addClass('Compiler', smalltalk.NodeVisitor, ['stream', 'nestedBlocks', 'earlyReturn', 'currentClass', 'currentSelector', 'unknownVariables', 'tempVariables', 'messageSends', 'referencedClasses'], 'Compiler');
- smalltalk.addMethod(
- '_initialize',
- smalltalk.method({
- selector: 'initialize',
- category: 'initialization',
- fn: function (){
- var self=this;
- smalltalk.send(self, "_initialize", [], smalltalk.NodeVisitor);
- self['@stream']=smalltalk.send("", "_writeStream", []);
- self['@unknownVariables']=[];
- self['@tempVariables']=[];
- self['@messageSends']=[];
- classReferenced=[];
- return self;},
- 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'),
- messageSends: ["initialize", "writeStream"],
- referencedClasses: []
- }),
- smalltalk.Compiler);
- smalltalk.addMethod(
- '_parser',
- smalltalk.method({
- selector: 'parser',
- category: 'accessing',
- fn: function (){
- var self=this;
- return smalltalk.send(smalltalk.SmalltalkParser, "_new", []);
- return self;},
- source: unescape('parser%0A%09%5ESmalltalkParser%20new'),
- messageSends: ["new"],
- referencedClasses: [smalltalk.SmalltalkParser]
- }),
- smalltalk.Compiler);
- smalltalk.addMethod(
- '_currentClass',
- smalltalk.method({
- selector: 'currentClass',
- category: 'accessing',
- fn: function (){
- var self=this;
- return self['@currentClass'];
- return self;},
- source: unescape('currentClass%0A%09%5EcurrentClass'),
- messageSends: [],
- referencedClasses: []
- }),
- smalltalk.Compiler);
- smalltalk.addMethod(
- '_currentClass_',
- smalltalk.method({
- selector: 'currentClass:',
- category: 'accessing',
- fn: function (aClass){
- var self=this;
- self['@currentClass']=aClass;
- return self;},
- source: unescape('currentClass%3A%20aClass%0A%09currentClass%20%3A%3D%20aClass'),
- messageSends: [],
- referencedClasses: []
- }),
- smalltalk.Compiler);
- smalltalk.addMethod(
- '_loadExpression_',
- smalltalk.method({
- selector: 'loadExpression:',
- category: 'compiling',
- fn: function (aString){
- var self=this;
- smalltalk.send(smalltalk.DoIt, "_addCompiledMethod_", [smalltalk.send(self, "_eval_", [smalltalk.send(self, "_compileExpression_", [aString])])]);
- return smalltalk.send(smalltalk.send(smalltalk.DoIt, "_new", []), "_doIt", []);
- return self;},
- 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'),
- messageSends: ["addCompiledMethod:", "eval:", "compileExpression:", "doIt", "new"],
- referencedClasses: [smalltalk.nil]
- }),
- smalltalk.Compiler);
- smalltalk.addMethod(
- '_load_forClass_',
- smalltalk.method({
- selector: 'load:forClass:',
- category: 'compiling',
- fn: function (aString, aClass){
- var self=this;
- var compiled=nil;
- compiled=smalltalk.send(self, "_eval_", [smalltalk.send(self, "_compile_forClass_", [aString, aClass])]);
- smalltalk.send(self, "_setupClass_", [aClass]);
- return compiled;
- return self;},
- 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'),
- messageSends: ["eval:", "compile:forClass:", "setupClass:"],
- referencedClasses: []
- }),
- smalltalk.Compiler);
- smalltalk.addMethod(
- '_compile_forClass_',
- smalltalk.method({
- selector: 'compile:forClass:',
- category: 'compiling',
- fn: function (aString, aClass){
- var self=this;
- smalltalk.send(self, "_currentClass_", [aClass]);
- return smalltalk.send(self, "_compile_", [aString]);
- return self;},
- source: unescape('compile%3A%20aString%20forClass%3A%20aClass%0A%09self%20currentClass%3A%20aClass.%0A%09%5Eself%20compile%3A%20aString'),
- messageSends: ["currentClass:", "compile:"],
- referencedClasses: []
- }),
- smalltalk.Compiler);
- smalltalk.addMethod(
- '_compileExpression_',
- smalltalk.method({
- selector: 'compileExpression:',
- category: 'compiling',
- fn: function (aString){
- var self=this;
- smalltalk.send(self, "_currentClass_", [smalltalk.DoIt]);
- return smalltalk.send(self, "_compileNode_", [smalltalk.send(self, "_parseExpression_", [aString])]);
- return self;},
- source: unescape('compileExpression%3A%20aString%0A%09self%20currentClass%3A%20DoIt.%0A%09%5Eself%20compileNode%3A%20%28self%20parseExpression%3A%20aString%29'),
- messageSends: ["currentClass:", "compileNode:", "parseExpression:"],
- referencedClasses: [smalltalk.nil]
- }),
- smalltalk.Compiler);
- smalltalk.addMethod(
- '_eval_',
- smalltalk.method({
- selector: 'eval:',
- category: 'compiling',
- fn: function (aString){
- var self=this;
- return eval(aString);
- return self;},
- source: unescape('eval%3A%20aString%0A%09%3Creturn%20eval%28aString%29%3E'),
- messageSends: [],
- referencedClasses: []
- }),
- smalltalk.Compiler);
- smalltalk.addMethod(
- '_compile_',
- smalltalk.method({
- selector: 'compile:',
- category: 'compiling',
- fn: function (aString){
- var self=this;
- return smalltalk.send(self, "_compileNode_", [smalltalk.send(self, "_parse_", [aString])]);
- return self;},
- source: unescape('compile%3A%20aString%0A%09%5Eself%20compileNode%3A%20%28self%20parse%3A%20aString%29'),
- messageSends: ["compileNode:", "parse:"],
- referencedClasses: []
- }),
- smalltalk.Compiler);
- smalltalk.addMethod(
- '_compileNode_',
- smalltalk.method({
- selector: 'compileNode:',
- category: 'compiling',
- fn: function (aNode){
- var self=this;
- self['@stream']=smalltalk.send("", "_writeStream", []);
- smalltalk.send(self, "_visit_", [aNode]);
- return smalltalk.send(self['@stream'], "_contents", []);
- return self;},
- source: unescape('compileNode%3A%20aNode%0A%09stream%20%3A%3D%20%27%27%20writeStream.%0A%09self%20visit%3A%20aNode.%0A%09%5Estream%20contents'),
- messageSends: ["writeStream", "visit:", "contents"],
- referencedClasses: []
- }),
- smalltalk.Compiler);
- smalltalk.addMethod(
- '_visit_',
- smalltalk.method({
- selector: 'visit:',
- category: 'visiting',
- fn: function (aNode){
- var self=this;
- smalltalk.send(aNode, "_accept_", [self]);
- return self;},
- source: unescape('visit%3A%20aNode%0A%09aNode%20accept%3A%20self'),
- messageSends: ["accept:"],
- referencedClasses: []
- }),
- smalltalk.Compiler);
- smalltalk.addMethod(
- '_visitMethodNode_',
- smalltalk.method({
- selector: 'visitMethodNode:',
- category: 'visiting',
- fn: function (aNode){
- var self=this;
- var str=nil;
- var currentSelector=nil;
- self['@currentSelector']=smalltalk.send(smalltalk.send(aNode, "_selector", []), "_asSelector", []);
- self['@nestedBlocks']=(0);
- self['@earlyReturn']=false;
- self['@messageSends']=[];
- self['@referencedClasses']=[];
- self['@unknownVariables']=[];
- self['@tempVariables']=[];
- (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']);
- (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']);
- smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("fn%3A%20function%28")]);
- 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")]);})]);
- (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']);
- str=self['@stream'];
- self['@stream']=smalltalk.send("", "_writeStream", []);
- smalltalk.send(smalltalk.send(aNode, "_nodes", []), "_do_", [(function(each){return smalltalk.send(self, "_visit_", [each]);})]);
- smalltalk.send(self['@earlyReturn'], "_ifTrue_", [(function(){return smalltalk.send(str, "_nextPutAll_", [unescape("try%7B")]);})]);
- smalltalk.send(str, "_nextPutAll_", [smalltalk.send(self['@stream'], "_contents", [])]);
- self['@stream']=str;
- (function($rec){smalltalk.send($rec, "_lf", []);return smalltalk.send($rec, "_nextPutAll_", [unescape("return%20self%3B")]);})(self['@stream']);
- 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']);})]);
- smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%7D")]);
- (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']);
- smalltalk.send(self['@referencedClasses'], "_do_separatedBy_", [(function(each){return smalltalk.send(self['@stream'], "_nextPutAll_", [each]);}), (function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%2C")]);})]);
- smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%5D")]);
- smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%7D%29")]);
- return self;},
- 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'),
- messageSends: ["asSelector", "selector", "nextPutAll:", "lf", unescape("%2C"), "escaped", "source", "do:separatedBy:", "arguments", "add:", "writeStream", "do:", "nodes", "visit:", "ifTrue:", "contents", "printString", "asJavascript"],
- referencedClasses: [smalltalk.String]
- }),
- smalltalk.Compiler);
- smalltalk.addMethod(
- '_visitBlockNode_',
- smalltalk.method({
- selector: 'visitBlockNode:',
- category: 'visiting',
- fn: function (aNode){
- var self=this;
- smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28function%28")]);
- 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")]);})]);
- smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%29%7B")]);
- smalltalk.send(smalltalk.send(aNode, "_nodes", []), "_do_", [(function(each){return smalltalk.send(self, "_visit_", [each]);})]);
- smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%7D%29")]);
- return self;},
- 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'),
- messageSends: ["nextPutAll:", "do:separatedBy:", "parameters", "add:", "do:", "nodes", "visit:"],
- referencedClasses: []
- }),
- smalltalk.Compiler);
- smalltalk.addMethod(
- '_visitSequenceNode_',
- smalltalk.method({
- selector: 'visitSequenceNode:',
- category: 'visiting',
- fn: function (aNode){
- var self=this;
- 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']);})]);
- 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", []);})]);
- return self;},
- 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'),
- messageSends: ["do:", "temps", "add:", "nextPutAll:", unescape("%2C"), "lf", "do:separatedBy:", "nodes", "visit:"],
- referencedClasses: []
- }),
- smalltalk.Compiler);
- smalltalk.addMethod(
- '_visitBlockSequenceNode_',
- smalltalk.method({
- selector: 'visitBlockSequenceNode:',
- category: 'visiting',
- fn: function (aNode){
- var self=this;
- var index=nil;
- self['@nestedBlocks']=smalltalk.send(self['@nestedBlocks'], "__plus", [(1)]);
- 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")]);})]);})]);
- self['@nestedBlocks']=smalltalk.send(self['@nestedBlocks'], "__minus", [(1)]);
- return self;},
- 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'),
- messageSends: [unescape("+"), "ifTrue:ifFalse:", "isEmpty", "nodes", "nextPutAll:", "do:", "temps", "add:", unescape("%2C"), "lf", "ifTrue:", unescape("%3D"), "size", "visit:", unescape("-")],
- referencedClasses: []
- }),
- smalltalk.Compiler);
- smalltalk.addMethod(
- '_visitReturnNode_',
- smalltalk.method({
- selector: 'visitReturnNode:',
- category: 'visiting',
- fn: function (aNode){
- var self=this;
- smalltalk.send(smalltalk.send(self['@nestedBlocks'], "__gt", [(0)]), "_ifTrue_", [(function(){return self['@earlyReturn']=true;})]);
- 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 "]);})]);
- smalltalk.send(smalltalk.send(aNode, "_nodes", []), "_do_", [(function(each){return smalltalk.send(self, "_visit_", [each]);})]);
- smalltalk.send(self['@earlyReturn'], "_ifTrue_", [(function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%7D%7D%29%7D%29%28%29")]);})]);
- return self;},
- 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'),
- messageSends: ["ifTrue:", unescape("%3E"), "ifTrue:ifFalse:", "nextPutAll:", "printString", "do:", "nodes", "visit:"],
- referencedClasses: []
- }),
- smalltalk.Compiler);
- smalltalk.addMethod(
- '_visitSendNode_',
- smalltalk.method({
- selector: 'visitSendNode:',
- category: 'visiting',
- fn: function (aNode){
- var self=this;
- var str=nil;
- var receiver=nil;
- var superSend=nil;
- str=self['@stream'];
- smalltalk.send(smalltalk.send(self['@messageSends'], "_includes_", [smalltalk.send(aNode, "_selector", [])]), "_ifFalse_", [(function(){return smalltalk.send(self['@messageSends'], "_add_", [smalltalk.send(aNode, "_selector", [])]);})]);
- self['@stream']=smalltalk.send("", "_writeStream", []);
- smalltalk.send(self, "_visit_", [smalltalk.send(aNode, "_receiver", [])]);
- superSend=smalltalk.send(smalltalk.send(self['@stream'], "_contents", []), "__eq", ["super"]);
- receiver=smalltalk.send(superSend, "_ifTrue_ifFalse_", [(function(){return "self";}), (function(){return smalltalk.send(self['@stream'], "_contents", []);})]);
- smalltalk.send(str, "_nextPutAll_", [unescape("smalltalk.send%28")]);
- smalltalk.send(str, "_nextPutAll_", [receiver]);
- 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")]);})]);
- smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%5D")]);
- 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", [])])])]);})]);
- smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%29")]);
- return self;},
- 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'),
- messageSends: ["ifFalse:", "includes:", "selector", "add:", "writeStream", "visit:", "receiver", unescape("%3D"), "contents", "ifTrue:ifFalse:", "nextPutAll:", unescape("%2C"), "asSelector", "do:separatedBy:", "arguments", "ifTrue:", "classNameFor:", "superclass", "currentClass"],
- referencedClasses: []
- }),
- smalltalk.Compiler);
- smalltalk.addMethod(
- '_visitCascadeNode_',
- smalltalk.method({
- selector: 'visitCascadeNode:',
- category: 'visiting',
- fn: function (aNode){
- var self=this;
- var index=nil;
- index=(0);
- smalltalk.send(smalltalk.send(self['@tempVariables'], "_includes_", ["$rec"]), "_ifFalse_", [(function(){return smalltalk.send(self['@tempVariables'], "_add_", ["$rec"]);})]);
- smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28function%28%24rec%29%7B")]);
- 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")]);})]);
- smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%7D%29%28")]);
- smalltalk.send(self, "_visit_", [smalltalk.send(aNode, "_receiver", [])]);
- smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%29")]);
- return self;},
- 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'),
- messageSends: ["ifFalse:", "includes:", "add:", "nextPutAll:", "do:", "nodes", unescape("+"), "ifTrue:", unescape("%3D"), "size", "receiver:", "value:", "new", "visit:", "receiver"],
- referencedClasses: [smalltalk.VariableNode]
- }),
- smalltalk.Compiler);
- smalltalk.addMethod(
- '_visitValueNode_',
- smalltalk.method({
- selector: 'visitValueNode:',
- category: 'visiting',
- fn: function (aNode){
- var self=this;
- smalltalk.send(self['@stream'], "_nextPutAll_", [smalltalk.send(smalltalk.send(aNode, "_value", []), "_asJavascript", [])]);
- return self;},
- source: unescape('visitValueNode%3A%20aNode%0A%09stream%20nextPutAll%3A%20aNode%20value%20asJavascript'),
- messageSends: ["nextPutAll:", "asJavascript", "value"],
- referencedClasses: []
- }),
- smalltalk.Compiler);
- smalltalk.addMethod(
- '_visitAssignmentNode_',
- smalltalk.method({
- selector: 'visitAssignmentNode:',
- category: 'visiting',
- fn: function (aNode){
- var self=this;
- smalltalk.send(self, "_visit_", [smalltalk.send(aNode, "_left", [])]);
- smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%3D")]);
- smalltalk.send(self, "_visit_", [smalltalk.send(aNode, "_right", [])]);
- return self;},
- 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'),
- messageSends: ["visit:", "left", "nextPutAll:", "right"],
- referencedClasses: []
- }),
- smalltalk.Compiler);
- smalltalk.addMethod(
- '_visitClassReferenceNode_',
- smalltalk.method({
- selector: 'visitClassReferenceNode:',
- category: 'visiting',
- fn: function (aNode){
- var self=this;
- var klass=nil;
- klass=smalltalk.send("smalltalk.", "__comma", [smalltalk.send(aNode, "_value", [])]);
- 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]);})]);})]);
- smalltalk.send(self['@stream'], "_nextPutAll_", [klass]);
- return self;},
- 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'),
- messageSends: [unescape("%2C"), "value", "ifTrue:", "isClass", "at:", "current", "ifFalse:", "includes:", "add:", "nextPutAll:"],
- referencedClasses: [smalltalk.Smalltalk]
- }),
- smalltalk.Compiler);
- smalltalk.addMethod(
- '_visitVariableNode_',
- smalltalk.method({
- selector: 'visitVariableNode:',
- category: 'visiting',
- fn: function (aNode){
- var self=this;
- 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", [])]);})]);
- return self;},
- 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'),
- messageSends: ["ifTrue:ifFalse:", "includes:", "allInstanceVariableNames", "currentClass", "value", "nextPutAll:", unescape("%2C"), "ifFalse:", "knownVariables", "add:"],
- referencedClasses: []
- }),
- smalltalk.Compiler);
- smalltalk.addMethod(
- '_visitJSStatementNode_',
- smalltalk.method({
- selector: 'visitJSStatementNode:',
- category: 'visiting',
- fn: function (aNode){
- var self=this;
- smalltalk.send(self['@stream'], "_nextPutAll_", [smalltalk.send(smalltalk.send(aNode, "_source", []), "_replace_with_", [unescape("%3E%3E"), unescape("%3E")])]);
- return self;},
- 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'),
- messageSends: ["nextPutAll:", "replace:with:", "source"],
- referencedClasses: []
- }),
- smalltalk.Compiler);
- smalltalk.addMethod(
- '_parse_',
- smalltalk.method({
- selector: 'parse:',
- category: 'compiling',
- fn: function (aString){
- var self=this;
- return smalltalk.send(smalltalk.send(self, "_parser", []), "_parse_", [smalltalk.send(aString, "_readStream", [])]);
- return self;},
- source: unescape('parse%3A%20aString%0A%20%20%20%20%5Eself%20parser%20parse%3A%20aString%20readStream'),
- messageSends: ["parse:", "parser", "readStream"],
- referencedClasses: []
- }),
- smalltalk.Compiler);
- smalltalk.addMethod(
- '_parseExpression_',
- smalltalk.method({
- selector: 'parseExpression:',
- category: 'compiling',
- fn: function (aString){
- var self=this;
- return smalltalk.send(self, "_parse_", [smalltalk.send(smalltalk.send(unescape("doIt%20%5E%5B"), "__comma", [aString]), "__comma", [unescape("%5D%20value")])]);
- return self;},
- 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'),
- messageSends: ["parse:", unescape("%2C")],
- referencedClasses: []
- }),
- smalltalk.Compiler);
- smalltalk.addMethod(
- '_unknownVariables',
- smalltalk.method({
- selector: 'unknownVariables',
- category: 'accessing',
- fn: function (){
- var self=this;
- return smalltalk.send(self['@unknownVariables'], "_copy", []);
- return self;},
- source: unescape('unknownVariables%0A%09%5EunknownVariables%20copy'),
- messageSends: ["copy"],
- referencedClasses: []
- }),
- smalltalk.Compiler);
- smalltalk.addMethod(
- '_pseudoVariables',
- smalltalk.method({
- selector: 'pseudoVariables',
- category: 'accessing',
- fn: function (){
- var self=this;
- return ["self", "super", "true", "false", "nil", "thisContext"];
- return self;},
- 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'),
- messageSends: [],
- referencedClasses: []
- }),
- smalltalk.Compiler);
- smalltalk.addMethod(
- '_tempVariables',
- smalltalk.method({
- selector: 'tempVariables',
- category: 'accessing',
- fn: function (){
- var self=this;
- return smalltalk.send(self['@tempVariables'], "_copy", []);
- return self;},
- source: unescape('tempVariables%0A%09%5EtempVariables%20copy'),
- messageSends: ["copy"],
- referencedClasses: []
- }),
- smalltalk.Compiler);
- smalltalk.addMethod(
- '_knownVariables',
- smalltalk.method({
- selector: 'knownVariables',
- category: 'accessing',
- fn: function (){
- var self=this;
- return (function($rec){smalltalk.send($rec, "_addAll_", [smalltalk.send(self, "_tempVariables", [])]);return smalltalk.send($rec, "_yourself", []);})(smalltalk.send(self, "_pseudoVariables", []));
- return self;},
- source: unescape('knownVariables%0A%09%5Eself%20pseudoVariables%20%0A%09%09addAll%3A%20self%20tempVariables%3B%0A%09%09yourself'),
- messageSends: ["addAll:", "tempVariables", "yourself", "pseudoVariables"],
- referencedClasses: []
- }),
- smalltalk.Compiler);
- smalltalk.addMethod(
- '_recompile_',
- smalltalk.method({
- selector: 'recompile:',
- category: 'compiling',
- fn: function (aClass){
- var self=this;
- 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]);})]);
- smalltalk.send(smalltalk.send(aClass, "_isMetaclass", []), "_ifFalse_", [(function(){return smalltalk.send(self, "_recompile_", [smalltalk.send(aClass, "_class", [])]);})]);
- return self;},
- 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'),
- messageSends: ["do:", "methodDictionary", "load:forClass:", "source", "category:", "category", "addCompiledMethod:", "ifFalse:", "isMetaclass", "recompile:", "class"],
- referencedClasses: []
- }),
- smalltalk.Compiler);
- smalltalk.addMethod(
- '_recompileAll',
- smalltalk.method({
- selector: 'recompileAll',
- category: 'compiling',
- fn: function (){
- var self=this;
- 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)]);})]);
- return self;},
- 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'),
- messageSends: ["do:", "classes", "current", "show:", "cr", "valueWithTimeout:", "recompile:"],
- referencedClasses: [smalltalk.Smalltalk,smalltalk.nil]
- }),
- smalltalk.Compiler);
- smalltalk.addMethod(
- '_classNameFor_',
- smalltalk.method({
- selector: 'classNameFor:',
- category: 'accessing',
- fn: function (aClass){
- var self=this;
- 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", []);})]);})]);
- return self;},
- 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'),
- messageSends: ["ifTrue:ifFalse:", "isMetaclass", unescape("%2C"), "name", "instanceClass", "isNil"],
- referencedClasses: []
- }),
- smalltalk.Compiler);
- smalltalk.addMethod(
- '_visitFailure_',
- smalltalk.method({
- selector: 'visitFailure:',
- category: 'visiting',
- fn: function (aFailure){
- var self=this;
- smalltalk.send(self, "_error_", [smalltalk.send(aFailure, "_asString", [])]);
- return self;},
- source: unescape('visitFailure%3A%20aFailure%0A%09self%20error%3A%20aFailure%20asString'),
- messageSends: ["error:", "asString"],
- referencedClasses: []
- }),
- smalltalk.Compiler);
- smalltalk.addMethod(
- '_setupClass_',
- smalltalk.method({
- selector: 'setupClass:',
- category: 'compiling',
- fn: function (aClass){
- var self=this;
- smalltalk.init(aClass);
- return self;},
- source: unescape('setupClass%3A%20aClass%0A%09%3Csmalltalk.init%28aClass%29%3E'),
- messageSends: [],
- referencedClasses: []
- }),
- smalltalk.Compiler);
- smalltalk.addMethod(
- '_recompile_',
- smalltalk.method({
- selector: 'recompile:',
- category: 'compiling',
- fn: function (aClass){
- var self=this;
- smalltalk.send(smalltalk.send(aClass, "_methodDictionary", []), "_do_", [(function(each){var method=nil;
- 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]);})]);
- smalltalk.send(smalltalk.send(aClass, "_isMetaclass", []), "_ifFalse_", [(function(){return smalltalk.send(self, "_recompile_", [smalltalk.send(aClass, "_class", [])]);})]);
- return self;},
- 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'),
- messageSends: ["do:", "methodDictionary", "load:forClass:", "new", "source", "category:", "category", "addCompiledMethod:", "ifFalse:", "isMetaclass", "recompile:", "class"],
- referencedClasses: []
- }),
- smalltalk.Compiler.klass);
- smalltalk.addMethod(
- '_recompileAll',
- smalltalk.method({
- selector: 'recompileAll',
- category: 'compiling',
- fn: function (){
- var self=this;
- smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.Smalltalk, "_current", []), "_classes", []), "_do_", [(function(each){return smalltalk.send(self, "_recompile_", [each]);})]);
- return self;},
- source: unescape('recompileAll%0A%09Smalltalk%20current%20classes%20do%3A%20%5B%3Aeach%20%7C%0A%09%09self%20recompile%3A%20each%5D'),
- messageSends: ["do:", "classes", "current", "recompile:"],
- referencedClasses: [smalltalk.Smalltalk]
- }),
- smalltalk.Compiler.klass);
- smalltalk.addClass('DoIt', smalltalk.Object, [], 'Compiler');
- smalltalk.addMethod(
- '_doIt',
- smalltalk.method({
- selector: 'doIt',
- category: '',
- fn: function (){
- var self=this;
- return smalltalk.send((function(){return smalltalk.send(smalltalk.send(smalltalk.StrippedExporter, "_new", []), "_exportCategory_", ["IDE"]);}), "_value", []);
- return self;},
- source: unescape('doIt%20%5E%5BStrippedExporter%20new%20exportCategory%3A%20%27IDE%27%5D%20value'),
- messageSends: ["value", "exportCategory:", "new"],
- referencedClasses: [smalltalk.StrippedExporter]
- }),
- smalltalk.DoIt);
|