Compiler-IR.js 131 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798991001011021031041051061071081091101111121131141151161171181191201211221231241251261271281291301311321331341351361371381391401411421431441451461471481491501511521531541551561571581591601611621631641651661671681691701711721731741751761771781791801811821831841851861871881891901911921931941951961971981992002012022032042052062072082092102112122132142152162172182192202212222232242252262272282292302312322332342352362372382392402412422432442452462472482492502512522532542552562572582592602612622632642652662672682692702712722732742752762772782792802812822832842852862872882892902912922932942952962972982993003013023033043053063073083093103113123133143153163173183193203213223233243253263273283293303313323333343353363373383393403413423433443453463473483493503513523533543553563573583593603613623633643653663673683693703713723733743753763773783793803813823833843853863873883893903913923933943953963973983994004014024034044054064074084094104114124134144154164174184194204214224234244254264274284294304314324334344354364374384394404414424434444454464474484494504514524534544554564574584594604614624634644654664674684694704714724734744754764774784794804814824834844854864874884894904914924934944954964974984995005015025035045055065075085095105115125135145155165175185195205215225235245255265275285295305315325335345355365375385395405415425435445455465475485495505515525535545555565575585595605615625635645655665675685695705715725735745755765775785795805815825835845855865875885895905915925935945955965975985996006016026036046056066076086096106116126136146156166176186196206216226236246256266276286296306316326336346356366376386396406416426436446456466476486496506516526536546556566576586596606616626636646656666676686696706716726736746756766776786796806816826836846856866876886896906916926936946956966976986997007017027037047057067077087097107117127137147157167177187197207217227237247257267277287297307317327337347357367377387397407417427437447457467477487497507517527537547557567577587597607617627637647657667677687697707717727737747757767777787797807817827837847857867877887897907917927937947957967977987998008018028038048058068078088098108118128138148158168178188198208218228238248258268278288298308318328338348358368378388398408418428438448458468478488498508518528538548558568578588598608618628638648658668678688698708718728738748758768778788798808818828838848858868878888898908918928938948958968978988999009019029039049059069079089099109119129139149159169179189199209219229239249259269279289299309319329339349359369379389399409419429439449459469479489499509519529539549559569579589599609619629639649659669679689699709719729739749759769779789799809819829839849859869879889899909919929939949959969979989991000100110021003100410051006100710081009101010111012101310141015101610171018101910201021102210231024102510261027102810291030103110321033103410351036103710381039104010411042104310441045104610471048104910501051105210531054105510561057105810591060106110621063106410651066106710681069107010711072107310741075107610771078107910801081108210831084108510861087108810891090109110921093109410951096109710981099110011011102110311041105110611071108110911101111111211131114111511161117111811191120112111221123112411251126112711281129113011311132113311341135113611371138113911401141114211431144114511461147114811491150115111521153115411551156115711581159116011611162116311641165116611671168116911701171117211731174117511761177117811791180118111821183118411851186118711881189119011911192119311941195119611971198119912001201120212031204120512061207120812091210121112121213121412151216121712181219122012211222122312241225122612271228122912301231123212331234123512361237123812391240124112421243124412451246124712481249125012511252125312541255125612571258125912601261126212631264126512661267126812691270127112721273127412751276127712781279128012811282128312841285128612871288128912901291129212931294129512961297129812991300130113021303130413051306130713081309131013111312131313141315131613171318131913201321132213231324132513261327132813291330133113321333133413351336133713381339134013411342134313441345134613471348134913501351135213531354135513561357135813591360136113621363136413651366136713681369137013711372137313741375137613771378137913801381138213831384138513861387138813891390139113921393139413951396139713981399140014011402140314041405140614071408140914101411141214131414141514161417141814191420142114221423142414251426142714281429143014311432143314341435143614371438143914401441144214431444144514461447144814491450145114521453145414551456145714581459146014611462146314641465146614671468146914701471147214731474147514761477147814791480148114821483148414851486148714881489149014911492149314941495149614971498149915001501150215031504150515061507150815091510151115121513151415151516151715181519152015211522152315241525152615271528152915301531153215331534153515361537153815391540154115421543154415451546154715481549155015511552155315541555155615571558155915601561156215631564156515661567156815691570157115721573157415751576157715781579158015811582158315841585158615871588158915901591159215931594159515961597159815991600160116021603160416051606160716081609161016111612161316141615161616171618161916201621162216231624162516261627162816291630163116321633163416351636163716381639164016411642164316441645164616471648164916501651165216531654165516561657165816591660166116621663166416651666166716681669167016711672167316741675167616771678167916801681168216831684168516861687168816891690169116921693169416951696169716981699170017011702170317041705170617071708170917101711171217131714171517161717171817191720172117221723172417251726172717281729173017311732173317341735173617371738173917401741174217431744174517461747174817491750175117521753175417551756175717581759176017611762176317641765176617671768176917701771177217731774177517761777177817791780178117821783178417851786178717881789179017911792179317941795179617971798179918001801180218031804180518061807180818091810181118121813181418151816181718181819182018211822182318241825182618271828182918301831183218331834183518361837183818391840184118421843184418451846184718481849185018511852185318541855185618571858185918601861186218631864186518661867186818691870187118721873187418751876187718781879188018811882188318841885188618871888188918901891189218931894189518961897189818991900190119021903190419051906190719081909191019111912191319141915191619171918191919201921192219231924192519261927192819291930193119321933193419351936193719381939194019411942194319441945194619471948194919501951195219531954195519561957195819591960196119621963196419651966196719681969197019711972197319741975197619771978197919801981198219831984198519861987198819891990199119921993199419951996199719981999200020012002200320042005200620072008200920102011201220132014201520162017201820192020202120222023202420252026202720282029203020312032203320342035203620372038203920402041204220432044204520462047204820492050205120522053205420552056205720582059206020612062206320642065206620672068206920702071207220732074207520762077207820792080208120822083208420852086208720882089209020912092209320942095209620972098209921002101210221032104210521062107210821092110211121122113211421152116211721182119212021212122212321242125212621272128212921302131213221332134213521362137213821392140214121422143214421452146214721482149215021512152215321542155215621572158215921602161216221632164216521662167216821692170217121722173217421752176217721782179218021812182218321842185218621872188218921902191219221932194219521962197219821992200220122022203220422052206220722082209221022112212221322142215221622172218221922202221222222232224222522262227222822292230223122322233223422352236223722382239224022412242224322442245224622472248224922502251225222532254225522562257225822592260226122622263226422652266226722682269227022712272227322742275227622772278227922802281228222832284228522862287228822892290229122922293229422952296229722982299230023012302230323042305230623072308230923102311231223132314231523162317231823192320232123222323232423252326232723282329233023312332233323342335233623372338233923402341234223432344234523462347234823492350235123522353235423552356235723582359236023612362236323642365236623672368236923702371237223732374237523762377237823792380238123822383238423852386238723882389239023912392239323942395239623972398239924002401240224032404240524062407240824092410241124122413241424152416241724182419242024212422242324242425242624272428242924302431243224332434243524362437243824392440244124422443244424452446244724482449245024512452245324542455245624572458245924602461246224632464246524662467246824692470247124722473247424752476247724782479248024812482248324842485248624872488248924902491249224932494249524962497249824992500250125022503250425052506250725082509251025112512251325142515251625172518251925202521252225232524252525262527252825292530253125322533253425352536253725382539254025412542254325442545254625472548254925502551255225532554255525562557255825592560256125622563256425652566256725682569257025712572257325742575257625772578257925802581258225832584258525862587258825892590259125922593259425952596259725982599260026012602260326042605260626072608260926102611261226132614261526162617261826192620262126222623262426252626262726282629263026312632263326342635263626372638263926402641264226432644264526462647264826492650265126522653265426552656265726582659266026612662266326642665266626672668266926702671267226732674267526762677267826792680268126822683268426852686268726882689269026912692269326942695269626972698269927002701270227032704270527062707270827092710271127122713271427152716271727182719272027212722272327242725272627272728272927302731273227332734273527362737273827392740274127422743274427452746274727482749275027512752275327542755275627572758275927602761276227632764276527662767276827692770277127722773277427752776277727782779278027812782278327842785278627872788278927902791279227932794279527962797279827992800280128022803280428052806280728082809281028112812281328142815281628172818281928202821282228232824282528262827282828292830283128322833283428352836283728382839284028412842284328442845284628472848284928502851285228532854285528562857285828592860286128622863286428652866286728682869287028712872287328742875287628772878287928802881288228832884288528862887288828892890289128922893289428952896289728982899290029012902290329042905290629072908290929102911291229132914291529162917291829192920292129222923292429252926292729282929293029312932293329342935293629372938293929402941294229432944294529462947294829492950295129522953295429552956295729582959296029612962296329642965296629672968296929702971297229732974297529762977297829792980298129822983298429852986298729882989299029912992299329942995299629972998299930003001300230033004300530063007300830093010301130123013301430153016301730183019302030213022302330243025302630273028302930303031303230333034303530363037303830393040304130423043304430453046304730483049305030513052305330543055305630573058305930603061306230633064306530663067306830693070307130723073307430753076307730783079308030813082308330843085308630873088308930903091309230933094309530963097309830993100310131023103310431053106310731083109311031113112311331143115311631173118311931203121312231233124312531263127312831293130313131323133313431353136313731383139314031413142314331443145314631473148314931503151315231533154315531563157315831593160316131623163316431653166316731683169317031713172317331743175317631773178317931803181318231833184318531863187318831893190319131923193319431953196319731983199320032013202320332043205320632073208320932103211321232133214321532163217321832193220322132223223322432253226322732283229323032313232323332343235323632373238323932403241324232433244324532463247324832493250325132523253325432553256325732583259326032613262326332643265326632673268326932703271327232733274327532763277327832793280328132823283328432853286328732883289329032913292329332943295329632973298329933003301330233033304330533063307330833093310331133123313331433153316331733183319332033213322332333243325332633273328332933303331333233333334333533363337333833393340334133423343334433453346334733483349335033513352335333543355335633573358335933603361336233633364336533663367336833693370337133723373337433753376337733783379338033813382338333843385338633873388338933903391339233933394339533963397339833993400340134023403340434053406340734083409341034113412341334143415341634173418341934203421342234233424342534263427342834293430343134323433343434353436343734383439344034413442344334443445344634473448344934503451345234533454345534563457345834593460346134623463346434653466346734683469347034713472347334743475347634773478347934803481348234833484348534863487348834893490349134923493349434953496349734983499350035013502350335043505350635073508350935103511351235133514351535163517351835193520352135223523352435253526352735283529353035313532353335343535353635373538353935403541354235433544354535463547354835493550355135523553355435553556355735583559356035613562356335643565356635673568356935703571357235733574357535763577357835793580358135823583358435853586358735883589359035913592359335943595359635973598359936003601360236033604360536063607360836093610361136123613361436153616361736183619362036213622362336243625362636273628362936303631363236333634363536363637363836393640364136423643364436453646364736483649365036513652365336543655365636573658365936603661366236633664366536663667366836693670367136723673367436753676367736783679368036813682368336843685368636873688368936903691369236933694369536963697369836993700370137023703370437053706370737083709371037113712371337143715371637173718371937203721372237233724372537263727372837293730373137323733373437353736373737383739374037413742374337443745374637473748374937503751375237533754375537563757375837593760376137623763376437653766376737683769377037713772377337743775377637773778377937803781378237833784378537863787378837893790379137923793379437953796379737983799380038013802380338043805380638073808380938103811381238133814381538163817381838193820382138223823382438253826382738283829383038313832383338343835383638373838383938403841384238433844384538463847384838493850385138523853385438553856385738583859386038613862386338643865386638673868386938703871387238733874387538763877387838793880388138823883388438853886388738883889389038913892389338943895389638973898389939003901390239033904390539063907390839093910391139123913391439153916391739183919392039213922392339243925392639273928392939303931393239333934393539363937393839393940394139423943394439453946394739483949395039513952395339543955395639573958395939603961396239633964396539663967396839693970397139723973397439753976397739783979398039813982398339843985398639873988398939903991399239933994399539963997399839994000400140024003400440054006400740084009401040114012401340144015401640174018401940204021402240234024402540264027402840294030403140324033403440354036403740384039404040414042404340444045404640474048404940504051405240534054405540564057405840594060406140624063406440654066406740684069407040714072407340744075407640774078407940804081408240834084
  1. define("amber_core/Compiler-IR", ["amber_vm/smalltalk", "amber_vm/nil", "amber_vm/_st", "amber_vm/globals", "amber_core/Compiler-Core", "amber_core/Kernel-Objects", "amber_core/Kernel-Methods"], function(smalltalk,nil,_st, globals){
  2. smalltalk.addPackage('Compiler-IR');
  3. smalltalk.packages["Compiler-IR"].transport = {"type":"amd","amdNamespace":"amber_core"};
  4. smalltalk.addClass('IRASTTranslator', globals.NodeVisitor, ['source', 'theClass', 'method', 'sequence', 'nextAlias'], 'Compiler-IR');
  5. globals.IRASTTranslator.comment="I am the AST (abstract syntax tree) visitor responsible for building the intermediate representation graph.";
  6. smalltalk.addMethod(
  7. smalltalk.method({
  8. selector: "alias:",
  9. protocol: 'visiting',
  10. fn: function (aNode){
  11. var self=this;
  12. var variable;
  13. function $IRVariable(){return globals.IRVariable||(typeof IRVariable=="undefined"?nil:IRVariable)}
  14. function $AliasVar(){return globals.AliasVar||(typeof AliasVar=="undefined"?nil:AliasVar)}
  15. function $IRAssignment(){return globals.IRAssignment||(typeof IRAssignment=="undefined"?nil:IRAssignment)}
  16. return smalltalk.withContext(function($ctx1) {
  17. var $1,$2,$3,$4,$6,$5,$7,$8,$10,$11,$9,$12;
  18. $1=_st(aNode)._isImmutable();
  19. if(smalltalk.assert($1)){
  20. $2=self._visit_(aNode);
  21. $ctx1.sendIdx["visit:"]=1;
  22. return $2;
  23. };
  24. $3=_st($IRVariable())._new();
  25. $ctx1.sendIdx["new"]=1;
  26. $4=$3;
  27. $6=_st($AliasVar())._new();
  28. $ctx1.sendIdx["new"]=2;
  29. $5=_st($6)._name_("$".__comma(self._nextAlias()));
  30. _st($4)._variable_($5);
  31. $7=_st($3)._yourself();
  32. $ctx1.sendIdx["yourself"]=1;
  33. variable=$7;
  34. $8=self._sequence();
  35. $10=_st($IRAssignment())._new();
  36. _st($10)._add_(variable);
  37. $ctx1.sendIdx["add:"]=2;
  38. _st($10)._add_(self._visit_(aNode));
  39. $ctx1.sendIdx["add:"]=3;
  40. $11=_st($10)._yourself();
  41. $9=$11;
  42. _st($8)._add_($9);
  43. $ctx1.sendIdx["add:"]=1;
  44. _st(_st(self._method())._internalVariables())._add_(variable);
  45. $12=variable;
  46. return $12;
  47. }, function($ctx1) {$ctx1.fill(self,"alias:",{aNode:aNode,variable:variable},globals.IRASTTranslator)})},
  48. args: ["aNode"],
  49. source: "alias: aNode\x0a\x09| variable |\x0a\x0a\x09aNode isImmutable ifTrue: [ ^ self visit: aNode ].\x0a\x0a\x09variable := IRVariable new\x0a\x09\x09variable: (AliasVar new name: '$', self nextAlias);\x0a\x09\x09yourself.\x0a\x0a\x09self sequence add: (IRAssignment new\x0a\x09\x09add: variable;\x0a\x09\x09add: (self visit: aNode);\x0a\x09\x09yourself).\x0a\x0a\x09self method internalVariables add: variable.\x0a\x0a\x09^ variable",
  50. messageSends: ["ifTrue:", "isImmutable", "visit:", "variable:", "new", "name:", ",", "nextAlias", "yourself", "add:", "sequence", "internalVariables", "method"],
  51. referencedClasses: ["IRVariable", "AliasVar", "IRAssignment"]
  52. }),
  53. globals.IRASTTranslator);
  54. smalltalk.addMethod(
  55. smalltalk.method({
  56. selector: "aliasTemporally:",
  57. protocol: 'visiting',
  58. fn: function (aCollection){
  59. var self=this;
  60. var threshold,result;
  61. function $OrderedCollection(){return globals.OrderedCollection||(typeof OrderedCollection=="undefined"?nil:OrderedCollection)}
  62. return smalltalk.withContext(function($ctx1) {
  63. var $1,$2,$4,$3,$5;
  64. threshold=(0);
  65. _st(aCollection)._withIndexDo_((function(each,i){
  66. return smalltalk.withContext(function($ctx2) {
  67. $1=_st(each)._subtreeNeedsAliasing();
  68. if(smalltalk.assert($1)){
  69. threshold=i;
  70. return threshold;
  71. };
  72. }, function($ctx2) {$ctx2.fillBlock({each:each,i:i},$ctx1,1)})}));
  73. $ctx1.sendIdx["withIndexDo:"]=1;
  74. result=_st($OrderedCollection())._new();
  75. _st(aCollection)._withIndexDo_((function(each,i){
  76. return smalltalk.withContext(function($ctx2) {
  77. $2=result;
  78. $4=_st(i).__lt_eq(threshold);
  79. if(smalltalk.assert($4)){
  80. $3=self._alias_(each);
  81. } else {
  82. $3=self._visit_(each);
  83. };
  84. return _st($2)._add_($3);
  85. }, function($ctx2) {$ctx2.fillBlock({each:each,i:i},$ctx1,3)})}));
  86. $5=result;
  87. return $5;
  88. }, function($ctx1) {$ctx1.fill(self,"aliasTemporally:",{aCollection:aCollection,threshold:threshold,result:result},globals.IRASTTranslator)})},
  89. args: ["aCollection"],
  90. source: "aliasTemporally: aCollection\x0a\x09\x22https://github.com/NicolasPetton/amber/issues/296\x0a\x09\x0a\x09If a node is aliased, all preceding ones are aliased as well.\x0a\x09The tree is iterated twice. First we get the aliasing dependency,\x0a\x09then the aliasing itself is done\x22\x0a\x0a\x09| threshold result |\x0a\x09threshold := 0.\x0a\x09\x0a\x09aCollection withIndexDo: [ :each :i |\x0a\x09\x09each subtreeNeedsAliasing\x0a\x09\x09\x09ifTrue: [ threshold := i ] ].\x0a\x0a\x09result := OrderedCollection new.\x0a\x09aCollection withIndexDo: [ :each :i |\x0a\x09\x09result add: (i <= threshold\x0a\x09\x09\x09ifTrue: [ self alias: each ]\x0a\x09\x09\x09ifFalse: [ self visit: each ]) ].\x0a\x0a\x09^ result",
  91. messageSends: ["withIndexDo:", "ifTrue:", "subtreeNeedsAliasing", "new", "add:", "ifTrue:ifFalse:", "<=", "alias:", "visit:"],
  92. referencedClasses: ["OrderedCollection"]
  93. }),
  94. globals.IRASTTranslator);
  95. smalltalk.addMethod(
  96. smalltalk.method({
  97. selector: "method",
  98. protocol: 'accessing',
  99. fn: function (){
  100. var self=this;
  101. var $1;
  102. $1=self["@method"];
  103. return $1;
  104. },
  105. args: [],
  106. source: "method\x0a\x09^ method",
  107. messageSends: [],
  108. referencedClasses: []
  109. }),
  110. globals.IRASTTranslator);
  111. smalltalk.addMethod(
  112. smalltalk.method({
  113. selector: "method:",
  114. protocol: 'accessing',
  115. fn: function (anIRMethod){
  116. var self=this;
  117. self["@method"]=anIRMethod;
  118. return self},
  119. args: ["anIRMethod"],
  120. source: "method: anIRMethod\x0a\x09method := anIRMethod",
  121. messageSends: [],
  122. referencedClasses: []
  123. }),
  124. globals.IRASTTranslator);
  125. smalltalk.addMethod(
  126. smalltalk.method({
  127. selector: "nextAlias",
  128. protocol: 'accessing',
  129. fn: function (){
  130. var self=this;
  131. return smalltalk.withContext(function($ctx1) {
  132. var $1,$2;
  133. $1=self["@nextAlias"];
  134. if(($receiver = $1) == nil || $receiver == null){
  135. self["@nextAlias"]=(0);
  136. self["@nextAlias"];
  137. } else {
  138. $1;
  139. };
  140. self["@nextAlias"]=_st(self["@nextAlias"]).__plus((1));
  141. $2=_st(self["@nextAlias"])._asString();
  142. return $2;
  143. }, function($ctx1) {$ctx1.fill(self,"nextAlias",{},globals.IRASTTranslator)})},
  144. args: [],
  145. source: "nextAlias\x0a\x09nextAlias ifNil: [ nextAlias := 0 ].\x0a\x09nextAlias := nextAlias + 1.\x0a\x09^ nextAlias asString",
  146. messageSends: ["ifNil:", "+", "asString"],
  147. referencedClasses: []
  148. }),
  149. globals.IRASTTranslator);
  150. smalltalk.addMethod(
  151. smalltalk.method({
  152. selector: "sequence",
  153. protocol: 'accessing',
  154. fn: function (){
  155. var self=this;
  156. var $1;
  157. $1=self["@sequence"];
  158. return $1;
  159. },
  160. args: [],
  161. source: "sequence\x0a\x09^ sequence",
  162. messageSends: [],
  163. referencedClasses: []
  164. }),
  165. globals.IRASTTranslator);
  166. smalltalk.addMethod(
  167. smalltalk.method({
  168. selector: "sequence:",
  169. protocol: 'accessing',
  170. fn: function (anIRSequence){
  171. var self=this;
  172. self["@sequence"]=anIRSequence;
  173. return self},
  174. args: ["anIRSequence"],
  175. source: "sequence: anIRSequence\x0a\x09sequence := anIRSequence",
  176. messageSends: [],
  177. referencedClasses: []
  178. }),
  179. globals.IRASTTranslator);
  180. smalltalk.addMethod(
  181. smalltalk.method({
  182. selector: "source",
  183. protocol: 'accessing',
  184. fn: function (){
  185. var self=this;
  186. var $1;
  187. $1=self["@source"];
  188. return $1;
  189. },
  190. args: [],
  191. source: "source\x0a\x09^ source",
  192. messageSends: [],
  193. referencedClasses: []
  194. }),
  195. globals.IRASTTranslator);
  196. smalltalk.addMethod(
  197. smalltalk.method({
  198. selector: "source:",
  199. protocol: 'accessing',
  200. fn: function (aString){
  201. var self=this;
  202. self["@source"]=aString;
  203. return self},
  204. args: ["aString"],
  205. source: "source: aString\x0a\x09source := aString",
  206. messageSends: [],
  207. referencedClasses: []
  208. }),
  209. globals.IRASTTranslator);
  210. smalltalk.addMethod(
  211. smalltalk.method({
  212. selector: "theClass",
  213. protocol: 'accessing',
  214. fn: function (){
  215. var self=this;
  216. var $1;
  217. $1=self["@theClass"];
  218. return $1;
  219. },
  220. args: [],
  221. source: "theClass\x0a\x09^ theClass",
  222. messageSends: [],
  223. referencedClasses: []
  224. }),
  225. globals.IRASTTranslator);
  226. smalltalk.addMethod(
  227. smalltalk.method({
  228. selector: "theClass:",
  229. protocol: 'accessing',
  230. fn: function (aClass){
  231. var self=this;
  232. self["@theClass"]=aClass;
  233. return self},
  234. args: ["aClass"],
  235. source: "theClass: aClass\x0a\x09theClass := aClass",
  236. messageSends: [],
  237. referencedClasses: []
  238. }),
  239. globals.IRASTTranslator);
  240. smalltalk.addMethod(
  241. smalltalk.method({
  242. selector: "visitAssignmentNode:",
  243. protocol: 'visiting',
  244. fn: function (aNode){
  245. var self=this;
  246. var left,right,assignment;
  247. function $IRAssignment(){return globals.IRAssignment||(typeof IRAssignment=="undefined"?nil:IRAssignment)}
  248. return smalltalk.withContext(function($ctx1) {
  249. var $1,$3,$4,$2,$5;
  250. right=self._visit_(_st(aNode)._right());
  251. $ctx1.sendIdx["visit:"]=1;
  252. left=self._visit_(_st(aNode)._left());
  253. $1=self._sequence();
  254. $3=_st($IRAssignment())._new();
  255. _st($3)._add_(left);
  256. $ctx1.sendIdx["add:"]=2;
  257. _st($3)._add_(right);
  258. $4=_st($3)._yourself();
  259. $2=$4;
  260. _st($1)._add_($2);
  261. $ctx1.sendIdx["add:"]=1;
  262. $5=left;
  263. return $5;
  264. }, function($ctx1) {$ctx1.fill(self,"visitAssignmentNode:",{aNode:aNode,left:left,right:right,assignment:assignment},globals.IRASTTranslator)})},
  265. args: ["aNode"],
  266. source: "visitAssignmentNode: aNode\x0a\x09| left right assignment |\x0a\x09right := self visit: aNode right.\x0a\x09left := self visit: aNode left.\x0a\x09self sequence add: (IRAssignment new\x0a\x09\x09add: left;\x0a\x09\x09add: right;\x0a\x09\x09yourself).\x0a\x09^ left",
  267. messageSends: ["visit:", "right", "left", "add:", "sequence", "new", "yourself"],
  268. referencedClasses: ["IRAssignment"]
  269. }),
  270. globals.IRASTTranslator);
  271. smalltalk.addMethod(
  272. smalltalk.method({
  273. selector: "visitBlockNode:",
  274. protocol: 'visiting',
  275. fn: function (aNode){
  276. var self=this;
  277. var closure;
  278. function $IRClosure(){return globals.IRClosure||(typeof IRClosure=="undefined"?nil:IRClosure)}
  279. function $IRTempDeclaration(){return globals.IRTempDeclaration||(typeof IRTempDeclaration=="undefined"?nil:IRTempDeclaration)}
  280. return smalltalk.withContext(function($ctx1) {
  281. var $1,$2,$3,$4,$6,$5,$7,$8,$9;
  282. $1=_st($IRClosure())._new();
  283. $ctx1.sendIdx["new"]=1;
  284. _st($1)._arguments_(_st(aNode)._parameters());
  285. _st($1)._requiresSmalltalkContext_(_st(aNode)._requiresSmalltalkContext());
  286. $2=$1;
  287. $3=_st(aNode)._scope();
  288. $ctx1.sendIdx["scope"]=1;
  289. _st($2)._scope_($3);
  290. $ctx1.sendIdx["scope:"]=1;
  291. $4=_st($1)._yourself();
  292. $ctx1.sendIdx["yourself"]=1;
  293. closure=$4;
  294. $6=_st(aNode)._scope();
  295. $ctx1.sendIdx["scope"]=2;
  296. $5=_st($6)._temps();
  297. _st($5)._do_((function(each){
  298. return smalltalk.withContext(function($ctx2) {
  299. $7=_st($IRTempDeclaration())._new();
  300. _st($7)._name_(_st(each)._name());
  301. _st($7)._scope_(_st(aNode)._scope());
  302. $8=_st($7)._yourself();
  303. return _st(closure)._add_($8);
  304. $ctx2.sendIdx["add:"]=1;
  305. }, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1,1)})}));
  306. $ctx1.sendIdx["do:"]=1;
  307. _st(_st(aNode)._nodes())._do_((function(each){
  308. return smalltalk.withContext(function($ctx2) {
  309. return _st(closure)._add_(self._visit_(each));
  310. }, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1,2)})}));
  311. $9=closure;
  312. return $9;
  313. }, function($ctx1) {$ctx1.fill(self,"visitBlockNode:",{aNode:aNode,closure:closure},globals.IRASTTranslator)})},
  314. args: ["aNode"],
  315. source: "visitBlockNode: aNode\x0a\x09| closure |\x0a\x09closure := IRClosure new\x0a\x09\x09arguments: aNode parameters;\x0a\x09\x09requiresSmalltalkContext: aNode requiresSmalltalkContext;\x0a\x09\x09scope: aNode scope;\x0a\x09\x09yourself.\x0a\x09aNode scope temps do: [ :each |\x0a\x09\x09closure add: (IRTempDeclaration new\x0a\x09\x09\x09name: each name;\x0a\x09\x09\x09scope: aNode scope;\x0a\x09\x09\x09yourself) ].\x0a\x09aNode nodes do: [ :each | closure add: (self visit: each) ].\x0a\x09^ closure",
  316. messageSends: ["arguments:", "new", "parameters", "requiresSmalltalkContext:", "requiresSmalltalkContext", "scope:", "scope", "yourself", "do:", "temps", "add:", "name:", "name", "nodes", "visit:"],
  317. referencedClasses: ["IRClosure", "IRTempDeclaration"]
  318. }),
  319. globals.IRASTTranslator);
  320. smalltalk.addMethod(
  321. smalltalk.method({
  322. selector: "visitBlockSequenceNode:",
  323. protocol: 'visiting',
  324. fn: function (aNode){
  325. var self=this;
  326. function $IRBlockSequence(){return globals.IRBlockSequence||(typeof IRBlockSequence=="undefined"?nil:IRBlockSequence)}
  327. function $IRBlockReturn(){return globals.IRBlockReturn||(typeof IRBlockReturn=="undefined"?nil:IRBlockReturn)}
  328. return smalltalk.withContext(function($ctx1) {
  329. var $2,$3,$5,$4,$6,$7,$10,$9,$8,$11,$13,$14,$17,$16,$15,$18,$12,$1;
  330. $2=_st($IRBlockSequence())._new();
  331. $ctx1.sendIdx["new"]=1;
  332. $1=self._withSequence_do_($2,(function(){
  333. return smalltalk.withContext(function($ctx2) {
  334. $3=_st(aNode)._nodes();
  335. $ctx2.sendIdx["nodes"]=1;
  336. return _st($3)._ifNotEmpty_((function(){
  337. return smalltalk.withContext(function($ctx3) {
  338. $5=_st(aNode)._nodes();
  339. $ctx3.sendIdx["nodes"]=2;
  340. $4=_st($5)._allButLast();
  341. _st($4)._do_((function(each){
  342. return smalltalk.withContext(function($ctx4) {
  343. $6=self._sequence();
  344. $ctx4.sendIdx["sequence"]=1;
  345. $7=self._visitOrAlias_(each);
  346. $ctx4.sendIdx["visitOrAlias:"]=1;
  347. return _st($6)._add_($7);
  348. $ctx4.sendIdx["add:"]=1;
  349. }, function($ctx4) {$ctx4.fillBlock({each:each},$ctx3,3)})}));
  350. $10=_st(aNode)._nodes();
  351. $ctx3.sendIdx["nodes"]=3;
  352. $9=_st($10)._last();
  353. $ctx3.sendIdx["last"]=1;
  354. $8=_st($9)._isReturnNode();
  355. if(smalltalk.assert($8)){
  356. return _st(self._sequence())._add_(self._visitOrAlias_(_st(_st(aNode)._nodes())._last()));
  357. } else {
  358. $11=self._sequence();
  359. $ctx3.sendIdx["sequence"]=2;
  360. $13=_st($IRBlockReturn())._new();
  361. $14=$13;
  362. $17=_st(aNode)._nodes();
  363. $ctx3.sendIdx["nodes"]=4;
  364. $16=_st($17)._last();
  365. $ctx3.sendIdx["last"]=2;
  366. $15=self._visitOrAlias_($16);
  367. $ctx3.sendIdx["visitOrAlias:"]=2;
  368. _st($14)._add_($15);
  369. $ctx3.sendIdx["add:"]=3;
  370. $18=_st($13)._yourself();
  371. $12=$18;
  372. return _st($11)._add_($12);
  373. $ctx3.sendIdx["add:"]=2;
  374. };
  375. }, function($ctx3) {$ctx3.fillBlock({},$ctx2,2)})}));
  376. }, function($ctx2) {$ctx2.fillBlock({},$ctx1,1)})}));
  377. return $1;
  378. }, function($ctx1) {$ctx1.fill(self,"visitBlockSequenceNode:",{aNode:aNode},globals.IRASTTranslator)})},
  379. args: ["aNode"],
  380. source: "visitBlockSequenceNode: aNode\x0a\x09^ self\x0a\x09\x09withSequence: IRBlockSequence new\x0a\x09\x09do: [\x0a\x09\x09\x09aNode nodes ifNotEmpty: [\x0a\x09\x09\x09\x09aNode nodes allButLast do: [ :each |\x0a\x09\x09\x09\x09\x09self sequence add: (self visitOrAlias: each) ].\x0a\x09\x09\x09\x09aNode nodes last isReturnNode\x0a\x09\x09\x09\x09\x09ifFalse: [ self sequence add: (IRBlockReturn new add: (self visitOrAlias: aNode nodes last); yourself) ]\x0a\x09\x09\x09\x09\x09ifTrue: [ self sequence add: (self visitOrAlias: aNode nodes last) ] ]]",
  381. messageSends: ["withSequence:do:", "new", "ifNotEmpty:", "nodes", "do:", "allButLast", "add:", "sequence", "visitOrAlias:", "ifFalse:ifTrue:", "isReturnNode", "last", "yourself"],
  382. referencedClasses: ["IRBlockSequence", "IRBlockReturn"]
  383. }),
  384. globals.IRASTTranslator);
  385. smalltalk.addMethod(
  386. smalltalk.method({
  387. selector: "visitCascadeNode:",
  388. protocol: 'visiting',
  389. fn: function (aNode){
  390. var self=this;
  391. var alias,receiver;
  392. function $VariableNode(){return globals.VariableNode||(typeof VariableNode=="undefined"?nil:VariableNode)}
  393. return smalltalk.withContext(function($ctx1) {
  394. var $2,$1,$3,$5,$4,$6;
  395. $2=_st(aNode)._receiver();
  396. $ctx1.sendIdx["receiver"]=1;
  397. $1=_st($2)._isImmutable();
  398. if(smalltalk.assert($1)){
  399. receiver=_st(aNode)._receiver();
  400. $ctx1.sendIdx["receiver"]=2;
  401. receiver;
  402. } else {
  403. alias=self._alias_(_st(aNode)._receiver());
  404. $ctx1.sendIdx["alias:"]=1;
  405. alias;
  406. receiver=_st(_st($VariableNode())._new())._binding_(_st(alias)._variable());
  407. receiver;
  408. };
  409. $3=_st(aNode)._nodes();
  410. $ctx1.sendIdx["nodes"]=1;
  411. _st($3)._do_((function(each){
  412. return smalltalk.withContext(function($ctx2) {
  413. return _st(each)._receiver_(receiver);
  414. }, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1,3)})}));
  415. $ctx1.sendIdx["do:"]=1;
  416. $5=_st(aNode)._nodes();
  417. $ctx1.sendIdx["nodes"]=2;
  418. $4=_st($5)._allButLast();
  419. _st($4)._do_((function(each){
  420. return smalltalk.withContext(function($ctx2) {
  421. return _st(self._sequence())._add_(self._visit_(each));
  422. }, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1,4)})}));
  423. $6=self._alias_(_st(_st(aNode)._nodes())._last());
  424. return $6;
  425. }, function($ctx1) {$ctx1.fill(self,"visitCascadeNode:",{aNode:aNode,alias:alias,receiver:receiver},globals.IRASTTranslator)})},
  426. args: ["aNode"],
  427. source: "visitCascadeNode: aNode\x0a\x09| alias receiver |\x0a\x0a\x09aNode receiver isImmutable \x0a\x09\x09ifTrue: [ receiver := aNode receiver ]\x0a\x09\x09ifFalse: [\x0a\x09\x09\x09alias := self alias: aNode receiver.\x0a\x09\x09\x09receiver := VariableNode new binding: alias variable ].\x0a\x09\x0a\x09aNode nodes do: [ :each |\x0a\x09\x09\x09each receiver: receiver ].\x0a\x0a\x09aNode nodes allButLast do: [ :each |\x0a\x09\x09self sequence add: (self visit: each) ].\x0a\x0a\x09^ self alias: aNode nodes last",
  428. messageSends: ["ifTrue:ifFalse:", "isImmutable", "receiver", "alias:", "binding:", "new", "variable", "do:", "nodes", "receiver:", "allButLast", "add:", "sequence", "visit:", "last"],
  429. referencedClasses: ["VariableNode"]
  430. }),
  431. globals.IRASTTranslator);
  432. smalltalk.addMethod(
  433. smalltalk.method({
  434. selector: "visitDynamicArrayNode:",
  435. protocol: 'visiting',
  436. fn: function (aNode){
  437. var self=this;
  438. var array;
  439. function $IRDynamicArray(){return globals.IRDynamicArray||(typeof IRDynamicArray=="undefined"?nil:IRDynamicArray)}
  440. return smalltalk.withContext(function($ctx1) {
  441. var $1;
  442. array=_st($IRDynamicArray())._new();
  443. _st(self._aliasTemporally_(_st(aNode)._nodes()))._do_((function(each){
  444. return smalltalk.withContext(function($ctx2) {
  445. return _st(array)._add_(each);
  446. }, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1,1)})}));
  447. $1=array;
  448. return $1;
  449. }, function($ctx1) {$ctx1.fill(self,"visitDynamicArrayNode:",{aNode:aNode,array:array},globals.IRASTTranslator)})},
  450. args: ["aNode"],
  451. source: "visitDynamicArrayNode: aNode\x0a\x09| array |\x0a\x09array := IRDynamicArray new.\x0a\x09(self aliasTemporally: aNode nodes) do: [ :each | array add: each ].\x0a\x09^ array",
  452. messageSends: ["new", "do:", "aliasTemporally:", "nodes", "add:"],
  453. referencedClasses: ["IRDynamicArray"]
  454. }),
  455. globals.IRASTTranslator);
  456. smalltalk.addMethod(
  457. smalltalk.method({
  458. selector: "visitDynamicDictionaryNode:",
  459. protocol: 'visiting',
  460. fn: function (aNode){
  461. var self=this;
  462. var dictionary;
  463. function $IRDynamicDictionary(){return globals.IRDynamicDictionary||(typeof IRDynamicDictionary=="undefined"?nil:IRDynamicDictionary)}
  464. return smalltalk.withContext(function($ctx1) {
  465. var $1;
  466. dictionary=_st($IRDynamicDictionary())._new();
  467. _st(self._aliasTemporally_(_st(aNode)._nodes()))._do_((function(each){
  468. return smalltalk.withContext(function($ctx2) {
  469. return _st(dictionary)._add_(each);
  470. }, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1,1)})}));
  471. $1=dictionary;
  472. return $1;
  473. }, function($ctx1) {$ctx1.fill(self,"visitDynamicDictionaryNode:",{aNode:aNode,dictionary:dictionary},globals.IRASTTranslator)})},
  474. args: ["aNode"],
  475. source: "visitDynamicDictionaryNode: aNode\x0a\x09| dictionary |\x0a\x09dictionary := IRDynamicDictionary new.\x0a\x09(self aliasTemporally: aNode nodes) do: [ :each | dictionary add: each ].\x0a\x09^ dictionary",
  476. messageSends: ["new", "do:", "aliasTemporally:", "nodes", "add:"],
  477. referencedClasses: ["IRDynamicDictionary"]
  478. }),
  479. globals.IRASTTranslator);
  480. smalltalk.addMethod(
  481. smalltalk.method({
  482. selector: "visitJSStatementNode:",
  483. protocol: 'visiting',
  484. fn: function (aNode){
  485. var self=this;
  486. function $IRVerbatim(){return globals.IRVerbatim||(typeof IRVerbatim=="undefined"?nil:IRVerbatim)}
  487. return smalltalk.withContext(function($ctx1) {
  488. var $2,$3,$1;
  489. $2=_st($IRVerbatim())._new();
  490. _st($2)._source_(_st(_st(aNode)._source())._crlfSanitized());
  491. $3=_st($2)._yourself();
  492. $1=$3;
  493. return $1;
  494. }, function($ctx1) {$ctx1.fill(self,"visitJSStatementNode:",{aNode:aNode},globals.IRASTTranslator)})},
  495. args: ["aNode"],
  496. source: "visitJSStatementNode: aNode\x0a\x09^ IRVerbatim new\x0a\x09\x09source: aNode source crlfSanitized;\x0a\x09\x09yourself",
  497. messageSends: ["source:", "new", "crlfSanitized", "source", "yourself"],
  498. referencedClasses: ["IRVerbatim"]
  499. }),
  500. globals.IRASTTranslator);
  501. smalltalk.addMethod(
  502. smalltalk.method({
  503. selector: "visitMethodNode:",
  504. protocol: 'visiting',
  505. fn: function (aNode){
  506. var self=this;
  507. function $IRMethod(){return globals.IRMethod||(typeof IRMethod=="undefined"?nil:IRMethod)}
  508. function $IRTempDeclaration(){return globals.IRTempDeclaration||(typeof IRTempDeclaration=="undefined"?nil:IRTempDeclaration)}
  509. function $IRReturn(){return globals.IRReturn||(typeof IRReturn=="undefined"?nil:IRReturn)}
  510. function $IRVariable(){return globals.IRVariable||(typeof IRVariable=="undefined"?nil:IRVariable)}
  511. return smalltalk.withContext(function($ctx1) {
  512. var $2,$3,$4,$5,$1,$7,$6,$8,$10,$11,$12,$13,$9,$14,$16,$15,$18,$19,$17,$20,$21,$22;
  513. $2=_st($IRMethod())._new();
  514. $ctx1.sendIdx["new"]=1;
  515. _st($2)._source_(_st(self._source())._crlfSanitized());
  516. _st($2)._theClass_(self._theClass());
  517. _st($2)._arguments_(_st(aNode)._arguments());
  518. _st($2)._selector_(_st(aNode)._selector());
  519. _st($2)._sendIndexes_(_st(aNode)._sendIndexes());
  520. _st($2)._superSends_(_st(aNode)._superSends());
  521. _st($2)._requiresSmalltalkContext_(_st(aNode)._requiresSmalltalkContext());
  522. _st($2)._classReferences_(_st(aNode)._classReferences());
  523. $3=$2;
  524. $4=_st(aNode)._scope();
  525. $ctx1.sendIdx["scope"]=1;
  526. _st($3)._scope_($4);
  527. $ctx1.sendIdx["scope:"]=1;
  528. $5=_st($2)._yourself();
  529. $ctx1.sendIdx["yourself"]=1;
  530. $1=$5;
  531. self._method_($1);
  532. $7=_st(aNode)._scope();
  533. $ctx1.sendIdx["scope"]=2;
  534. $6=_st($7)._temps();
  535. _st($6)._do_((function(each){
  536. return smalltalk.withContext(function($ctx2) {
  537. $8=self._method();
  538. $ctx2.sendIdx["method"]=1;
  539. $10=_st($IRTempDeclaration())._new();
  540. $ctx2.sendIdx["new"]=2;
  541. _st($10)._name_(_st(each)._name());
  542. $11=$10;
  543. $12=_st(aNode)._scope();
  544. $ctx2.sendIdx["scope"]=3;
  545. _st($11)._scope_($12);
  546. $13=_st($10)._yourself();
  547. $ctx2.sendIdx["yourself"]=2;
  548. $9=$13;
  549. return _st($8)._add_($9);
  550. $ctx2.sendIdx["add:"]=1;
  551. }, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1,1)})}));
  552. $ctx1.sendIdx["do:"]=1;
  553. _st(_st(aNode)._nodes())._do_((function(each){
  554. return smalltalk.withContext(function($ctx2) {
  555. $14=self._method();
  556. $ctx2.sendIdx["method"]=2;
  557. return _st($14)._add_(self._visit_(each));
  558. $ctx2.sendIdx["add:"]=2;
  559. }, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1,2)})}));
  560. $16=_st(aNode)._scope();
  561. $ctx1.sendIdx["scope"]=4;
  562. $15=_st($16)._hasLocalReturn();
  563. if(! smalltalk.assert($15)){
  564. $18=self._method();
  565. $ctx1.sendIdx["method"]=3;
  566. $19=_st($IRReturn())._new();
  567. $ctx1.sendIdx["new"]=3;
  568. $17=_st($18)._add_($19);
  569. $20=_st($IRVariable())._new();
  570. _st($20)._variable_(_st(_st(_st(aNode)._scope())._pseudoVars())._at_("self"));
  571. $21=_st($20)._yourself();
  572. _st($17)._add_($21);
  573. $ctx1.sendIdx["add:"]=3;
  574. };
  575. $22=self._method();
  576. return $22;
  577. }, function($ctx1) {$ctx1.fill(self,"visitMethodNode:",{aNode:aNode},globals.IRASTTranslator)})},
  578. args: ["aNode"],
  579. source: "visitMethodNode: aNode\x0a\x0a\x09self method: (IRMethod new\x0a\x09\x09source: self source crlfSanitized;\x0a\x09\x09theClass: self theClass;\x0a\x09\x09arguments: aNode arguments;\x0a\x09\x09selector: aNode selector;\x0a\x09\x09sendIndexes: aNode sendIndexes;\x0a\x09\x09superSends: aNode superSends;\x0a\x09\x09requiresSmalltalkContext: aNode requiresSmalltalkContext;\x0a\x09\x09classReferences: aNode classReferences;\x0a\x09\x09scope: aNode scope;\x0a\x09\x09yourself).\x0a\x0a\x09aNode scope temps do: [ :each |\x0a\x09\x09self method add: (IRTempDeclaration new\x0a\x09\x09\x09name: each name;\x0a\x09\x09\x09scope: aNode scope;\x0a\x09\x09\x09yourself) ].\x0a\x0a\x09aNode nodes do: [ :each | self method add: (self visit: each) ].\x0a\x0a\x09aNode scope hasLocalReturn ifFalse: [\x0a\x09\x09(self method add: IRReturn new) add: (IRVariable new\x0a\x09\x09\x09variable: (aNode scope pseudoVars at: 'self');\x0a\x09\x09\x09yourself) ].\x0a\x0a\x09^ self method",
  580. messageSends: ["method:", "source:", "new", "crlfSanitized", "source", "theClass:", "theClass", "arguments:", "arguments", "selector:", "selector", "sendIndexes:", "sendIndexes", "superSends:", "superSends", "requiresSmalltalkContext:", "requiresSmalltalkContext", "classReferences:", "classReferences", "scope:", "scope", "yourself", "do:", "temps", "add:", "method", "name:", "name", "nodes", "visit:", "ifFalse:", "hasLocalReturn", "variable:", "at:", "pseudoVars"],
  581. referencedClasses: ["IRMethod", "IRTempDeclaration", "IRReturn", "IRVariable"]
  582. }),
  583. globals.IRASTTranslator);
  584. smalltalk.addMethod(
  585. smalltalk.method({
  586. selector: "visitOrAlias:",
  587. protocol: 'visiting',
  588. fn: function (aNode){
  589. var self=this;
  590. return smalltalk.withContext(function($ctx1) {
  591. var $2,$1;
  592. $2=_st(aNode)._shouldBeAliased();
  593. if(smalltalk.assert($2)){
  594. $1=self._alias_(aNode);
  595. } else {
  596. $1=self._visit_(aNode);
  597. };
  598. return $1;
  599. }, function($ctx1) {$ctx1.fill(self,"visitOrAlias:",{aNode:aNode},globals.IRASTTranslator)})},
  600. args: ["aNode"],
  601. source: "visitOrAlias: aNode\x0a\x09^ aNode shouldBeAliased\x0a\x09\x09ifTrue: [ self alias: aNode ]\x0a\x09\x09ifFalse: [ self visit: aNode ]",
  602. messageSends: ["ifTrue:ifFalse:", "shouldBeAliased", "alias:", "visit:"],
  603. referencedClasses: []
  604. }),
  605. globals.IRASTTranslator);
  606. smalltalk.addMethod(
  607. smalltalk.method({
  608. selector: "visitReturnNode:",
  609. protocol: 'visiting',
  610. fn: function (aNode){
  611. var self=this;
  612. var return_;
  613. function $IRNonLocalReturn(){return globals.IRNonLocalReturn||(typeof IRNonLocalReturn=="undefined"?nil:IRNonLocalReturn)}
  614. function $IRReturn(){return globals.IRReturn||(typeof IRReturn=="undefined"?nil:IRReturn)}
  615. return smalltalk.withContext(function($ctx1) {
  616. var $1,$2;
  617. $1=_st(aNode)._nonLocalReturn();
  618. if(smalltalk.assert($1)){
  619. return_=_st($IRNonLocalReturn())._new();
  620. $ctx1.sendIdx["new"]=1;
  621. } else {
  622. return_=_st($IRReturn())._new();
  623. };
  624. _st(return_)._scope_(_st(aNode)._scope());
  625. _st(_st(aNode)._nodes())._do_((function(each){
  626. return smalltalk.withContext(function($ctx2) {
  627. return _st(return_)._add_(self._alias_(each));
  628. }, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1,3)})}));
  629. $2=return_;
  630. return $2;
  631. }, function($ctx1) {$ctx1.fill(self,"visitReturnNode:",{aNode:aNode,return_:return_},globals.IRASTTranslator)})},
  632. args: ["aNode"],
  633. source: "visitReturnNode: aNode\x0a\x09| return |\x0a\x09return := aNode nonLocalReturn\x0a\x09\x09ifTrue: [ IRNonLocalReturn new ]\x0a\x09\x09ifFalse: [ IRReturn new ].\x0a\x09return scope: aNode scope.\x0a\x09aNode nodes do: [ :each |\x0a\x09\x09return add: (self alias: each) ].\x0a\x09^ return",
  634. messageSends: ["ifTrue:ifFalse:", "nonLocalReturn", "new", "scope:", "scope", "do:", "nodes", "add:", "alias:"],
  635. referencedClasses: ["IRNonLocalReturn", "IRReturn"]
  636. }),
  637. globals.IRASTTranslator);
  638. smalltalk.addMethod(
  639. smalltalk.method({
  640. selector: "visitSendNode:",
  641. protocol: 'visiting',
  642. fn: function (aNode){
  643. var self=this;
  644. var send,all,receiver,arguments;
  645. function $IRSend(){return globals.IRSend||(typeof IRSend=="undefined"?nil:IRSend)}
  646. return smalltalk.withContext(function($ctx1) {
  647. var $1,$2,$3,$4;
  648. send=_st($IRSend())._new();
  649. $1=send;
  650. _st($1)._selector_(_st(aNode)._selector());
  651. $2=_st($1)._index_(_st(aNode)._index());
  652. $3=_st(aNode)._superSend();
  653. if(smalltalk.assert($3)){
  654. _st(send)._classSend_(_st(self._theClass())._superclass());
  655. };
  656. all=self._aliasTemporally_(_st([_st(aNode)._receiver()]).__comma(_st(aNode)._arguments()));
  657. receiver=_st(all)._first();
  658. arguments=_st(all)._allButFirst();
  659. _st(send)._add_(receiver);
  660. $ctx1.sendIdx["add:"]=1;
  661. _st(arguments)._do_((function(each){
  662. return smalltalk.withContext(function($ctx2) {
  663. return _st(send)._add_(each);
  664. }, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1,2)})}));
  665. $4=send;
  666. return $4;
  667. }, function($ctx1) {$ctx1.fill(self,"visitSendNode:",{aNode:aNode,send:send,all:all,receiver:receiver,arguments:arguments},globals.IRASTTranslator)})},
  668. args: ["aNode"],
  669. source: "visitSendNode: aNode\x0a\x09| send all receiver arguments |\x0a\x09send := IRSend new.\x0a\x09send\x0a\x09\x09selector: aNode selector;\x0a\x09\x09index: aNode index.\x0a\x09aNode superSend ifTrue: [ send classSend: self theClass superclass ].\x0a\x09\x0a\x09all := self aliasTemporally: { aNode receiver }, aNode arguments.\x0a\x09receiver := all first.\x0a\x09arguments := all allButFirst.\x0a\x0a\x09send add: receiver.\x0a\x09arguments do: [ :each | send add: each ].\x0a\x0a\x09^ send",
  670. messageSends: ["new", "selector:", "selector", "index:", "index", "ifTrue:", "superSend", "classSend:", "superclass", "theClass", "aliasTemporally:", ",", "receiver", "arguments", "first", "allButFirst", "add:", "do:"],
  671. referencedClasses: ["IRSend"]
  672. }),
  673. globals.IRASTTranslator);
  674. smalltalk.addMethod(
  675. smalltalk.method({
  676. selector: "visitSequenceNode:",
  677. protocol: 'visiting',
  678. fn: function (aNode){
  679. var self=this;
  680. function $IRSequence(){return globals.IRSequence||(typeof IRSequence=="undefined"?nil:IRSequence)}
  681. return smalltalk.withContext(function($ctx1) {
  682. var $2,$1;
  683. $1=self._withSequence_do_(_st($IRSequence())._new(),(function(){
  684. return smalltalk.withContext(function($ctx2) {
  685. return _st(_st(aNode)._nodes())._do_((function(each){
  686. var instruction;
  687. return smalltalk.withContext(function($ctx3) {
  688. instruction=self._visitOrAlias_(each);
  689. instruction;
  690. $2=_st(instruction)._isVariable();
  691. if(! smalltalk.assert($2)){
  692. return _st(self._sequence())._add_(instruction);
  693. };
  694. }, function($ctx3) {$ctx3.fillBlock({each:each,instruction:instruction},$ctx2,2)})}));
  695. }, function($ctx2) {$ctx2.fillBlock({},$ctx1,1)})}));
  696. return $1;
  697. }, function($ctx1) {$ctx1.fill(self,"visitSequenceNode:",{aNode:aNode},globals.IRASTTranslator)})},
  698. args: ["aNode"],
  699. source: "visitSequenceNode: aNode\x0a\x09^ self\x0a\x09\x09withSequence: IRSequence new\x0a\x09\x09do: [\x0a\x09\x09\x09aNode nodes do: [ :each | | instruction |\x0a\x09\x09\x09\x09instruction := self visitOrAlias: each.\x0a\x09\x09\x09\x09instruction isVariable ifFalse: [\x0a\x09\x09\x09\x09\x09self sequence add: instruction ] ]]",
  700. messageSends: ["withSequence:do:", "new", "do:", "nodes", "visitOrAlias:", "ifFalse:", "isVariable", "add:", "sequence"],
  701. referencedClasses: ["IRSequence"]
  702. }),
  703. globals.IRASTTranslator);
  704. smalltalk.addMethod(
  705. smalltalk.method({
  706. selector: "visitValueNode:",
  707. protocol: 'visiting',
  708. fn: function (aNode){
  709. var self=this;
  710. function $IRValue(){return globals.IRValue||(typeof IRValue=="undefined"?nil:IRValue)}
  711. return smalltalk.withContext(function($ctx1) {
  712. var $2,$3,$1;
  713. $2=_st($IRValue())._new();
  714. _st($2)._value_(_st(aNode)._value());
  715. $3=_st($2)._yourself();
  716. $1=$3;
  717. return $1;
  718. }, function($ctx1) {$ctx1.fill(self,"visitValueNode:",{aNode:aNode},globals.IRASTTranslator)})},
  719. args: ["aNode"],
  720. source: "visitValueNode: aNode\x0a\x09^ IRValue new\x0a\x09\x09value: aNode value;\x0a\x09\x09yourself",
  721. messageSends: ["value:", "new", "value", "yourself"],
  722. referencedClasses: ["IRValue"]
  723. }),
  724. globals.IRASTTranslator);
  725. smalltalk.addMethod(
  726. smalltalk.method({
  727. selector: "visitVariableNode:",
  728. protocol: 'visiting',
  729. fn: function (aNode){
  730. var self=this;
  731. function $IRVariable(){return globals.IRVariable||(typeof IRVariable=="undefined"?nil:IRVariable)}
  732. return smalltalk.withContext(function($ctx1) {
  733. var $2,$3,$1;
  734. $2=_st($IRVariable())._new();
  735. _st($2)._variable_(_st(aNode)._binding());
  736. $3=_st($2)._yourself();
  737. $1=$3;
  738. return $1;
  739. }, function($ctx1) {$ctx1.fill(self,"visitVariableNode:",{aNode:aNode},globals.IRASTTranslator)})},
  740. args: ["aNode"],
  741. source: "visitVariableNode: aNode\x0a\x09^ IRVariable new\x0a\x09\x09variable: aNode binding;\x0a\x09\x09yourself",
  742. messageSends: ["variable:", "new", "binding", "yourself"],
  743. referencedClasses: ["IRVariable"]
  744. }),
  745. globals.IRASTTranslator);
  746. smalltalk.addMethod(
  747. smalltalk.method({
  748. selector: "withSequence:do:",
  749. protocol: 'accessing',
  750. fn: function (aSequence,aBlock){
  751. var self=this;
  752. var outerSequence;
  753. return smalltalk.withContext(function($ctx1) {
  754. outerSequence=self._sequence();
  755. self._sequence_(aSequence);
  756. $ctx1.sendIdx["sequence:"]=1;
  757. _st(aBlock)._value();
  758. self._sequence_(outerSequence);
  759. return aSequence;
  760. }, function($ctx1) {$ctx1.fill(self,"withSequence:do:",{aSequence:aSequence,aBlock:aBlock,outerSequence:outerSequence},globals.IRASTTranslator)})},
  761. args: ["aSequence", "aBlock"],
  762. source: "withSequence: aSequence do: aBlock\x0a\x09| outerSequence |\x0a\x09outerSequence := self sequence.\x0a\x09self sequence: aSequence.\x0a\x09aBlock value.\x0a\x09self sequence: outerSequence.\x0a\x09^ aSequence",
  763. messageSends: ["sequence", "sequence:", "value"],
  764. referencedClasses: []
  765. }),
  766. globals.IRASTTranslator);
  767. smalltalk.addClass('IRInstruction', globals.Object, ['parent', 'instructions'], 'Compiler-IR');
  768. globals.IRInstruction.comment="I am the abstract root class of the IR (intermediate representation) instructions class hierarchy.\x0aThe IR graph is used to emit JavaScript code using a JSStream.";
  769. smalltalk.addMethod(
  770. smalltalk.method({
  771. selector: "accept:",
  772. protocol: 'visiting',
  773. fn: function (aVisitor){
  774. var self=this;
  775. return smalltalk.withContext(function($ctx1) {
  776. var $1;
  777. $1=_st(aVisitor)._visitIRInstruction_(self);
  778. return $1;
  779. }, function($ctx1) {$ctx1.fill(self,"accept:",{aVisitor:aVisitor},globals.IRInstruction)})},
  780. args: ["aVisitor"],
  781. source: "accept: aVisitor\x0a\x09^ aVisitor visitIRInstruction: self",
  782. messageSends: ["visitIRInstruction:"],
  783. referencedClasses: []
  784. }),
  785. globals.IRInstruction);
  786. smalltalk.addMethod(
  787. smalltalk.method({
  788. selector: "add:",
  789. protocol: 'building',
  790. fn: function (anObject){
  791. var self=this;
  792. return smalltalk.withContext(function($ctx1) {
  793. var $1;
  794. _st(anObject)._parent_(self);
  795. $1=_st(self._instructions())._add_(anObject);
  796. return $1;
  797. }, function($ctx1) {$ctx1.fill(self,"add:",{anObject:anObject},globals.IRInstruction)})},
  798. args: ["anObject"],
  799. source: "add: anObject\x0a\x09anObject parent: self.\x0a\x09^ self instructions add: anObject",
  800. messageSends: ["parent:", "add:", "instructions"],
  801. referencedClasses: []
  802. }),
  803. globals.IRInstruction);
  804. smalltalk.addMethod(
  805. smalltalk.method({
  806. selector: "canBeAssigned",
  807. protocol: 'testing',
  808. fn: function (){
  809. var self=this;
  810. return true;
  811. },
  812. args: [],
  813. source: "canBeAssigned\x0a\x09^ true",
  814. messageSends: [],
  815. referencedClasses: []
  816. }),
  817. globals.IRInstruction);
  818. smalltalk.addMethod(
  819. smalltalk.method({
  820. selector: "instructions",
  821. protocol: 'accessing',
  822. fn: function (){
  823. var self=this;
  824. function $OrderedCollection(){return globals.OrderedCollection||(typeof OrderedCollection=="undefined"?nil:OrderedCollection)}
  825. return smalltalk.withContext(function($ctx1) {
  826. var $2,$1;
  827. $2=self["@instructions"];
  828. if(($receiver = $2) == nil || $receiver == null){
  829. self["@instructions"]=_st($OrderedCollection())._new();
  830. $1=self["@instructions"];
  831. } else {
  832. $1=$2;
  833. };
  834. return $1;
  835. }, function($ctx1) {$ctx1.fill(self,"instructions",{},globals.IRInstruction)})},
  836. args: [],
  837. source: "instructions\x0a\x09^ instructions ifNil: [ instructions := OrderedCollection new ]",
  838. messageSends: ["ifNil:", "new"],
  839. referencedClasses: ["OrderedCollection"]
  840. }),
  841. globals.IRInstruction);
  842. smalltalk.addMethod(
  843. smalltalk.method({
  844. selector: "isClosure",
  845. protocol: 'testing',
  846. fn: function (){
  847. var self=this;
  848. return false;
  849. },
  850. args: [],
  851. source: "isClosure\x0a\x09^ false",
  852. messageSends: [],
  853. referencedClasses: []
  854. }),
  855. globals.IRInstruction);
  856. smalltalk.addMethod(
  857. smalltalk.method({
  858. selector: "isInlined",
  859. protocol: 'testing',
  860. fn: function (){
  861. var self=this;
  862. return false;
  863. },
  864. args: [],
  865. source: "isInlined\x0a\x09^ false",
  866. messageSends: [],
  867. referencedClasses: []
  868. }),
  869. globals.IRInstruction);
  870. smalltalk.addMethod(
  871. smalltalk.method({
  872. selector: "isLocalReturn",
  873. protocol: 'testing',
  874. fn: function (){
  875. var self=this;
  876. return false;
  877. },
  878. args: [],
  879. source: "isLocalReturn\x0a\x09^ false",
  880. messageSends: [],
  881. referencedClasses: []
  882. }),
  883. globals.IRInstruction);
  884. smalltalk.addMethod(
  885. smalltalk.method({
  886. selector: "isMethod",
  887. protocol: 'testing',
  888. fn: function (){
  889. var self=this;
  890. return false;
  891. },
  892. args: [],
  893. source: "isMethod\x0a\x09^ false",
  894. messageSends: [],
  895. referencedClasses: []
  896. }),
  897. globals.IRInstruction);
  898. smalltalk.addMethod(
  899. smalltalk.method({
  900. selector: "isReturn",
  901. protocol: 'testing',
  902. fn: function (){
  903. var self=this;
  904. return false;
  905. },
  906. args: [],
  907. source: "isReturn\x0a\x09^ false",
  908. messageSends: [],
  909. referencedClasses: []
  910. }),
  911. globals.IRInstruction);
  912. smalltalk.addMethod(
  913. smalltalk.method({
  914. selector: "isSend",
  915. protocol: 'testing',
  916. fn: function (){
  917. var self=this;
  918. return false;
  919. },
  920. args: [],
  921. source: "isSend\x0a\x09^ false",
  922. messageSends: [],
  923. referencedClasses: []
  924. }),
  925. globals.IRInstruction);
  926. smalltalk.addMethod(
  927. smalltalk.method({
  928. selector: "isSequence",
  929. protocol: 'testing',
  930. fn: function (){
  931. var self=this;
  932. return false;
  933. },
  934. args: [],
  935. source: "isSequence\x0a\x09^ false",
  936. messageSends: [],
  937. referencedClasses: []
  938. }),
  939. globals.IRInstruction);
  940. smalltalk.addMethod(
  941. smalltalk.method({
  942. selector: "isTempDeclaration",
  943. protocol: 'testing',
  944. fn: function (){
  945. var self=this;
  946. return false;
  947. },
  948. args: [],
  949. source: "isTempDeclaration\x0a\x09^ false",
  950. messageSends: [],
  951. referencedClasses: []
  952. }),
  953. globals.IRInstruction);
  954. smalltalk.addMethod(
  955. smalltalk.method({
  956. selector: "isVariable",
  957. protocol: 'testing',
  958. fn: function (){
  959. var self=this;
  960. return false;
  961. },
  962. args: [],
  963. source: "isVariable\x0a\x09^ false",
  964. messageSends: [],
  965. referencedClasses: []
  966. }),
  967. globals.IRInstruction);
  968. smalltalk.addMethod(
  969. smalltalk.method({
  970. selector: "method",
  971. protocol: 'accessing',
  972. fn: function (){
  973. var self=this;
  974. return smalltalk.withContext(function($ctx1) {
  975. var $1;
  976. $1=_st(self._parent())._method();
  977. return $1;
  978. }, function($ctx1) {$ctx1.fill(self,"method",{},globals.IRInstruction)})},
  979. args: [],
  980. source: "method\x0a\x09^ self parent method",
  981. messageSends: ["method", "parent"],
  982. referencedClasses: []
  983. }),
  984. globals.IRInstruction);
  985. smalltalk.addMethod(
  986. smalltalk.method({
  987. selector: "needsBoxingAsReceiver",
  988. protocol: 'testing',
  989. fn: function (){
  990. var self=this;
  991. return true;
  992. },
  993. args: [],
  994. source: "needsBoxingAsReceiver\x0a\x09^ true",
  995. messageSends: [],
  996. referencedClasses: []
  997. }),
  998. globals.IRInstruction);
  999. smalltalk.addMethod(
  1000. smalltalk.method({
  1001. selector: "parent",
  1002. protocol: 'accessing',
  1003. fn: function (){
  1004. var self=this;
  1005. var $1;
  1006. $1=self["@parent"];
  1007. return $1;
  1008. },
  1009. args: [],
  1010. source: "parent\x0a\x09^ parent",
  1011. messageSends: [],
  1012. referencedClasses: []
  1013. }),
  1014. globals.IRInstruction);
  1015. smalltalk.addMethod(
  1016. smalltalk.method({
  1017. selector: "parent:",
  1018. protocol: 'accessing',
  1019. fn: function (anIRInstruction){
  1020. var self=this;
  1021. self["@parent"]=anIRInstruction;
  1022. return self},
  1023. args: ["anIRInstruction"],
  1024. source: "parent: anIRInstruction\x0a\x09parent := anIRInstruction",
  1025. messageSends: [],
  1026. referencedClasses: []
  1027. }),
  1028. globals.IRInstruction);
  1029. smalltalk.addMethod(
  1030. smalltalk.method({
  1031. selector: "remove",
  1032. protocol: 'building',
  1033. fn: function (){
  1034. var self=this;
  1035. return smalltalk.withContext(function($ctx1) {
  1036. _st(self._parent())._remove_(self);
  1037. return self}, function($ctx1) {$ctx1.fill(self,"remove",{},globals.IRInstruction)})},
  1038. args: [],
  1039. source: "remove\x0a\x09self parent remove: self",
  1040. messageSends: ["remove:", "parent"],
  1041. referencedClasses: []
  1042. }),
  1043. globals.IRInstruction);
  1044. smalltalk.addMethod(
  1045. smalltalk.method({
  1046. selector: "remove:",
  1047. protocol: 'building',
  1048. fn: function (anIRInstruction){
  1049. var self=this;
  1050. return smalltalk.withContext(function($ctx1) {
  1051. _st(self._instructions())._remove_(anIRInstruction);
  1052. return self}, function($ctx1) {$ctx1.fill(self,"remove:",{anIRInstruction:anIRInstruction},globals.IRInstruction)})},
  1053. args: ["anIRInstruction"],
  1054. source: "remove: anIRInstruction\x0a\x09self instructions remove: anIRInstruction",
  1055. messageSends: ["remove:", "instructions"],
  1056. referencedClasses: []
  1057. }),
  1058. globals.IRInstruction);
  1059. smalltalk.addMethod(
  1060. smalltalk.method({
  1061. selector: "replace:with:",
  1062. protocol: 'building',
  1063. fn: function (anIRInstruction,anotherIRInstruction){
  1064. var self=this;
  1065. return smalltalk.withContext(function($ctx1) {
  1066. var $1;
  1067. _st(anotherIRInstruction)._parent_(self);
  1068. $1=self._instructions();
  1069. $ctx1.sendIdx["instructions"]=1;
  1070. _st($1)._at_put_(_st(self._instructions())._indexOf_(anIRInstruction),anotherIRInstruction);
  1071. return self}, function($ctx1) {$ctx1.fill(self,"replace:with:",{anIRInstruction:anIRInstruction,anotherIRInstruction:anotherIRInstruction},globals.IRInstruction)})},
  1072. args: ["anIRInstruction", "anotherIRInstruction"],
  1073. source: "replace: anIRInstruction with: anotherIRInstruction\x0a\x09anotherIRInstruction parent: self.\x0a\x09self instructions\x0a\x09\x09at: (self instructions indexOf: anIRInstruction)\x0a\x09\x09put: anotherIRInstruction",
  1074. messageSends: ["parent:", "at:put:", "instructions", "indexOf:"],
  1075. referencedClasses: []
  1076. }),
  1077. globals.IRInstruction);
  1078. smalltalk.addMethod(
  1079. smalltalk.method({
  1080. selector: "replaceWith:",
  1081. protocol: 'building',
  1082. fn: function (anIRInstruction){
  1083. var self=this;
  1084. return smalltalk.withContext(function($ctx1) {
  1085. _st(self._parent())._replace_with_(self,anIRInstruction);
  1086. return self}, function($ctx1) {$ctx1.fill(self,"replaceWith:",{anIRInstruction:anIRInstruction},globals.IRInstruction)})},
  1087. args: ["anIRInstruction"],
  1088. source: "replaceWith: anIRInstruction\x0a\x09self parent replace: self with: anIRInstruction",
  1089. messageSends: ["replace:with:", "parent"],
  1090. referencedClasses: []
  1091. }),
  1092. globals.IRInstruction);
  1093. smalltalk.addMethod(
  1094. smalltalk.method({
  1095. selector: "scope",
  1096. protocol: 'accessing',
  1097. fn: function (){
  1098. var self=this;
  1099. return smalltalk.withContext(function($ctx1) {
  1100. var $2,$1;
  1101. $2=self._parent();
  1102. if(($receiver = $2) == nil || $receiver == null){
  1103. $1=$2;
  1104. } else {
  1105. var node;
  1106. node=$receiver;
  1107. $1=_st(node)._scope();
  1108. };
  1109. return $1;
  1110. }, function($ctx1) {$ctx1.fill(self,"scope",{},globals.IRInstruction)})},
  1111. args: [],
  1112. source: "scope\x0a\x09^ self parent ifNotNil: [ :node | \x0a\x09\x09node scope ]",
  1113. messageSends: ["ifNotNil:", "parent", "scope"],
  1114. referencedClasses: []
  1115. }),
  1116. globals.IRInstruction);
  1117. smalltalk.addMethod(
  1118. smalltalk.method({
  1119. selector: "on:",
  1120. protocol: 'instance creation',
  1121. fn: function (aBuilder){
  1122. var self=this;
  1123. return smalltalk.withContext(function($ctx1) {
  1124. var $2,$3,$1;
  1125. $2=self._new();
  1126. _st($2)._builder_(aBuilder);
  1127. $3=_st($2)._yourself();
  1128. $1=$3;
  1129. return $1;
  1130. }, function($ctx1) {$ctx1.fill(self,"on:",{aBuilder:aBuilder},globals.IRInstruction.klass)})},
  1131. args: ["aBuilder"],
  1132. source: "on: aBuilder\x0a\x09^ self new\x0a\x09\x09builder: aBuilder;\x0a\x09\x09yourself",
  1133. messageSends: ["builder:", "new", "yourself"],
  1134. referencedClasses: []
  1135. }),
  1136. globals.IRInstruction.klass);
  1137. smalltalk.addClass('IRAssignment', globals.IRInstruction, [], 'Compiler-IR');
  1138. smalltalk.addMethod(
  1139. smalltalk.method({
  1140. selector: "accept:",
  1141. protocol: 'visiting',
  1142. fn: function (aVisitor){
  1143. var self=this;
  1144. return smalltalk.withContext(function($ctx1) {
  1145. var $1;
  1146. $1=_st(aVisitor)._visitIRAssignment_(self);
  1147. return $1;
  1148. }, function($ctx1) {$ctx1.fill(self,"accept:",{aVisitor:aVisitor},globals.IRAssignment)})},
  1149. args: ["aVisitor"],
  1150. source: "accept: aVisitor\x0a\x09^ aVisitor visitIRAssignment: self",
  1151. messageSends: ["visitIRAssignment:"],
  1152. referencedClasses: []
  1153. }),
  1154. globals.IRAssignment);
  1155. smalltalk.addClass('IRDynamicArray', globals.IRInstruction, [], 'Compiler-IR');
  1156. smalltalk.addMethod(
  1157. smalltalk.method({
  1158. selector: "accept:",
  1159. protocol: 'visiting',
  1160. fn: function (aVisitor){
  1161. var self=this;
  1162. return smalltalk.withContext(function($ctx1) {
  1163. var $1;
  1164. $1=_st(aVisitor)._visitIRDynamicArray_(self);
  1165. return $1;
  1166. }, function($ctx1) {$ctx1.fill(self,"accept:",{aVisitor:aVisitor},globals.IRDynamicArray)})},
  1167. args: ["aVisitor"],
  1168. source: "accept: aVisitor\x0a\x09^ aVisitor visitIRDynamicArray: self",
  1169. messageSends: ["visitIRDynamicArray:"],
  1170. referencedClasses: []
  1171. }),
  1172. globals.IRDynamicArray);
  1173. smalltalk.addClass('IRDynamicDictionary', globals.IRInstruction, [], 'Compiler-IR');
  1174. smalltalk.addMethod(
  1175. smalltalk.method({
  1176. selector: "accept:",
  1177. protocol: 'visiting',
  1178. fn: function (aVisitor){
  1179. var self=this;
  1180. return smalltalk.withContext(function($ctx1) {
  1181. var $1;
  1182. $1=_st(aVisitor)._visitIRDynamicDictionary_(self);
  1183. return $1;
  1184. }, function($ctx1) {$ctx1.fill(self,"accept:",{aVisitor:aVisitor},globals.IRDynamicDictionary)})},
  1185. args: ["aVisitor"],
  1186. source: "accept: aVisitor\x0a\x09^ aVisitor visitIRDynamicDictionary: self",
  1187. messageSends: ["visitIRDynamicDictionary:"],
  1188. referencedClasses: []
  1189. }),
  1190. globals.IRDynamicDictionary);
  1191. smalltalk.addClass('IRScopedInstruction', globals.IRInstruction, ['scope'], 'Compiler-IR');
  1192. smalltalk.addMethod(
  1193. smalltalk.method({
  1194. selector: "scope",
  1195. protocol: 'accessing',
  1196. fn: function (){
  1197. var self=this;
  1198. var $1;
  1199. $1=self["@scope"];
  1200. return $1;
  1201. },
  1202. args: [],
  1203. source: "scope\x0a\x09^ scope",
  1204. messageSends: [],
  1205. referencedClasses: []
  1206. }),
  1207. globals.IRScopedInstruction);
  1208. smalltalk.addMethod(
  1209. smalltalk.method({
  1210. selector: "scope:",
  1211. protocol: 'accessing',
  1212. fn: function (aScope){
  1213. var self=this;
  1214. self["@scope"]=aScope;
  1215. return self},
  1216. args: ["aScope"],
  1217. source: "scope: aScope\x0a\x09scope := aScope",
  1218. messageSends: [],
  1219. referencedClasses: []
  1220. }),
  1221. globals.IRScopedInstruction);
  1222. smalltalk.addClass('IRClosureInstruction', globals.IRScopedInstruction, ['arguments', 'requiresSmalltalkContext'], 'Compiler-IR');
  1223. smalltalk.addMethod(
  1224. smalltalk.method({
  1225. selector: "arguments",
  1226. protocol: 'accessing',
  1227. fn: function (){
  1228. var self=this;
  1229. return smalltalk.withContext(function($ctx1) {
  1230. var $2,$1;
  1231. $2=self["@arguments"];
  1232. if(($receiver = $2) == nil || $receiver == null){
  1233. $1=[];
  1234. } else {
  1235. $1=$2;
  1236. };
  1237. return $1;
  1238. }, function($ctx1) {$ctx1.fill(self,"arguments",{},globals.IRClosureInstruction)})},
  1239. args: [],
  1240. source: "arguments\x0a\x09^ arguments ifNil: [ #() ]",
  1241. messageSends: ["ifNil:"],
  1242. referencedClasses: []
  1243. }),
  1244. globals.IRClosureInstruction);
  1245. smalltalk.addMethod(
  1246. smalltalk.method({
  1247. selector: "arguments:",
  1248. protocol: 'accessing',
  1249. fn: function (aCollection){
  1250. var self=this;
  1251. self["@arguments"]=aCollection;
  1252. return self},
  1253. args: ["aCollection"],
  1254. source: "arguments: aCollection\x0a\x09arguments := aCollection",
  1255. messageSends: [],
  1256. referencedClasses: []
  1257. }),
  1258. globals.IRClosureInstruction);
  1259. smalltalk.addMethod(
  1260. smalltalk.method({
  1261. selector: "locals",
  1262. protocol: 'accessing',
  1263. fn: function (){
  1264. var self=this;
  1265. return smalltalk.withContext(function($ctx1) {
  1266. var $2,$3,$1;
  1267. $2=_st(self._arguments())._copy();
  1268. _st($2)._addAll_(_st(self._tempDeclarations())._collect_((function(each){
  1269. return smalltalk.withContext(function($ctx2) {
  1270. return _st(each)._name();
  1271. }, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1,1)})})));
  1272. $3=_st($2)._yourself();
  1273. $1=$3;
  1274. return $1;
  1275. }, function($ctx1) {$ctx1.fill(self,"locals",{},globals.IRClosureInstruction)})},
  1276. args: [],
  1277. source: "locals\x0a\x09^ self arguments copy\x0a\x09\x09addAll: (self tempDeclarations collect: [ :each | each name ]);\x0a\x09\x09yourself",
  1278. messageSends: ["addAll:", "copy", "arguments", "collect:", "tempDeclarations", "name", "yourself"],
  1279. referencedClasses: []
  1280. }),
  1281. globals.IRClosureInstruction);
  1282. smalltalk.addMethod(
  1283. smalltalk.method({
  1284. selector: "requiresSmalltalkContext",
  1285. protocol: 'accessing',
  1286. fn: function (){
  1287. var self=this;
  1288. return smalltalk.withContext(function($ctx1) {
  1289. var $2,$1;
  1290. $2=self["@requiresSmalltalkContext"];
  1291. if(($receiver = $2) == nil || $receiver == null){
  1292. $1=false;
  1293. } else {
  1294. $1=$2;
  1295. };
  1296. return $1;
  1297. }, function($ctx1) {$ctx1.fill(self,"requiresSmalltalkContext",{},globals.IRClosureInstruction)})},
  1298. args: [],
  1299. source: "requiresSmalltalkContext\x0a\x09^ requiresSmalltalkContext ifNil: [ false ]",
  1300. messageSends: ["ifNil:"],
  1301. referencedClasses: []
  1302. }),
  1303. globals.IRClosureInstruction);
  1304. smalltalk.addMethod(
  1305. smalltalk.method({
  1306. selector: "requiresSmalltalkContext:",
  1307. protocol: 'accessing',
  1308. fn: function (anObject){
  1309. var self=this;
  1310. self["@requiresSmalltalkContext"]=anObject;
  1311. return self},
  1312. args: ["anObject"],
  1313. source: "requiresSmalltalkContext: anObject\x0a\x09requiresSmalltalkContext := anObject",
  1314. messageSends: [],
  1315. referencedClasses: []
  1316. }),
  1317. globals.IRClosureInstruction);
  1318. smalltalk.addMethod(
  1319. smalltalk.method({
  1320. selector: "scope:",
  1321. protocol: 'accessing',
  1322. fn: function (aScope){
  1323. var self=this;
  1324. return smalltalk.withContext(function($ctx1) {
  1325. globals.IRClosureInstruction.superclass.fn.prototype._scope_.apply(_st(self), [aScope]);
  1326. _st(aScope)._instruction_(self);
  1327. return self}, function($ctx1) {$ctx1.fill(self,"scope:",{aScope:aScope},globals.IRClosureInstruction)})},
  1328. args: ["aScope"],
  1329. source: "scope: aScope\x0a\x09super scope: aScope.\x0a\x09aScope instruction: self",
  1330. messageSends: ["scope:", "instruction:"],
  1331. referencedClasses: []
  1332. }),
  1333. globals.IRClosureInstruction);
  1334. smalltalk.addMethod(
  1335. smalltalk.method({
  1336. selector: "tempDeclarations",
  1337. protocol: 'accessing',
  1338. fn: function (){
  1339. var self=this;
  1340. return smalltalk.withContext(function($ctx1) {
  1341. var $1;
  1342. $1=_st(self._instructions())._select_((function(each){
  1343. return smalltalk.withContext(function($ctx2) {
  1344. return _st(each)._isTempDeclaration();
  1345. }, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1,1)})}));
  1346. return $1;
  1347. }, function($ctx1) {$ctx1.fill(self,"tempDeclarations",{},globals.IRClosureInstruction)})},
  1348. args: [],
  1349. source: "tempDeclarations\x0a\x09^ self instructions select: [ :each |\x0a\x09\x09each isTempDeclaration ]",
  1350. messageSends: ["select:", "instructions", "isTempDeclaration"],
  1351. referencedClasses: []
  1352. }),
  1353. globals.IRClosureInstruction);
  1354. smalltalk.addClass('IRClosure', globals.IRClosureInstruction, [], 'Compiler-IR');
  1355. smalltalk.addMethod(
  1356. smalltalk.method({
  1357. selector: "accept:",
  1358. protocol: 'visiting',
  1359. fn: function (aVisitor){
  1360. var self=this;
  1361. return smalltalk.withContext(function($ctx1) {
  1362. var $1;
  1363. $1=_st(aVisitor)._visitIRClosure_(self);
  1364. return $1;
  1365. }, function($ctx1) {$ctx1.fill(self,"accept:",{aVisitor:aVisitor},globals.IRClosure)})},
  1366. args: ["aVisitor"],
  1367. source: "accept: aVisitor\x0a\x09^ aVisitor visitIRClosure: self",
  1368. messageSends: ["visitIRClosure:"],
  1369. referencedClasses: []
  1370. }),
  1371. globals.IRClosure);
  1372. smalltalk.addMethod(
  1373. smalltalk.method({
  1374. selector: "isClosure",
  1375. protocol: 'testing',
  1376. fn: function (){
  1377. var self=this;
  1378. return true;
  1379. },
  1380. args: [],
  1381. source: "isClosure\x0a\x09^ true",
  1382. messageSends: [],
  1383. referencedClasses: []
  1384. }),
  1385. globals.IRClosure);
  1386. smalltalk.addMethod(
  1387. smalltalk.method({
  1388. selector: "sequence",
  1389. protocol: 'accessing',
  1390. fn: function (){
  1391. var self=this;
  1392. return smalltalk.withContext(function($ctx1) {
  1393. var $1;
  1394. $1=_st(self._instructions())._last();
  1395. return $1;
  1396. }, function($ctx1) {$ctx1.fill(self,"sequence",{},globals.IRClosure)})},
  1397. args: [],
  1398. source: "sequence\x0a\x09^ self instructions last",
  1399. messageSends: ["last", "instructions"],
  1400. referencedClasses: []
  1401. }),
  1402. globals.IRClosure);
  1403. smalltalk.addClass('IRMethod', globals.IRClosureInstruction, ['theClass', 'source', 'selector', 'classReferences', 'sendIndexes', 'superSends', 'requiresSmalltalkContext', 'internalVariables'], 'Compiler-IR');
  1404. globals.IRMethod.comment="I am a method instruction";
  1405. smalltalk.addMethod(
  1406. smalltalk.method({
  1407. selector: "accept:",
  1408. protocol: 'visiting',
  1409. fn: function (aVisitor){
  1410. var self=this;
  1411. return smalltalk.withContext(function($ctx1) {
  1412. var $1;
  1413. $1=_st(aVisitor)._visitIRMethod_(self);
  1414. return $1;
  1415. }, function($ctx1) {$ctx1.fill(self,"accept:",{aVisitor:aVisitor},globals.IRMethod)})},
  1416. args: ["aVisitor"],
  1417. source: "accept: aVisitor\x0a\x09^ aVisitor visitIRMethod: self",
  1418. messageSends: ["visitIRMethod:"],
  1419. referencedClasses: []
  1420. }),
  1421. globals.IRMethod);
  1422. smalltalk.addMethod(
  1423. smalltalk.method({
  1424. selector: "classReferences",
  1425. protocol: 'accessing',
  1426. fn: function (){
  1427. var self=this;
  1428. var $1;
  1429. $1=self["@classReferences"];
  1430. return $1;
  1431. },
  1432. args: [],
  1433. source: "classReferences\x0a\x09^ classReferences",
  1434. messageSends: [],
  1435. referencedClasses: []
  1436. }),
  1437. globals.IRMethod);
  1438. smalltalk.addMethod(
  1439. smalltalk.method({
  1440. selector: "classReferences:",
  1441. protocol: 'accessing',
  1442. fn: function (aCollection){
  1443. var self=this;
  1444. self["@classReferences"]=aCollection;
  1445. return self},
  1446. args: ["aCollection"],
  1447. source: "classReferences: aCollection\x0a\x09classReferences := aCollection",
  1448. messageSends: [],
  1449. referencedClasses: []
  1450. }),
  1451. globals.IRMethod);
  1452. smalltalk.addMethod(
  1453. smalltalk.method({
  1454. selector: "internalVariables",
  1455. protocol: 'accessing',
  1456. fn: function (){
  1457. var self=this;
  1458. function $Set(){return globals.Set||(typeof Set=="undefined"?nil:Set)}
  1459. return smalltalk.withContext(function($ctx1) {
  1460. var $2,$1;
  1461. $2=self["@internalVariables"];
  1462. if(($receiver = $2) == nil || $receiver == null){
  1463. self["@internalVariables"]=_st($Set())._new();
  1464. $1=self["@internalVariables"];
  1465. } else {
  1466. $1=$2;
  1467. };
  1468. return $1;
  1469. }, function($ctx1) {$ctx1.fill(self,"internalVariables",{},globals.IRMethod)})},
  1470. args: [],
  1471. source: "internalVariables\x0a\x09^ internalVariables ifNil: [ internalVariables := Set new ]",
  1472. messageSends: ["ifNil:", "new"],
  1473. referencedClasses: ["Set"]
  1474. }),
  1475. globals.IRMethod);
  1476. smalltalk.addMethod(
  1477. smalltalk.method({
  1478. selector: "isMethod",
  1479. protocol: 'accessing',
  1480. fn: function (){
  1481. var self=this;
  1482. return true;
  1483. },
  1484. args: [],
  1485. source: "isMethod\x0a\x09^ true",
  1486. messageSends: [],
  1487. referencedClasses: []
  1488. }),
  1489. globals.IRMethod);
  1490. smalltalk.addMethod(
  1491. smalltalk.method({
  1492. selector: "messageSends",
  1493. protocol: 'accessing',
  1494. fn: function (){
  1495. var self=this;
  1496. return smalltalk.withContext(function($ctx1) {
  1497. var $1;
  1498. $1=_st(self._sendIndexes())._keys();
  1499. return $1;
  1500. }, function($ctx1) {$ctx1.fill(self,"messageSends",{},globals.IRMethod)})},
  1501. args: [],
  1502. source: "messageSends\x0a\x09^ self sendIndexes keys",
  1503. messageSends: ["keys", "sendIndexes"],
  1504. referencedClasses: []
  1505. }),
  1506. globals.IRMethod);
  1507. smalltalk.addMethod(
  1508. smalltalk.method({
  1509. selector: "method",
  1510. protocol: 'accessing',
  1511. fn: function (){
  1512. var self=this;
  1513. return self;
  1514. },
  1515. args: [],
  1516. source: "method\x0a\x09^ self",
  1517. messageSends: [],
  1518. referencedClasses: []
  1519. }),
  1520. globals.IRMethod);
  1521. smalltalk.addMethod(
  1522. smalltalk.method({
  1523. selector: "selector",
  1524. protocol: 'accessing',
  1525. fn: function (){
  1526. var self=this;
  1527. var $1;
  1528. $1=self["@selector"];
  1529. return $1;
  1530. },
  1531. args: [],
  1532. source: "selector\x0a\x09^ selector",
  1533. messageSends: [],
  1534. referencedClasses: []
  1535. }),
  1536. globals.IRMethod);
  1537. smalltalk.addMethod(
  1538. smalltalk.method({
  1539. selector: "selector:",
  1540. protocol: 'accessing',
  1541. fn: function (aString){
  1542. var self=this;
  1543. self["@selector"]=aString;
  1544. return self},
  1545. args: ["aString"],
  1546. source: "selector: aString\x0a\x09selector := aString",
  1547. messageSends: [],
  1548. referencedClasses: []
  1549. }),
  1550. globals.IRMethod);
  1551. smalltalk.addMethod(
  1552. smalltalk.method({
  1553. selector: "sendIndexes",
  1554. protocol: 'accessing',
  1555. fn: function (){
  1556. var self=this;
  1557. var $1;
  1558. $1=self["@sendIndexes"];
  1559. return $1;
  1560. },
  1561. args: [],
  1562. source: "sendIndexes\x0a\x09^ sendIndexes",
  1563. messageSends: [],
  1564. referencedClasses: []
  1565. }),
  1566. globals.IRMethod);
  1567. smalltalk.addMethod(
  1568. smalltalk.method({
  1569. selector: "sendIndexes:",
  1570. protocol: 'accessing',
  1571. fn: function (aDictionary){
  1572. var self=this;
  1573. self["@sendIndexes"]=aDictionary;
  1574. return self},
  1575. args: ["aDictionary"],
  1576. source: "sendIndexes: aDictionary\x0a\x09sendIndexes := aDictionary",
  1577. messageSends: [],
  1578. referencedClasses: []
  1579. }),
  1580. globals.IRMethod);
  1581. smalltalk.addMethod(
  1582. smalltalk.method({
  1583. selector: "source",
  1584. protocol: 'accessing',
  1585. fn: function (){
  1586. var self=this;
  1587. var $1;
  1588. $1=self["@source"];
  1589. return $1;
  1590. },
  1591. args: [],
  1592. source: "source\x0a\x09^ source",
  1593. messageSends: [],
  1594. referencedClasses: []
  1595. }),
  1596. globals.IRMethod);
  1597. smalltalk.addMethod(
  1598. smalltalk.method({
  1599. selector: "source:",
  1600. protocol: 'accessing',
  1601. fn: function (aString){
  1602. var self=this;
  1603. self["@source"]=aString;
  1604. return self},
  1605. args: ["aString"],
  1606. source: "source: aString\x0a\x09source := aString",
  1607. messageSends: [],
  1608. referencedClasses: []
  1609. }),
  1610. globals.IRMethod);
  1611. smalltalk.addMethod(
  1612. smalltalk.method({
  1613. selector: "superSends",
  1614. protocol: 'accessing',
  1615. fn: function (){
  1616. var self=this;
  1617. var $1;
  1618. $1=self["@superSends"];
  1619. return $1;
  1620. },
  1621. args: [],
  1622. source: "superSends\x0a\x09^ superSends",
  1623. messageSends: [],
  1624. referencedClasses: []
  1625. }),
  1626. globals.IRMethod);
  1627. smalltalk.addMethod(
  1628. smalltalk.method({
  1629. selector: "superSends:",
  1630. protocol: 'accessing',
  1631. fn: function (aCollection){
  1632. var self=this;
  1633. self["@superSends"]=aCollection;
  1634. return self},
  1635. args: ["aCollection"],
  1636. source: "superSends: aCollection\x0a\x09superSends := aCollection",
  1637. messageSends: [],
  1638. referencedClasses: []
  1639. }),
  1640. globals.IRMethod);
  1641. smalltalk.addMethod(
  1642. smalltalk.method({
  1643. selector: "theClass",
  1644. protocol: 'accessing',
  1645. fn: function (){
  1646. var self=this;
  1647. var $1;
  1648. $1=self["@theClass"];
  1649. return $1;
  1650. },
  1651. args: [],
  1652. source: "theClass\x0a\x09^ theClass",
  1653. messageSends: [],
  1654. referencedClasses: []
  1655. }),
  1656. globals.IRMethod);
  1657. smalltalk.addMethod(
  1658. smalltalk.method({
  1659. selector: "theClass:",
  1660. protocol: 'accessing',
  1661. fn: function (aClass){
  1662. var self=this;
  1663. self["@theClass"]=aClass;
  1664. return self},
  1665. args: ["aClass"],
  1666. source: "theClass: aClass\x0a\x09theClass := aClass",
  1667. messageSends: [],
  1668. referencedClasses: []
  1669. }),
  1670. globals.IRMethod);
  1671. smalltalk.addClass('IRReturn', globals.IRScopedInstruction, [], 'Compiler-IR');
  1672. globals.IRReturn.comment="I am a local return instruction.";
  1673. smalltalk.addMethod(
  1674. smalltalk.method({
  1675. selector: "accept:",
  1676. protocol: 'visiting',
  1677. fn: function (aVisitor){
  1678. var self=this;
  1679. return smalltalk.withContext(function($ctx1) {
  1680. var $1;
  1681. $1=_st(aVisitor)._visitIRReturn_(self);
  1682. return $1;
  1683. }, function($ctx1) {$ctx1.fill(self,"accept:",{aVisitor:aVisitor},globals.IRReturn)})},
  1684. args: ["aVisitor"],
  1685. source: "accept: aVisitor\x0a\x09^ aVisitor visitIRReturn: self",
  1686. messageSends: ["visitIRReturn:"],
  1687. referencedClasses: []
  1688. }),
  1689. globals.IRReturn);
  1690. smalltalk.addMethod(
  1691. smalltalk.method({
  1692. selector: "canBeAssigned",
  1693. protocol: 'testing',
  1694. fn: function (){
  1695. var self=this;
  1696. return false;
  1697. },
  1698. args: [],
  1699. source: "canBeAssigned\x0a\x09^ false",
  1700. messageSends: [],
  1701. referencedClasses: []
  1702. }),
  1703. globals.IRReturn);
  1704. smalltalk.addMethod(
  1705. smalltalk.method({
  1706. selector: "isBlockReturn",
  1707. protocol: 'testing',
  1708. fn: function (){
  1709. var self=this;
  1710. return false;
  1711. },
  1712. args: [],
  1713. source: "isBlockReturn\x0a\x09^ false",
  1714. messageSends: [],
  1715. referencedClasses: []
  1716. }),
  1717. globals.IRReturn);
  1718. smalltalk.addMethod(
  1719. smalltalk.method({
  1720. selector: "isLocalReturn",
  1721. protocol: 'testing',
  1722. fn: function (){
  1723. var self=this;
  1724. return true;
  1725. },
  1726. args: [],
  1727. source: "isLocalReturn\x0a\x09^ true",
  1728. messageSends: [],
  1729. referencedClasses: []
  1730. }),
  1731. globals.IRReturn);
  1732. smalltalk.addMethod(
  1733. smalltalk.method({
  1734. selector: "isNonLocalReturn",
  1735. protocol: 'testing',
  1736. fn: function (){
  1737. var self=this;
  1738. return smalltalk.withContext(function($ctx1) {
  1739. var $1;
  1740. $1=_st(self._isLocalReturn())._not();
  1741. return $1;
  1742. }, function($ctx1) {$ctx1.fill(self,"isNonLocalReturn",{},globals.IRReturn)})},
  1743. args: [],
  1744. source: "isNonLocalReturn\x0a\x09^ self isLocalReturn not",
  1745. messageSends: ["not", "isLocalReturn"],
  1746. referencedClasses: []
  1747. }),
  1748. globals.IRReturn);
  1749. smalltalk.addMethod(
  1750. smalltalk.method({
  1751. selector: "isReturn",
  1752. protocol: 'testing',
  1753. fn: function (){
  1754. var self=this;
  1755. return true;
  1756. },
  1757. args: [],
  1758. source: "isReturn\x0a\x09^ true",
  1759. messageSends: [],
  1760. referencedClasses: []
  1761. }),
  1762. globals.IRReturn);
  1763. smalltalk.addMethod(
  1764. smalltalk.method({
  1765. selector: "scope",
  1766. protocol: 'accessing',
  1767. fn: function (){
  1768. var self=this;
  1769. return smalltalk.withContext(function($ctx1) {
  1770. var $2,$1;
  1771. $2=self["@scope"];
  1772. if(($receiver = $2) == nil || $receiver == null){
  1773. $1=_st(self._parent())._scope();
  1774. } else {
  1775. $1=$2;
  1776. };
  1777. return $1;
  1778. }, function($ctx1) {$ctx1.fill(self,"scope",{},globals.IRReturn)})},
  1779. args: [],
  1780. source: "scope\x0a\x09^ scope ifNil: [ self parent scope ]",
  1781. messageSends: ["ifNil:", "scope", "parent"],
  1782. referencedClasses: []
  1783. }),
  1784. globals.IRReturn);
  1785. smalltalk.addClass('IRBlockReturn', globals.IRReturn, [], 'Compiler-IR');
  1786. globals.IRBlockReturn.comment="Smalltalk blocks return their last statement. I am a implicit block return instruction.";
  1787. smalltalk.addMethod(
  1788. smalltalk.method({
  1789. selector: "accept:",
  1790. protocol: 'visiting',
  1791. fn: function (aVisitor){
  1792. var self=this;
  1793. return smalltalk.withContext(function($ctx1) {
  1794. var $1;
  1795. $1=_st(aVisitor)._visitIRBlockReturn_(self);
  1796. return $1;
  1797. }, function($ctx1) {$ctx1.fill(self,"accept:",{aVisitor:aVisitor},globals.IRBlockReturn)})},
  1798. args: ["aVisitor"],
  1799. source: "accept: aVisitor\x0a\x09^ aVisitor visitIRBlockReturn: self",
  1800. messageSends: ["visitIRBlockReturn:"],
  1801. referencedClasses: []
  1802. }),
  1803. globals.IRBlockReturn);
  1804. smalltalk.addMethod(
  1805. smalltalk.method({
  1806. selector: "isBlockReturn",
  1807. protocol: 'testing',
  1808. fn: function (){
  1809. var self=this;
  1810. return true;
  1811. },
  1812. args: [],
  1813. source: "isBlockReturn\x0a\x09^ true",
  1814. messageSends: [],
  1815. referencedClasses: []
  1816. }),
  1817. globals.IRBlockReturn);
  1818. smalltalk.addClass('IRNonLocalReturn', globals.IRReturn, [], 'Compiler-IR');
  1819. globals.IRNonLocalReturn.comment="I am a non local return instruction.\x0aNon local returns are handled using a try/catch JavaScript statement.\x0a\x0aSee `IRNonLocalReturnHandling` class.";
  1820. smalltalk.addMethod(
  1821. smalltalk.method({
  1822. selector: "accept:",
  1823. protocol: 'visiting',
  1824. fn: function (aVisitor){
  1825. var self=this;
  1826. return smalltalk.withContext(function($ctx1) {
  1827. var $1;
  1828. $1=_st(aVisitor)._visitIRNonLocalReturn_(self);
  1829. return $1;
  1830. }, function($ctx1) {$ctx1.fill(self,"accept:",{aVisitor:aVisitor},globals.IRNonLocalReturn)})},
  1831. args: ["aVisitor"],
  1832. source: "accept: aVisitor\x0a\x09^ aVisitor visitIRNonLocalReturn: self",
  1833. messageSends: ["visitIRNonLocalReturn:"],
  1834. referencedClasses: []
  1835. }),
  1836. globals.IRNonLocalReturn);
  1837. smalltalk.addMethod(
  1838. smalltalk.method({
  1839. selector: "isLocalReturn",
  1840. protocol: 'testing',
  1841. fn: function (){
  1842. var self=this;
  1843. return false;
  1844. },
  1845. args: [],
  1846. source: "isLocalReturn\x0a\x09^ false",
  1847. messageSends: [],
  1848. referencedClasses: []
  1849. }),
  1850. globals.IRNonLocalReturn);
  1851. smalltalk.addClass('IRTempDeclaration', globals.IRScopedInstruction, ['name'], 'Compiler-IR');
  1852. smalltalk.addMethod(
  1853. smalltalk.method({
  1854. selector: "accept:",
  1855. protocol: 'visiting',
  1856. fn: function (aVisitor){
  1857. var self=this;
  1858. return smalltalk.withContext(function($ctx1) {
  1859. var $1;
  1860. $1=_st(aVisitor)._visitIRTempDeclaration_(self);
  1861. return $1;
  1862. }, function($ctx1) {$ctx1.fill(self,"accept:",{aVisitor:aVisitor},globals.IRTempDeclaration)})},
  1863. args: ["aVisitor"],
  1864. source: "accept: aVisitor\x0a\x09^ aVisitor visitIRTempDeclaration: self",
  1865. messageSends: ["visitIRTempDeclaration:"],
  1866. referencedClasses: []
  1867. }),
  1868. globals.IRTempDeclaration);
  1869. smalltalk.addMethod(
  1870. smalltalk.method({
  1871. selector: "isTempDeclaration",
  1872. protocol: 'testing',
  1873. fn: function (){
  1874. var self=this;
  1875. return true;
  1876. },
  1877. args: [],
  1878. source: "isTempDeclaration\x0a\x09^ true",
  1879. messageSends: [],
  1880. referencedClasses: []
  1881. }),
  1882. globals.IRTempDeclaration);
  1883. smalltalk.addMethod(
  1884. smalltalk.method({
  1885. selector: "name",
  1886. protocol: 'accessing',
  1887. fn: function (){
  1888. var self=this;
  1889. var $1;
  1890. $1=self["@name"];
  1891. return $1;
  1892. },
  1893. args: [],
  1894. source: "name\x0a\x09^ name",
  1895. messageSends: [],
  1896. referencedClasses: []
  1897. }),
  1898. globals.IRTempDeclaration);
  1899. smalltalk.addMethod(
  1900. smalltalk.method({
  1901. selector: "name:",
  1902. protocol: 'accessing',
  1903. fn: function (aString){
  1904. var self=this;
  1905. self["@name"]=aString;
  1906. return self},
  1907. args: ["aString"],
  1908. source: "name: aString\x0a\x09name := aString",
  1909. messageSends: [],
  1910. referencedClasses: []
  1911. }),
  1912. globals.IRTempDeclaration);
  1913. smalltalk.addClass('IRSend', globals.IRInstruction, ['selector', 'classSend', 'index'], 'Compiler-IR');
  1914. globals.IRSend.comment="I am a message send instruction.";
  1915. smalltalk.addMethod(
  1916. smalltalk.method({
  1917. selector: "accept:",
  1918. protocol: 'visiting',
  1919. fn: function (aVisitor){
  1920. var self=this;
  1921. return smalltalk.withContext(function($ctx1) {
  1922. var $1;
  1923. $1=_st(aVisitor)._visitIRSend_(self);
  1924. return $1;
  1925. }, function($ctx1) {$ctx1.fill(self,"accept:",{aVisitor:aVisitor},globals.IRSend)})},
  1926. args: ["aVisitor"],
  1927. source: "accept: aVisitor\x0a\x09^ aVisitor visitIRSend: self",
  1928. messageSends: ["visitIRSend:"],
  1929. referencedClasses: []
  1930. }),
  1931. globals.IRSend);
  1932. smalltalk.addMethod(
  1933. smalltalk.method({
  1934. selector: "classSend",
  1935. protocol: 'accessing',
  1936. fn: function (){
  1937. var self=this;
  1938. var $1;
  1939. $1=self["@classSend"];
  1940. return $1;
  1941. },
  1942. args: [],
  1943. source: "classSend\x0a\x09^ classSend",
  1944. messageSends: [],
  1945. referencedClasses: []
  1946. }),
  1947. globals.IRSend);
  1948. smalltalk.addMethod(
  1949. smalltalk.method({
  1950. selector: "classSend:",
  1951. protocol: 'accessing',
  1952. fn: function (aClass){
  1953. var self=this;
  1954. self["@classSend"]=aClass;
  1955. return self},
  1956. args: ["aClass"],
  1957. source: "classSend: aClass\x0a\x09classSend := aClass",
  1958. messageSends: [],
  1959. referencedClasses: []
  1960. }),
  1961. globals.IRSend);
  1962. smalltalk.addMethod(
  1963. smalltalk.method({
  1964. selector: "index",
  1965. protocol: 'accessing',
  1966. fn: function (){
  1967. var self=this;
  1968. var $1;
  1969. $1=self["@index"];
  1970. return $1;
  1971. },
  1972. args: [],
  1973. source: "index\x0a\x09^ index",
  1974. messageSends: [],
  1975. referencedClasses: []
  1976. }),
  1977. globals.IRSend);
  1978. smalltalk.addMethod(
  1979. smalltalk.method({
  1980. selector: "index:",
  1981. protocol: 'accessing',
  1982. fn: function (anInteger){
  1983. var self=this;
  1984. self["@index"]=anInteger;
  1985. return self},
  1986. args: ["anInteger"],
  1987. source: "index: anInteger\x0a\x09index := anInteger",
  1988. messageSends: [],
  1989. referencedClasses: []
  1990. }),
  1991. globals.IRSend);
  1992. smalltalk.addMethod(
  1993. smalltalk.method({
  1994. selector: "isSend",
  1995. protocol: 'testing',
  1996. fn: function (){
  1997. var self=this;
  1998. return true;
  1999. },
  2000. args: [],
  2001. source: "isSend\x0a\x09^ true",
  2002. messageSends: [],
  2003. referencedClasses: []
  2004. }),
  2005. globals.IRSend);
  2006. smalltalk.addMethod(
  2007. smalltalk.method({
  2008. selector: "selector",
  2009. protocol: 'accessing',
  2010. fn: function (){
  2011. var self=this;
  2012. var $1;
  2013. $1=self["@selector"];
  2014. return $1;
  2015. },
  2016. args: [],
  2017. source: "selector\x0a\x09^ selector",
  2018. messageSends: [],
  2019. referencedClasses: []
  2020. }),
  2021. globals.IRSend);
  2022. smalltalk.addMethod(
  2023. smalltalk.method({
  2024. selector: "selector:",
  2025. protocol: 'accessing',
  2026. fn: function (aString){
  2027. var self=this;
  2028. self["@selector"]=aString;
  2029. return self},
  2030. args: ["aString"],
  2031. source: "selector: aString\x0a\x09selector := aString",
  2032. messageSends: [],
  2033. referencedClasses: []
  2034. }),
  2035. globals.IRSend);
  2036. smalltalk.addClass('IRSequence', globals.IRInstruction, [], 'Compiler-IR');
  2037. smalltalk.addMethod(
  2038. smalltalk.method({
  2039. selector: "accept:",
  2040. protocol: 'visiting',
  2041. fn: function (aVisitor){
  2042. var self=this;
  2043. return smalltalk.withContext(function($ctx1) {
  2044. var $1;
  2045. $1=_st(aVisitor)._visitIRSequence_(self);
  2046. return $1;
  2047. }, function($ctx1) {$ctx1.fill(self,"accept:",{aVisitor:aVisitor},globals.IRSequence)})},
  2048. args: ["aVisitor"],
  2049. source: "accept: aVisitor\x0a\x09^ aVisitor visitIRSequence: self",
  2050. messageSends: ["visitIRSequence:"],
  2051. referencedClasses: []
  2052. }),
  2053. globals.IRSequence);
  2054. smalltalk.addMethod(
  2055. smalltalk.method({
  2056. selector: "isSequence",
  2057. protocol: 'testing',
  2058. fn: function (){
  2059. var self=this;
  2060. return true;
  2061. },
  2062. args: [],
  2063. source: "isSequence\x0a\x09^ true",
  2064. messageSends: [],
  2065. referencedClasses: []
  2066. }),
  2067. globals.IRSequence);
  2068. smalltalk.addClass('IRBlockSequence', globals.IRSequence, [], 'Compiler-IR');
  2069. smalltalk.addMethod(
  2070. smalltalk.method({
  2071. selector: "accept:",
  2072. protocol: 'visiting',
  2073. fn: function (aVisitor){
  2074. var self=this;
  2075. return smalltalk.withContext(function($ctx1) {
  2076. var $1;
  2077. $1=_st(aVisitor)._visitIRBlockSequence_(self);
  2078. return $1;
  2079. }, function($ctx1) {$ctx1.fill(self,"accept:",{aVisitor:aVisitor},globals.IRBlockSequence)})},
  2080. args: ["aVisitor"],
  2081. source: "accept: aVisitor\x0a\x09^ aVisitor visitIRBlockSequence: self",
  2082. messageSends: ["visitIRBlockSequence:"],
  2083. referencedClasses: []
  2084. }),
  2085. globals.IRBlockSequence);
  2086. smalltalk.addClass('IRValue', globals.IRInstruction, ['value'], 'Compiler-IR');
  2087. globals.IRValue.comment="I am the simplest possible instruction. I represent a value.";
  2088. smalltalk.addMethod(
  2089. smalltalk.method({
  2090. selector: "accept:",
  2091. protocol: 'visiting',
  2092. fn: function (aVisitor){
  2093. var self=this;
  2094. return smalltalk.withContext(function($ctx1) {
  2095. var $1;
  2096. $1=_st(aVisitor)._visitIRValue_(self);
  2097. return $1;
  2098. }, function($ctx1) {$ctx1.fill(self,"accept:",{aVisitor:aVisitor},globals.IRValue)})},
  2099. args: ["aVisitor"],
  2100. source: "accept: aVisitor\x0a\x09^ aVisitor visitIRValue: self",
  2101. messageSends: ["visitIRValue:"],
  2102. referencedClasses: []
  2103. }),
  2104. globals.IRValue);
  2105. smalltalk.addMethod(
  2106. smalltalk.method({
  2107. selector: "needsBoxingAsReceiver",
  2108. protocol: 'testing',
  2109. fn: function (){
  2110. var self=this;
  2111. return false;
  2112. },
  2113. args: [],
  2114. source: "needsBoxingAsReceiver\x0a\x09^ false",
  2115. messageSends: [],
  2116. referencedClasses: []
  2117. }),
  2118. globals.IRValue);
  2119. smalltalk.addMethod(
  2120. smalltalk.method({
  2121. selector: "value",
  2122. protocol: 'accessing',
  2123. fn: function (){
  2124. var self=this;
  2125. var $1;
  2126. $1=self["@value"];
  2127. return $1;
  2128. },
  2129. args: [],
  2130. source: "value\x0a\x09^ value",
  2131. messageSends: [],
  2132. referencedClasses: []
  2133. }),
  2134. globals.IRValue);
  2135. smalltalk.addMethod(
  2136. smalltalk.method({
  2137. selector: "value:",
  2138. protocol: 'accessing',
  2139. fn: function (aString){
  2140. var self=this;
  2141. self["@value"]=aString;
  2142. return self},
  2143. args: ["aString"],
  2144. source: "value: aString\x0a\x09value := aString",
  2145. messageSends: [],
  2146. referencedClasses: []
  2147. }),
  2148. globals.IRValue);
  2149. smalltalk.addClass('IRVariable', globals.IRInstruction, ['variable'], 'Compiler-IR');
  2150. globals.IRVariable.comment="I am a variable instruction.";
  2151. smalltalk.addMethod(
  2152. smalltalk.method({
  2153. selector: "accept:",
  2154. protocol: 'visiting',
  2155. fn: function (aVisitor){
  2156. var self=this;
  2157. return smalltalk.withContext(function($ctx1) {
  2158. var $1;
  2159. $1=_st(aVisitor)._visitIRVariable_(self);
  2160. return $1;
  2161. }, function($ctx1) {$ctx1.fill(self,"accept:",{aVisitor:aVisitor},globals.IRVariable)})},
  2162. args: ["aVisitor"],
  2163. source: "accept: aVisitor\x0a\x09^ aVisitor visitIRVariable: self",
  2164. messageSends: ["visitIRVariable:"],
  2165. referencedClasses: []
  2166. }),
  2167. globals.IRVariable);
  2168. smalltalk.addMethod(
  2169. smalltalk.method({
  2170. selector: "isVariable",
  2171. protocol: 'testing',
  2172. fn: function (){
  2173. var self=this;
  2174. return true;
  2175. },
  2176. args: [],
  2177. source: "isVariable\x0a\x09^ true",
  2178. messageSends: [],
  2179. referencedClasses: []
  2180. }),
  2181. globals.IRVariable);
  2182. smalltalk.addMethod(
  2183. smalltalk.method({
  2184. selector: "needsBoxingAsReceiver",
  2185. protocol: 'testing',
  2186. fn: function (){
  2187. var self=this;
  2188. return smalltalk.withContext(function($ctx1) {
  2189. var $1;
  2190. $1=_st(_st(self._variable())._isPseudoVar())._not();
  2191. return $1;
  2192. }, function($ctx1) {$ctx1.fill(self,"needsBoxingAsReceiver",{},globals.IRVariable)})},
  2193. args: [],
  2194. source: "needsBoxingAsReceiver\x0a\x09^ self variable isPseudoVar not",
  2195. messageSends: ["not", "isPseudoVar", "variable"],
  2196. referencedClasses: []
  2197. }),
  2198. globals.IRVariable);
  2199. smalltalk.addMethod(
  2200. smalltalk.method({
  2201. selector: "variable",
  2202. protocol: 'accessing',
  2203. fn: function (){
  2204. var self=this;
  2205. var $1;
  2206. $1=self["@variable"];
  2207. return $1;
  2208. },
  2209. args: [],
  2210. source: "variable\x0a\x09^ variable",
  2211. messageSends: [],
  2212. referencedClasses: []
  2213. }),
  2214. globals.IRVariable);
  2215. smalltalk.addMethod(
  2216. smalltalk.method({
  2217. selector: "variable:",
  2218. protocol: 'accessing',
  2219. fn: function (aScopeVariable){
  2220. var self=this;
  2221. self["@variable"]=aScopeVariable;
  2222. return self},
  2223. args: ["aScopeVariable"],
  2224. source: "variable: aScopeVariable\x0a\x09variable := aScopeVariable",
  2225. messageSends: [],
  2226. referencedClasses: []
  2227. }),
  2228. globals.IRVariable);
  2229. smalltalk.addClass('IRVerbatim', globals.IRInstruction, ['source'], 'Compiler-IR');
  2230. smalltalk.addMethod(
  2231. smalltalk.method({
  2232. selector: "accept:",
  2233. protocol: 'visiting',
  2234. fn: function (aVisitor){
  2235. var self=this;
  2236. return smalltalk.withContext(function($ctx1) {
  2237. var $1;
  2238. $1=_st(aVisitor)._visitIRVerbatim_(self);
  2239. return $1;
  2240. }, function($ctx1) {$ctx1.fill(self,"accept:",{aVisitor:aVisitor},globals.IRVerbatim)})},
  2241. args: ["aVisitor"],
  2242. source: "accept: aVisitor\x0a\x09^ aVisitor visitIRVerbatim: self",
  2243. messageSends: ["visitIRVerbatim:"],
  2244. referencedClasses: []
  2245. }),
  2246. globals.IRVerbatim);
  2247. smalltalk.addMethod(
  2248. smalltalk.method({
  2249. selector: "source",
  2250. protocol: 'accessing',
  2251. fn: function (){
  2252. var self=this;
  2253. var $1;
  2254. $1=self["@source"];
  2255. return $1;
  2256. },
  2257. args: [],
  2258. source: "source\x0a\x09^ source",
  2259. messageSends: [],
  2260. referencedClasses: []
  2261. }),
  2262. globals.IRVerbatim);
  2263. smalltalk.addMethod(
  2264. smalltalk.method({
  2265. selector: "source:",
  2266. protocol: 'accessing',
  2267. fn: function (aString){
  2268. var self=this;
  2269. self["@source"]=aString;
  2270. return self},
  2271. args: ["aString"],
  2272. source: "source: aString\x0a\x09source := aString",
  2273. messageSends: [],
  2274. referencedClasses: []
  2275. }),
  2276. globals.IRVerbatim);
  2277. smalltalk.addClass('IRVisitor', globals.Object, [], 'Compiler-IR');
  2278. smalltalk.addMethod(
  2279. smalltalk.method({
  2280. selector: "visit:",
  2281. protocol: 'visiting',
  2282. fn: function (anIRInstruction){
  2283. var self=this;
  2284. return smalltalk.withContext(function($ctx1) {
  2285. var $1;
  2286. $1=_st(anIRInstruction)._accept_(self);
  2287. return $1;
  2288. }, function($ctx1) {$ctx1.fill(self,"visit:",{anIRInstruction:anIRInstruction},globals.IRVisitor)})},
  2289. args: ["anIRInstruction"],
  2290. source: "visit: anIRInstruction\x0a\x09^ anIRInstruction accept: self",
  2291. messageSends: ["accept:"],
  2292. referencedClasses: []
  2293. }),
  2294. globals.IRVisitor);
  2295. smalltalk.addMethod(
  2296. smalltalk.method({
  2297. selector: "visitIRAssignment:",
  2298. protocol: 'visiting',
  2299. fn: function (anIRAssignment){
  2300. var self=this;
  2301. return smalltalk.withContext(function($ctx1) {
  2302. var $1;
  2303. $1=self._visitIRInstruction_(anIRAssignment);
  2304. return $1;
  2305. }, function($ctx1) {$ctx1.fill(self,"visitIRAssignment:",{anIRAssignment:anIRAssignment},globals.IRVisitor)})},
  2306. args: ["anIRAssignment"],
  2307. source: "visitIRAssignment: anIRAssignment\x0a\x09^ self visitIRInstruction: anIRAssignment",
  2308. messageSends: ["visitIRInstruction:"],
  2309. referencedClasses: []
  2310. }),
  2311. globals.IRVisitor);
  2312. smalltalk.addMethod(
  2313. smalltalk.method({
  2314. selector: "visitIRBlockReturn:",
  2315. protocol: 'visiting',
  2316. fn: function (anIRBlockReturn){
  2317. var self=this;
  2318. return smalltalk.withContext(function($ctx1) {
  2319. var $1;
  2320. $1=self._visitIRReturn_(anIRBlockReturn);
  2321. return $1;
  2322. }, function($ctx1) {$ctx1.fill(self,"visitIRBlockReturn:",{anIRBlockReturn:anIRBlockReturn},globals.IRVisitor)})},
  2323. args: ["anIRBlockReturn"],
  2324. source: "visitIRBlockReturn: anIRBlockReturn\x0a\x09^ self visitIRReturn: anIRBlockReturn",
  2325. messageSends: ["visitIRReturn:"],
  2326. referencedClasses: []
  2327. }),
  2328. globals.IRVisitor);
  2329. smalltalk.addMethod(
  2330. smalltalk.method({
  2331. selector: "visitIRBlockSequence:",
  2332. protocol: 'visiting',
  2333. fn: function (anIRBlockSequence){
  2334. var self=this;
  2335. return smalltalk.withContext(function($ctx1) {
  2336. var $1;
  2337. $1=self._visitIRSequence_(anIRBlockSequence);
  2338. return $1;
  2339. }, function($ctx1) {$ctx1.fill(self,"visitIRBlockSequence:",{anIRBlockSequence:anIRBlockSequence},globals.IRVisitor)})},
  2340. args: ["anIRBlockSequence"],
  2341. source: "visitIRBlockSequence: anIRBlockSequence\x0a\x09^ self visitIRSequence: anIRBlockSequence",
  2342. messageSends: ["visitIRSequence:"],
  2343. referencedClasses: []
  2344. }),
  2345. globals.IRVisitor);
  2346. smalltalk.addMethod(
  2347. smalltalk.method({
  2348. selector: "visitIRClosure:",
  2349. protocol: 'visiting',
  2350. fn: function (anIRClosure){
  2351. var self=this;
  2352. return smalltalk.withContext(function($ctx1) {
  2353. var $1;
  2354. $1=self._visitIRInstruction_(anIRClosure);
  2355. return $1;
  2356. }, function($ctx1) {$ctx1.fill(self,"visitIRClosure:",{anIRClosure:anIRClosure},globals.IRVisitor)})},
  2357. args: ["anIRClosure"],
  2358. source: "visitIRClosure: anIRClosure\x0a\x09^ self visitIRInstruction: anIRClosure",
  2359. messageSends: ["visitIRInstruction:"],
  2360. referencedClasses: []
  2361. }),
  2362. globals.IRVisitor);
  2363. smalltalk.addMethod(
  2364. smalltalk.method({
  2365. selector: "visitIRDynamicArray:",
  2366. protocol: 'visiting',
  2367. fn: function (anIRDynamicArray){
  2368. var self=this;
  2369. return smalltalk.withContext(function($ctx1) {
  2370. var $1;
  2371. $1=self._visitIRInstruction_(anIRDynamicArray);
  2372. return $1;
  2373. }, function($ctx1) {$ctx1.fill(self,"visitIRDynamicArray:",{anIRDynamicArray:anIRDynamicArray},globals.IRVisitor)})},
  2374. args: ["anIRDynamicArray"],
  2375. source: "visitIRDynamicArray: anIRDynamicArray\x0a\x09^ self visitIRInstruction: anIRDynamicArray",
  2376. messageSends: ["visitIRInstruction:"],
  2377. referencedClasses: []
  2378. }),
  2379. globals.IRVisitor);
  2380. smalltalk.addMethod(
  2381. smalltalk.method({
  2382. selector: "visitIRDynamicDictionary:",
  2383. protocol: 'visiting',
  2384. fn: function (anIRDynamicDictionary){
  2385. var self=this;
  2386. return smalltalk.withContext(function($ctx1) {
  2387. var $1;
  2388. $1=self._visitIRInstruction_(anIRDynamicDictionary);
  2389. return $1;
  2390. }, function($ctx1) {$ctx1.fill(self,"visitIRDynamicDictionary:",{anIRDynamicDictionary:anIRDynamicDictionary},globals.IRVisitor)})},
  2391. args: ["anIRDynamicDictionary"],
  2392. source: "visitIRDynamicDictionary: anIRDynamicDictionary\x0a\x09^ self visitIRInstruction: anIRDynamicDictionary",
  2393. messageSends: ["visitIRInstruction:"],
  2394. referencedClasses: []
  2395. }),
  2396. globals.IRVisitor);
  2397. smalltalk.addMethod(
  2398. smalltalk.method({
  2399. selector: "visitIRInlinedClosure:",
  2400. protocol: 'visiting',
  2401. fn: function (anIRInlinedClosure){
  2402. var self=this;
  2403. return smalltalk.withContext(function($ctx1) {
  2404. var $1;
  2405. $1=self._visitIRClosure_(anIRInlinedClosure);
  2406. return $1;
  2407. }, function($ctx1) {$ctx1.fill(self,"visitIRInlinedClosure:",{anIRInlinedClosure:anIRInlinedClosure},globals.IRVisitor)})},
  2408. args: ["anIRInlinedClosure"],
  2409. source: "visitIRInlinedClosure: anIRInlinedClosure\x0a\x09^ self visitIRClosure: anIRInlinedClosure",
  2410. messageSends: ["visitIRClosure:"],
  2411. referencedClasses: []
  2412. }),
  2413. globals.IRVisitor);
  2414. smalltalk.addMethod(
  2415. smalltalk.method({
  2416. selector: "visitIRInlinedSequence:",
  2417. protocol: 'visiting',
  2418. fn: function (anIRInlinedSequence){
  2419. var self=this;
  2420. return smalltalk.withContext(function($ctx1) {
  2421. var $1;
  2422. $1=self._visitIRSequence_(anIRInlinedSequence);
  2423. return $1;
  2424. }, function($ctx1) {$ctx1.fill(self,"visitIRInlinedSequence:",{anIRInlinedSequence:anIRInlinedSequence},globals.IRVisitor)})},
  2425. args: ["anIRInlinedSequence"],
  2426. source: "visitIRInlinedSequence: anIRInlinedSequence\x0a\x09^ self visitIRSequence: anIRInlinedSequence",
  2427. messageSends: ["visitIRSequence:"],
  2428. referencedClasses: []
  2429. }),
  2430. globals.IRVisitor);
  2431. smalltalk.addMethod(
  2432. smalltalk.method({
  2433. selector: "visitIRInstruction:",
  2434. protocol: 'visiting',
  2435. fn: function (anIRInstruction){
  2436. var self=this;
  2437. return smalltalk.withContext(function($ctx1) {
  2438. _st(_st(anIRInstruction)._instructions())._do_((function(each){
  2439. return smalltalk.withContext(function($ctx2) {
  2440. return self._visit_(each);
  2441. }, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1,1)})}));
  2442. return anIRInstruction;
  2443. }, function($ctx1) {$ctx1.fill(self,"visitIRInstruction:",{anIRInstruction:anIRInstruction},globals.IRVisitor)})},
  2444. args: ["anIRInstruction"],
  2445. source: "visitIRInstruction: anIRInstruction\x0a\x09anIRInstruction instructions do: [ :each | self visit: each ].\x0a\x09^ anIRInstruction",
  2446. messageSends: ["do:", "instructions", "visit:"],
  2447. referencedClasses: []
  2448. }),
  2449. globals.IRVisitor);
  2450. smalltalk.addMethod(
  2451. smalltalk.method({
  2452. selector: "visitIRMethod:",
  2453. protocol: 'visiting',
  2454. fn: function (anIRMethod){
  2455. var self=this;
  2456. return smalltalk.withContext(function($ctx1) {
  2457. var $1;
  2458. $1=self._visitIRInstruction_(anIRMethod);
  2459. return $1;
  2460. }, function($ctx1) {$ctx1.fill(self,"visitIRMethod:",{anIRMethod:anIRMethod},globals.IRVisitor)})},
  2461. args: ["anIRMethod"],
  2462. source: "visitIRMethod: anIRMethod\x0a\x09^ self visitIRInstruction: anIRMethod",
  2463. messageSends: ["visitIRInstruction:"],
  2464. referencedClasses: []
  2465. }),
  2466. globals.IRVisitor);
  2467. smalltalk.addMethod(
  2468. smalltalk.method({
  2469. selector: "visitIRNonLocalReturn:",
  2470. protocol: 'visiting',
  2471. fn: function (anIRNonLocalReturn){
  2472. var self=this;
  2473. return smalltalk.withContext(function($ctx1) {
  2474. var $1;
  2475. $1=self._visitIRInstruction_(anIRNonLocalReturn);
  2476. return $1;
  2477. }, function($ctx1) {$ctx1.fill(self,"visitIRNonLocalReturn:",{anIRNonLocalReturn:anIRNonLocalReturn},globals.IRVisitor)})},
  2478. args: ["anIRNonLocalReturn"],
  2479. source: "visitIRNonLocalReturn: anIRNonLocalReturn\x0a\x09^ self visitIRInstruction: anIRNonLocalReturn",
  2480. messageSends: ["visitIRInstruction:"],
  2481. referencedClasses: []
  2482. }),
  2483. globals.IRVisitor);
  2484. smalltalk.addMethod(
  2485. smalltalk.method({
  2486. selector: "visitIRNonLocalReturnHandling:",
  2487. protocol: 'visiting',
  2488. fn: function (anIRNonLocalReturnHandling){
  2489. var self=this;
  2490. return smalltalk.withContext(function($ctx1) {
  2491. var $1;
  2492. $1=self._visitIRInstruction_(anIRNonLocalReturnHandling);
  2493. return $1;
  2494. }, function($ctx1) {$ctx1.fill(self,"visitIRNonLocalReturnHandling:",{anIRNonLocalReturnHandling:anIRNonLocalReturnHandling},globals.IRVisitor)})},
  2495. args: ["anIRNonLocalReturnHandling"],
  2496. source: "visitIRNonLocalReturnHandling: anIRNonLocalReturnHandling\x0a\x09^ self visitIRInstruction: anIRNonLocalReturnHandling",
  2497. messageSends: ["visitIRInstruction:"],
  2498. referencedClasses: []
  2499. }),
  2500. globals.IRVisitor);
  2501. smalltalk.addMethod(
  2502. smalltalk.method({
  2503. selector: "visitIRReturn:",
  2504. protocol: 'visiting',
  2505. fn: function (anIRReturn){
  2506. var self=this;
  2507. return smalltalk.withContext(function($ctx1) {
  2508. var $1;
  2509. $1=self._visitIRInstruction_(anIRReturn);
  2510. return $1;
  2511. }, function($ctx1) {$ctx1.fill(self,"visitIRReturn:",{anIRReturn:anIRReturn},globals.IRVisitor)})},
  2512. args: ["anIRReturn"],
  2513. source: "visitIRReturn: anIRReturn\x0a\x09^ self visitIRInstruction: anIRReturn",
  2514. messageSends: ["visitIRInstruction:"],
  2515. referencedClasses: []
  2516. }),
  2517. globals.IRVisitor);
  2518. smalltalk.addMethod(
  2519. smalltalk.method({
  2520. selector: "visitIRSend:",
  2521. protocol: 'visiting',
  2522. fn: function (anIRSend){
  2523. var self=this;
  2524. return smalltalk.withContext(function($ctx1) {
  2525. var $1;
  2526. $1=self._visitIRInstruction_(anIRSend);
  2527. return $1;
  2528. }, function($ctx1) {$ctx1.fill(self,"visitIRSend:",{anIRSend:anIRSend},globals.IRVisitor)})},
  2529. args: ["anIRSend"],
  2530. source: "visitIRSend: anIRSend\x0a\x09^ self visitIRInstruction: anIRSend",
  2531. messageSends: ["visitIRInstruction:"],
  2532. referencedClasses: []
  2533. }),
  2534. globals.IRVisitor);
  2535. smalltalk.addMethod(
  2536. smalltalk.method({
  2537. selector: "visitIRSequence:",
  2538. protocol: 'visiting',
  2539. fn: function (anIRSequence){
  2540. var self=this;
  2541. return smalltalk.withContext(function($ctx1) {
  2542. var $1;
  2543. $1=self._visitIRInstruction_(anIRSequence);
  2544. return $1;
  2545. }, function($ctx1) {$ctx1.fill(self,"visitIRSequence:",{anIRSequence:anIRSequence},globals.IRVisitor)})},
  2546. args: ["anIRSequence"],
  2547. source: "visitIRSequence: anIRSequence\x0a\x09^ self visitIRInstruction: anIRSequence",
  2548. messageSends: ["visitIRInstruction:"],
  2549. referencedClasses: []
  2550. }),
  2551. globals.IRVisitor);
  2552. smalltalk.addMethod(
  2553. smalltalk.method({
  2554. selector: "visitIRTempDeclaration:",
  2555. protocol: 'visiting',
  2556. fn: function (anIRTempDeclaration){
  2557. var self=this;
  2558. return smalltalk.withContext(function($ctx1) {
  2559. var $1;
  2560. $1=self._visitIRInstruction_(anIRTempDeclaration);
  2561. return $1;
  2562. }, function($ctx1) {$ctx1.fill(self,"visitIRTempDeclaration:",{anIRTempDeclaration:anIRTempDeclaration},globals.IRVisitor)})},
  2563. args: ["anIRTempDeclaration"],
  2564. source: "visitIRTempDeclaration: anIRTempDeclaration\x0a\x09^ self visitIRInstruction: anIRTempDeclaration",
  2565. messageSends: ["visitIRInstruction:"],
  2566. referencedClasses: []
  2567. }),
  2568. globals.IRVisitor);
  2569. smalltalk.addMethod(
  2570. smalltalk.method({
  2571. selector: "visitIRValue:",
  2572. protocol: 'visiting',
  2573. fn: function (anIRValue){
  2574. var self=this;
  2575. return smalltalk.withContext(function($ctx1) {
  2576. var $1;
  2577. $1=self._visitIRInstruction_(anIRValue);
  2578. return $1;
  2579. }, function($ctx1) {$ctx1.fill(self,"visitIRValue:",{anIRValue:anIRValue},globals.IRVisitor)})},
  2580. args: ["anIRValue"],
  2581. source: "visitIRValue: anIRValue\x0a\x09^ self visitIRInstruction: anIRValue",
  2582. messageSends: ["visitIRInstruction:"],
  2583. referencedClasses: []
  2584. }),
  2585. globals.IRVisitor);
  2586. smalltalk.addMethod(
  2587. smalltalk.method({
  2588. selector: "visitIRVariable:",
  2589. protocol: 'visiting',
  2590. fn: function (anIRVariable){
  2591. var self=this;
  2592. return smalltalk.withContext(function($ctx1) {
  2593. var $1;
  2594. $1=self._visitIRInstruction_(anIRVariable);
  2595. return $1;
  2596. }, function($ctx1) {$ctx1.fill(self,"visitIRVariable:",{anIRVariable:anIRVariable},globals.IRVisitor)})},
  2597. args: ["anIRVariable"],
  2598. source: "visitIRVariable: anIRVariable\x0a\x09^ self visitIRInstruction: anIRVariable",
  2599. messageSends: ["visitIRInstruction:"],
  2600. referencedClasses: []
  2601. }),
  2602. globals.IRVisitor);
  2603. smalltalk.addMethod(
  2604. smalltalk.method({
  2605. selector: "visitIRVerbatim:",
  2606. protocol: 'visiting',
  2607. fn: function (anIRVerbatim){
  2608. var self=this;
  2609. return smalltalk.withContext(function($ctx1) {
  2610. var $1;
  2611. $1=self._visitIRInstruction_(anIRVerbatim);
  2612. return $1;
  2613. }, function($ctx1) {$ctx1.fill(self,"visitIRVerbatim:",{anIRVerbatim:anIRVerbatim},globals.IRVisitor)})},
  2614. args: ["anIRVerbatim"],
  2615. source: "visitIRVerbatim: anIRVerbatim\x0a\x09^ self visitIRInstruction: anIRVerbatim",
  2616. messageSends: ["visitIRInstruction:"],
  2617. referencedClasses: []
  2618. }),
  2619. globals.IRVisitor);
  2620. smalltalk.addClass('IRJSTranslator', globals.IRVisitor, ['stream', 'currentClass'], 'Compiler-IR');
  2621. smalltalk.addMethod(
  2622. smalltalk.method({
  2623. selector: "contents",
  2624. protocol: 'accessing',
  2625. fn: function (){
  2626. var self=this;
  2627. return smalltalk.withContext(function($ctx1) {
  2628. var $1;
  2629. $1=_st(self._stream())._contents();
  2630. return $1;
  2631. }, function($ctx1) {$ctx1.fill(self,"contents",{},globals.IRJSTranslator)})},
  2632. args: [],
  2633. source: "contents\x0a\x09^ self stream contents",
  2634. messageSends: ["contents", "stream"],
  2635. referencedClasses: []
  2636. }),
  2637. globals.IRJSTranslator);
  2638. smalltalk.addMethod(
  2639. smalltalk.method({
  2640. selector: "currentClass",
  2641. protocol: 'accessing',
  2642. fn: function (){
  2643. var self=this;
  2644. var $1;
  2645. $1=self["@currentClass"];
  2646. return $1;
  2647. },
  2648. args: [],
  2649. source: "currentClass\x0a\x09^ currentClass",
  2650. messageSends: [],
  2651. referencedClasses: []
  2652. }),
  2653. globals.IRJSTranslator);
  2654. smalltalk.addMethod(
  2655. smalltalk.method({
  2656. selector: "currentClass:",
  2657. protocol: 'accessing',
  2658. fn: function (aClass){
  2659. var self=this;
  2660. self["@currentClass"]=aClass;
  2661. return self},
  2662. args: ["aClass"],
  2663. source: "currentClass: aClass\x0a\x09currentClass := aClass",
  2664. messageSends: [],
  2665. referencedClasses: []
  2666. }),
  2667. globals.IRJSTranslator);
  2668. smalltalk.addMethod(
  2669. smalltalk.method({
  2670. selector: "initialize",
  2671. protocol: 'initialization',
  2672. fn: function (){
  2673. var self=this;
  2674. function $JSStream(){return globals.JSStream||(typeof JSStream=="undefined"?nil:JSStream)}
  2675. return smalltalk.withContext(function($ctx1) {
  2676. globals.IRJSTranslator.superclass.fn.prototype._initialize.apply(_st(self), []);
  2677. self["@stream"]=_st($JSStream())._new();
  2678. return self}, function($ctx1) {$ctx1.fill(self,"initialize",{},globals.IRJSTranslator)})},
  2679. args: [],
  2680. source: "initialize\x0a\x09super initialize.\x0a\x09stream := JSStream new.",
  2681. messageSends: ["initialize", "new"],
  2682. referencedClasses: ["JSStream"]
  2683. }),
  2684. globals.IRJSTranslator);
  2685. smalltalk.addMethod(
  2686. smalltalk.method({
  2687. selector: "stream",
  2688. protocol: 'accessing',
  2689. fn: function (){
  2690. var self=this;
  2691. var $1;
  2692. $1=self["@stream"];
  2693. return $1;
  2694. },
  2695. args: [],
  2696. source: "stream\x0a\x09^ stream",
  2697. messageSends: [],
  2698. referencedClasses: []
  2699. }),
  2700. globals.IRJSTranslator);
  2701. smalltalk.addMethod(
  2702. smalltalk.method({
  2703. selector: "stream:",
  2704. protocol: 'accessing',
  2705. fn: function (aStream){
  2706. var self=this;
  2707. self["@stream"]=aStream;
  2708. return self},
  2709. args: ["aStream"],
  2710. source: "stream: aStream\x0a\x09stream := aStream",
  2711. messageSends: [],
  2712. referencedClasses: []
  2713. }),
  2714. globals.IRJSTranslator);
  2715. smalltalk.addMethod(
  2716. smalltalk.method({
  2717. selector: "visitIRAssignment:",
  2718. protocol: 'visiting',
  2719. fn: function (anIRAssignment){
  2720. var self=this;
  2721. return smalltalk.withContext(function($ctx1) {
  2722. var $2,$1;
  2723. $2=_st(anIRAssignment)._instructions();
  2724. $ctx1.sendIdx["instructions"]=1;
  2725. $1=_st($2)._first();
  2726. self._visit_($1);
  2727. $ctx1.sendIdx["visit:"]=1;
  2728. _st(self._stream())._nextPutAssignment();
  2729. self._visit_(_st(_st(anIRAssignment)._instructions())._last());
  2730. return self}, function($ctx1) {$ctx1.fill(self,"visitIRAssignment:",{anIRAssignment:anIRAssignment},globals.IRJSTranslator)})},
  2731. args: ["anIRAssignment"],
  2732. source: "visitIRAssignment: anIRAssignment\x0a\x09self visit: anIRAssignment instructions first.\x0a\x09self stream nextPutAssignment.\x0a\x09self visit: anIRAssignment instructions last.",
  2733. messageSends: ["visit:", "first", "instructions", "nextPutAssignment", "stream", "last"],
  2734. referencedClasses: []
  2735. }),
  2736. globals.IRJSTranslator);
  2737. smalltalk.addMethod(
  2738. smalltalk.method({
  2739. selector: "visitIRClosure:",
  2740. protocol: 'visiting',
  2741. fn: function (anIRClosure){
  2742. var self=this;
  2743. return smalltalk.withContext(function($ctx1) {
  2744. var $1,$2;
  2745. $1=self._stream();
  2746. $ctx1.sendIdx["stream"]=1;
  2747. _st($1)._nextPutClosureWith_arguments_((function(){
  2748. return smalltalk.withContext(function($ctx2) {
  2749. $2=self._stream();
  2750. $ctx2.sendIdx["stream"]=2;
  2751. _st($2)._nextPutVars_(_st(_st(anIRClosure)._tempDeclarations())._collect_((function(each){
  2752. return smalltalk.withContext(function($ctx3) {
  2753. return _st(_st(each)._name())._asVariableName();
  2754. }, function($ctx3) {$ctx3.fillBlock({each:each},$ctx2,2)})})));
  2755. return _st(self._stream())._nextPutBlockContextFor_during_(anIRClosure,(function(){
  2756. return smalltalk.withContext(function($ctx3) {
  2757. return globals.IRJSTranslator.superclass.fn.prototype._visitIRClosure_.apply(_st(self), [anIRClosure]);
  2758. }, function($ctx3) {$ctx3.fillBlock({},$ctx2,3)})}));
  2759. }, function($ctx2) {$ctx2.fillBlock({},$ctx1,1)})}),_st(anIRClosure)._arguments());
  2760. return self}, function($ctx1) {$ctx1.fill(self,"visitIRClosure:",{anIRClosure:anIRClosure},globals.IRJSTranslator)})},
  2761. args: ["anIRClosure"],
  2762. source: "visitIRClosure: anIRClosure\x0a\x09self stream\x0a\x09\x09nextPutClosureWith: [\x0a\x09\x09\x09self stream nextPutVars: (anIRClosure tempDeclarations collect: [ :each |\x0a\x09\x09\x09\x09\x09each name asVariableName ]).\x0a\x09\x09\x09self stream\x0a\x09\x09\x09\x09nextPutBlockContextFor: anIRClosure\x0a\x09\x09\x09\x09during: [ super visitIRClosure: anIRClosure ] ]\x0a\x09\x09arguments: anIRClosure arguments",
  2763. messageSends: ["nextPutClosureWith:arguments:", "stream", "nextPutVars:", "collect:", "tempDeclarations", "asVariableName", "name", "nextPutBlockContextFor:during:", "visitIRClosure:", "arguments"],
  2764. referencedClasses: []
  2765. }),
  2766. globals.IRJSTranslator);
  2767. smalltalk.addMethod(
  2768. smalltalk.method({
  2769. selector: "visitIRDynamicArray:",
  2770. protocol: 'visiting',
  2771. fn: function (anIRDynamicArray){
  2772. var self=this;
  2773. return smalltalk.withContext(function($ctx1) {
  2774. var $1;
  2775. $1=self._stream();
  2776. $ctx1.sendIdx["stream"]=1;
  2777. _st($1)._nextPutAll_("[");
  2778. $ctx1.sendIdx["nextPutAll:"]=1;
  2779. _st(_st(anIRDynamicArray)._instructions())._do_separatedBy_((function(each){
  2780. return smalltalk.withContext(function($ctx2) {
  2781. return self._visit_(each);
  2782. }, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1,1)})}),(function(){
  2783. return smalltalk.withContext(function($ctx2) {
  2784. return _st(self._stream())._nextPutAll_(",");
  2785. $ctx2.sendIdx["nextPutAll:"]=2;
  2786. }, function($ctx2) {$ctx2.fillBlock({},$ctx1,2)})}));
  2787. _st(self["@stream"])._nextPutAll_("]");
  2788. return self}, function($ctx1) {$ctx1.fill(self,"visitIRDynamicArray:",{anIRDynamicArray:anIRDynamicArray},globals.IRJSTranslator)})},
  2789. args: ["anIRDynamicArray"],
  2790. source: "visitIRDynamicArray: anIRDynamicArray\x0a\x09self stream nextPutAll: '['.\x0a\x09anIRDynamicArray instructions\x0a\x09\x09do: [ :each | self visit: each ]\x0a\x09\x09separatedBy: [ self stream nextPutAll: ',' ].\x0a\x09stream nextPutAll: ']'",
  2791. messageSends: ["nextPutAll:", "stream", "do:separatedBy:", "instructions", "visit:"],
  2792. referencedClasses: []
  2793. }),
  2794. globals.IRJSTranslator);
  2795. smalltalk.addMethod(
  2796. smalltalk.method({
  2797. selector: "visitIRDynamicDictionary:",
  2798. protocol: 'visiting',
  2799. fn: function (anIRDynamicDictionary){
  2800. var self=this;
  2801. return smalltalk.withContext(function($ctx1) {
  2802. var $1,$2;
  2803. $1=self._stream();
  2804. $ctx1.sendIdx["stream"]=1;
  2805. _st($1)._nextPutAll_("globals.HashedCollection._from_([");
  2806. $ctx1.sendIdx["nextPutAll:"]=1;
  2807. _st(_st(anIRDynamicDictionary)._instructions())._do_separatedBy_((function(each){
  2808. return smalltalk.withContext(function($ctx2) {
  2809. return self._visit_(each);
  2810. }, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1,1)})}),(function(){
  2811. return smalltalk.withContext(function($ctx2) {
  2812. $2=self._stream();
  2813. $ctx2.sendIdx["stream"]=2;
  2814. return _st($2)._nextPutAll_(",");
  2815. $ctx2.sendIdx["nextPutAll:"]=2;
  2816. }, function($ctx2) {$ctx2.fillBlock({},$ctx1,2)})}));
  2817. _st(self._stream())._nextPutAll_("])");
  2818. return self}, function($ctx1) {$ctx1.fill(self,"visitIRDynamicDictionary:",{anIRDynamicDictionary:anIRDynamicDictionary},globals.IRJSTranslator)})},
  2819. args: ["anIRDynamicDictionary"],
  2820. source: "visitIRDynamicDictionary: anIRDynamicDictionary\x0a\x09self stream nextPutAll: 'globals.HashedCollection._from_(['.\x0a\x09\x09anIRDynamicDictionary instructions\x0a\x09\x09\x09do: [ :each | self visit: each ]\x0a\x09\x09\x09separatedBy: [ self stream nextPutAll: ',' ].\x0a\x09self stream nextPutAll: '])'",
  2821. messageSends: ["nextPutAll:", "stream", "do:separatedBy:", "instructions", "visit:"],
  2822. referencedClasses: []
  2823. }),
  2824. globals.IRJSTranslator);
  2825. smalltalk.addMethod(
  2826. smalltalk.method({
  2827. selector: "visitIRMethod:",
  2828. protocol: 'visiting',
  2829. fn: function (anIRMethod){
  2830. var self=this;
  2831. return smalltalk.withContext(function($ctx1) {
  2832. var $1,$2,$3,$4,$5,$6,$8,$7,$9,$10;
  2833. $1=self._stream();
  2834. $ctx1.sendIdx["stream"]=1;
  2835. _st($1)._nextPutMethodDeclaration_with_(anIRMethod,(function(){
  2836. return smalltalk.withContext(function($ctx2) {
  2837. $2=self._stream();
  2838. $ctx2.sendIdx["stream"]=2;
  2839. return _st($2)._nextPutFunctionWith_arguments_((function(){
  2840. return smalltalk.withContext(function($ctx3) {
  2841. $3=self._stream();
  2842. $ctx3.sendIdx["stream"]=3;
  2843. $4=_st(_st(anIRMethod)._tempDeclarations())._collect_((function(each){
  2844. return smalltalk.withContext(function($ctx4) {
  2845. return _st(_st(each)._name())._asVariableName();
  2846. }, function($ctx4) {$ctx4.fillBlock({each:each},$ctx3,3)})}));
  2847. $ctx3.sendIdx["collect:"]=1;
  2848. _st($3)._nextPutVars_($4);
  2849. $ctx3.sendIdx["nextPutVars:"]=1;
  2850. _st(_st(anIRMethod)._classReferences())._do_((function(each){
  2851. return smalltalk.withContext(function($ctx4) {
  2852. $5=self._stream();
  2853. $ctx4.sendIdx["stream"]=4;
  2854. return _st($5)._nextPutClassRefFunction_(each);
  2855. }, function($ctx4) {$ctx4.fillBlock({each:each},$ctx3,4)})}));
  2856. $6=self._stream();
  2857. $ctx3.sendIdx["stream"]=5;
  2858. return _st($6)._nextPutContextFor_during_(anIRMethod,(function(){
  2859. return smalltalk.withContext(function($ctx4) {
  2860. $8=_st(anIRMethod)._internalVariables();
  2861. $ctx4.sendIdx["internalVariables"]=1;
  2862. $7=_st($8)._notEmpty();
  2863. if(smalltalk.assert($7)){
  2864. $9=self._stream();
  2865. $ctx4.sendIdx["stream"]=6;
  2866. _st($9)._nextPutVars_(_st(_st(_st(anIRMethod)._internalVariables())._asArray())._collect_((function(each){
  2867. return smalltalk.withContext(function($ctx5) {
  2868. return _st(_st(each)._variable())._alias();
  2869. }, function($ctx5) {$ctx5.fillBlock({each:each},$ctx4,7)})})));
  2870. };
  2871. $10=_st(_st(anIRMethod)._scope())._hasNonLocalReturn();
  2872. if(smalltalk.assert($10)){
  2873. return _st(self._stream())._nextPutNonLocalReturnHandlingWith_((function(){
  2874. return smalltalk.withContext(function($ctx5) {
  2875. return globals.IRJSTranslator.superclass.fn.prototype._visitIRMethod_.apply(_st(self), [anIRMethod]);
  2876. $ctx5.sendIdx["visitIRMethod:"]=1;
  2877. }, function($ctx5) {$ctx5.fillBlock({},$ctx4,9)})}));
  2878. } else {
  2879. return globals.IRJSTranslator.superclass.fn.prototype._visitIRMethod_.apply(_st(self), [anIRMethod]);
  2880. };
  2881. }, function($ctx4) {$ctx4.fillBlock({},$ctx3,5)})}));
  2882. }, function($ctx3) {$ctx3.fillBlock({},$ctx2,2)})}),_st(anIRMethod)._arguments());
  2883. }, function($ctx2) {$ctx2.fillBlock({},$ctx1,1)})}));
  2884. return self}, function($ctx1) {$ctx1.fill(self,"visitIRMethod:",{anIRMethod:anIRMethod},globals.IRJSTranslator)})},
  2885. args: ["anIRMethod"],
  2886. source: "visitIRMethod: anIRMethod\x0a\x0a\x09self stream\x0a\x09\x09nextPutMethodDeclaration: anIRMethod\x0a\x09\x09with: [ self stream\x0a\x09\x09\x09nextPutFunctionWith: [\x0a\x09\x09\x09\x09self stream nextPutVars: (anIRMethod tempDeclarations collect: [ :each |\x0a\x09\x09\x09\x09\x09each name asVariableName ]).\x0a\x09\x09\x09\x09anIRMethod classReferences do: [ :each | self stream nextPutClassRefFunction: each ].\x0a\x09\x09\x09\x09self stream nextPutContextFor: anIRMethod during: [\x0a\x09\x09\x09\x09anIRMethod internalVariables notEmpty ifTrue: [\x0a\x09\x09\x09\x09\x09self stream nextPutVars: (anIRMethod internalVariables asArray collect: [ :each |\x0a\x09\x09\x09\x09\x09\x09each variable alias ]) ].\x0a\x09\x09\x09\x09anIRMethod scope hasNonLocalReturn\x0a\x09\x09\x09\x09\x09ifTrue: [\x0a\x09\x09\x09\x09\x09\x09self stream nextPutNonLocalReturnHandlingWith: [\x0a\x09\x09\x09\x09\x09\x09\x09super visitIRMethod: anIRMethod ] ]\x0a\x09\x09\x09\x09\x09ifFalse: [ super visitIRMethod: anIRMethod ] ]]\x0a\x09\x09\x09arguments: anIRMethod arguments ]",
  2887. messageSends: ["nextPutMethodDeclaration:with:", "stream", "nextPutFunctionWith:arguments:", "nextPutVars:", "collect:", "tempDeclarations", "asVariableName", "name", "do:", "classReferences", "nextPutClassRefFunction:", "nextPutContextFor:during:", "ifTrue:", "notEmpty", "internalVariables", "asArray", "alias", "variable", "ifTrue:ifFalse:", "hasNonLocalReturn", "scope", "nextPutNonLocalReturnHandlingWith:", "visitIRMethod:", "arguments"],
  2888. referencedClasses: []
  2889. }),
  2890. globals.IRJSTranslator);
  2891. smalltalk.addMethod(
  2892. smalltalk.method({
  2893. selector: "visitIRNonLocalReturn:",
  2894. protocol: 'visiting',
  2895. fn: function (anIRNonLocalReturn){
  2896. var self=this;
  2897. return smalltalk.withContext(function($ctx1) {
  2898. _st(self._stream())._nextPutNonLocalReturnWith_((function(){
  2899. return smalltalk.withContext(function($ctx2) {
  2900. return globals.IRJSTranslator.superclass.fn.prototype._visitIRNonLocalReturn_.apply(_st(self), [anIRNonLocalReturn]);
  2901. }, function($ctx2) {$ctx2.fillBlock({},$ctx1,1)})}));
  2902. return self}, function($ctx1) {$ctx1.fill(self,"visitIRNonLocalReturn:",{anIRNonLocalReturn:anIRNonLocalReturn},globals.IRJSTranslator)})},
  2903. args: ["anIRNonLocalReturn"],
  2904. source: "visitIRNonLocalReturn: anIRNonLocalReturn\x0a\x09self stream nextPutNonLocalReturnWith: [\x0a\x09\x09super visitIRNonLocalReturn: anIRNonLocalReturn ]",
  2905. messageSends: ["nextPutNonLocalReturnWith:", "stream", "visitIRNonLocalReturn:"],
  2906. referencedClasses: []
  2907. }),
  2908. globals.IRJSTranslator);
  2909. smalltalk.addMethod(
  2910. smalltalk.method({
  2911. selector: "visitIRReturn:",
  2912. protocol: 'visiting',
  2913. fn: function (anIRReturn){
  2914. var self=this;
  2915. return smalltalk.withContext(function($ctx1) {
  2916. _st(self._stream())._nextPutReturnWith_((function(){
  2917. return smalltalk.withContext(function($ctx2) {
  2918. return globals.IRJSTranslator.superclass.fn.prototype._visitIRReturn_.apply(_st(self), [anIRReturn]);
  2919. }, function($ctx2) {$ctx2.fillBlock({},$ctx1,1)})}));
  2920. return self}, function($ctx1) {$ctx1.fill(self,"visitIRReturn:",{anIRReturn:anIRReturn},globals.IRJSTranslator)})},
  2921. args: ["anIRReturn"],
  2922. source: "visitIRReturn: anIRReturn\x0a\x09self stream nextPutReturnWith: [\x0a\x09\x09super visitIRReturn: anIRReturn ]",
  2923. messageSends: ["nextPutReturnWith:", "stream", "visitIRReturn:"],
  2924. referencedClasses: []
  2925. }),
  2926. globals.IRJSTranslator);
  2927. smalltalk.addMethod(
  2928. smalltalk.method({
  2929. selector: "visitIRSend:",
  2930. protocol: 'visiting',
  2931. fn: function (anIRSend){
  2932. var self=this;
  2933. var sends;
  2934. return smalltalk.withContext(function($ctx1) {
  2935. var $1,$2;
  2936. sends=_st(_st(_st(_st(anIRSend)._method())._sendIndexes())._at_(_st(anIRSend)._selector()))._size();
  2937. $1=_st(anIRSend)._classSend();
  2938. if(($receiver = $1) == nil || $receiver == null){
  2939. self._visitSend_(anIRSend);
  2940. } else {
  2941. self._visitSuperSend_(anIRSend);
  2942. };
  2943. $2=_st(_st(sends).__gt((1)))._and_((function(){
  2944. return smalltalk.withContext(function($ctx2) {
  2945. return _st(_st(anIRSend)._index()).__lt(sends);
  2946. }, function($ctx2) {$ctx2.fillBlock({},$ctx1,3)})}));
  2947. if(smalltalk.assert($2)){
  2948. _st(self._stream())._nextPutSendIndexFor_(anIRSend);
  2949. };
  2950. return self}, function($ctx1) {$ctx1.fill(self,"visitIRSend:",{anIRSend:anIRSend,sends:sends},globals.IRJSTranslator)})},
  2951. args: ["anIRSend"],
  2952. source: "visitIRSend: anIRSend\x0a\x09| sends |\x0a\x09sends := (anIRSend method sendIndexes at: anIRSend selector) size.\x0a\x09\x0a\x09anIRSend classSend\x0a\x09\x09ifNil: [ self visitSend: anIRSend ]\x0a\x09\x09ifNotNil: [ self visitSuperSend: anIRSend ].\x0a\x09\x09\x0a\x09(sends > 1 and: [ anIRSend index < sends ])\x0a\x09\x09ifTrue: [ self stream nextPutSendIndexFor: anIRSend ]",
  2953. messageSends: ["size", "at:", "sendIndexes", "method", "selector", "ifNil:ifNotNil:", "classSend", "visitSend:", "visitSuperSend:", "ifTrue:", "and:", ">", "<", "index", "nextPutSendIndexFor:", "stream"],
  2954. referencedClasses: []
  2955. }),
  2956. globals.IRJSTranslator);
  2957. smalltalk.addMethod(
  2958. smalltalk.method({
  2959. selector: "visitIRSequence:",
  2960. protocol: 'visiting',
  2961. fn: function (anIRSequence){
  2962. var self=this;
  2963. return smalltalk.withContext(function($ctx1) {
  2964. var $1;
  2965. $1=self._stream();
  2966. $ctx1.sendIdx["stream"]=1;
  2967. _st($1)._nextPutSequenceWith_((function(){
  2968. return smalltalk.withContext(function($ctx2) {
  2969. return _st(_st(anIRSequence)._instructions())._do_((function(each){
  2970. return smalltalk.withContext(function($ctx3) {
  2971. return _st(self._stream())._nextPutStatementWith_(self._visit_(each));
  2972. }, function($ctx3) {$ctx3.fillBlock({each:each},$ctx2,2)})}));
  2973. }, function($ctx2) {$ctx2.fillBlock({},$ctx1,1)})}));
  2974. return self}, function($ctx1) {$ctx1.fill(self,"visitIRSequence:",{anIRSequence:anIRSequence},globals.IRJSTranslator)})},
  2975. args: ["anIRSequence"],
  2976. source: "visitIRSequence: anIRSequence\x0a\x09self stream nextPutSequenceWith: [\x0a\x09\x09anIRSequence instructions do: [ :each |\x0a\x09\x09\x09self stream nextPutStatementWith: (self visit: each) ] ]",
  2977. messageSends: ["nextPutSequenceWith:", "stream", "do:", "instructions", "nextPutStatementWith:", "visit:"],
  2978. referencedClasses: []
  2979. }),
  2980. globals.IRJSTranslator);
  2981. smalltalk.addMethod(
  2982. smalltalk.method({
  2983. selector: "visitIRTempDeclaration:",
  2984. protocol: 'visiting',
  2985. fn: function (anIRTempDeclaration){
  2986. var self=this;
  2987. return self},
  2988. args: ["anIRTempDeclaration"],
  2989. source: "visitIRTempDeclaration: anIRTempDeclaration\x0a\x09\x22self stream\x0a\x09\x09nextPutAll: 'var ', anIRTempDeclaration name asVariableName, ';';\x0a\x09\x09lf\x22",
  2990. messageSends: [],
  2991. referencedClasses: []
  2992. }),
  2993. globals.IRJSTranslator);
  2994. smalltalk.addMethod(
  2995. smalltalk.method({
  2996. selector: "visitIRValue:",
  2997. protocol: 'visiting',
  2998. fn: function (anIRValue){
  2999. var self=this;
  3000. return smalltalk.withContext(function($ctx1) {
  3001. _st(self._stream())._nextPutAll_(_st(_st(anIRValue)._value())._asJavascript());
  3002. return self}, function($ctx1) {$ctx1.fill(self,"visitIRValue:",{anIRValue:anIRValue},globals.IRJSTranslator)})},
  3003. args: ["anIRValue"],
  3004. source: "visitIRValue: anIRValue\x0a\x09self stream nextPutAll: anIRValue value asJavascript",
  3005. messageSends: ["nextPutAll:", "stream", "asJavascript", "value"],
  3006. referencedClasses: []
  3007. }),
  3008. globals.IRJSTranslator);
  3009. smalltalk.addMethod(
  3010. smalltalk.method({
  3011. selector: "visitIRVariable:",
  3012. protocol: 'visiting',
  3013. fn: function (anIRVariable){
  3014. var self=this;
  3015. return smalltalk.withContext(function($ctx1) {
  3016. var $3,$2,$1,$4;
  3017. $3=_st(anIRVariable)._variable();
  3018. $ctx1.sendIdx["variable"]=1;
  3019. $2=_st($3)._name();
  3020. $1=_st($2).__eq("thisContext");
  3021. if(smalltalk.assert($1)){
  3022. $4=self._stream();
  3023. $ctx1.sendIdx["stream"]=1;
  3024. _st($4)._nextPutAll_("smalltalk.getThisContext()");
  3025. $ctx1.sendIdx["nextPutAll:"]=1;
  3026. } else {
  3027. _st(self._stream())._nextPutAll_(_st(_st(anIRVariable)._variable())._alias());
  3028. };
  3029. return self}, function($ctx1) {$ctx1.fill(self,"visitIRVariable:",{anIRVariable:anIRVariable},globals.IRJSTranslator)})},
  3030. args: ["anIRVariable"],
  3031. source: "visitIRVariable: anIRVariable\x0a\x09anIRVariable variable name = 'thisContext'\x0a\x09\x09ifTrue: [ self stream nextPutAll: 'smalltalk.getThisContext()' ]\x0a\x09\x09ifFalse: [ self stream nextPutAll: anIRVariable variable alias ]",
  3032. messageSends: ["ifTrue:ifFalse:", "=", "name", "variable", "nextPutAll:", "stream", "alias"],
  3033. referencedClasses: []
  3034. }),
  3035. globals.IRJSTranslator);
  3036. smalltalk.addMethod(
  3037. smalltalk.method({
  3038. selector: "visitIRVerbatim:",
  3039. protocol: 'visiting',
  3040. fn: function (anIRVerbatim){
  3041. var self=this;
  3042. return smalltalk.withContext(function($ctx1) {
  3043. var $1;
  3044. $1=self._stream();
  3045. $ctx1.sendIdx["stream"]=1;
  3046. _st($1)._nextPutStatementWith_((function(){
  3047. return smalltalk.withContext(function($ctx2) {
  3048. return _st(self._stream())._nextPutAll_(_st(anIRVerbatim)._source());
  3049. }, function($ctx2) {$ctx2.fillBlock({},$ctx1,1)})}));
  3050. return self}, function($ctx1) {$ctx1.fill(self,"visitIRVerbatim:",{anIRVerbatim:anIRVerbatim},globals.IRJSTranslator)})},
  3051. args: ["anIRVerbatim"],
  3052. source: "visitIRVerbatim: anIRVerbatim\x0a\x09self stream nextPutStatementWith: [\x0a\x09\x09self stream nextPutAll: anIRVerbatim source ]",
  3053. messageSends: ["nextPutStatementWith:", "stream", "nextPutAll:", "source"],
  3054. referencedClasses: []
  3055. }),
  3056. globals.IRJSTranslator);
  3057. smalltalk.addMethod(
  3058. smalltalk.method({
  3059. selector: "visitReceiver:",
  3060. protocol: 'visiting',
  3061. fn: function (anIRInstruction){
  3062. var self=this;
  3063. return smalltalk.withContext(function($ctx1) {
  3064. var $1,$2,$3;
  3065. $1=_st(anIRInstruction)._needsBoxingAsReceiver();
  3066. if(! smalltalk.assert($1)){
  3067. $2=self._visit_(anIRInstruction);
  3068. $ctx1.sendIdx["visit:"]=1;
  3069. return $2;
  3070. };
  3071. $3=self._stream();
  3072. $ctx1.sendIdx["stream"]=1;
  3073. _st($3)._nextPutAll_("_st(");
  3074. $ctx1.sendIdx["nextPutAll:"]=1;
  3075. self._visit_(anIRInstruction);
  3076. _st(self._stream())._nextPutAll_(")");
  3077. return self}, function($ctx1) {$ctx1.fill(self,"visitReceiver:",{anIRInstruction:anIRInstruction},globals.IRJSTranslator)})},
  3078. args: ["anIRInstruction"],
  3079. source: "visitReceiver: anIRInstruction\x0a\x09anIRInstruction needsBoxingAsReceiver ifFalse: [ ^ self visit: anIRInstruction ].\x0a\x09\x0a\x09self stream nextPutAll: '_st('.\x0a\x09self visit: anIRInstruction.\x0a\x09self stream nextPutAll: ')'",
  3080. messageSends: ["ifFalse:", "needsBoxingAsReceiver", "visit:", "nextPutAll:", "stream"],
  3081. referencedClasses: []
  3082. }),
  3083. globals.IRJSTranslator);
  3084. smalltalk.addMethod(
  3085. smalltalk.method({
  3086. selector: "visitSend:",
  3087. protocol: 'visiting',
  3088. fn: function (anIRSend){
  3089. var self=this;
  3090. return smalltalk.withContext(function($ctx1) {
  3091. var $2,$1,$3,$4,$5;
  3092. $2=_st(anIRSend)._instructions();
  3093. $ctx1.sendIdx["instructions"]=1;
  3094. $1=_st($2)._first();
  3095. self._visitReceiver_($1);
  3096. $3=self._stream();
  3097. $ctx1.sendIdx["stream"]=1;
  3098. $4=_st(".".__comma(_st(_st(anIRSend)._selector())._asSelector())).__comma("(");
  3099. $ctx1.sendIdx[","]=1;
  3100. _st($3)._nextPutAll_($4);
  3101. $ctx1.sendIdx["nextPutAll:"]=1;
  3102. _st(_st(_st(anIRSend)._instructions())._allButFirst())._do_separatedBy_((function(each){
  3103. return smalltalk.withContext(function($ctx2) {
  3104. return self._visit_(each);
  3105. }, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1,1)})}),(function(){
  3106. return smalltalk.withContext(function($ctx2) {
  3107. $5=self._stream();
  3108. $ctx2.sendIdx["stream"]=2;
  3109. return _st($5)._nextPutAll_(",");
  3110. $ctx2.sendIdx["nextPutAll:"]=2;
  3111. }, function($ctx2) {$ctx2.fillBlock({},$ctx1,2)})}));
  3112. _st(self._stream())._nextPutAll_(")");
  3113. return self}, function($ctx1) {$ctx1.fill(self,"visitSend:",{anIRSend:anIRSend},globals.IRJSTranslator)})},
  3114. args: ["anIRSend"],
  3115. source: "visitSend: anIRSend\x0a\x09self visitReceiver: anIRSend instructions first.\x0a\x09self stream nextPutAll: '.', anIRSend selector asSelector, '('.\x0a\x09anIRSend instructions allButFirst\x0a\x09\x09do: [ :each | self visit: each ]\x0a\x09\x09separatedBy: [ self stream nextPutAll: ',' ].\x0a\x09self stream nextPutAll: ')'",
  3116. messageSends: ["visitReceiver:", "first", "instructions", "nextPutAll:", "stream", ",", "asSelector", "selector", "do:separatedBy:", "allButFirst", "visit:"],
  3117. referencedClasses: []
  3118. }),
  3119. globals.IRJSTranslator);
  3120. smalltalk.addMethod(
  3121. smalltalk.method({
  3122. selector: "visitSuperSend:",
  3123. protocol: 'visiting',
  3124. fn: function (anIRSend){
  3125. var self=this;
  3126. return smalltalk.withContext(function($ctx1) {
  3127. var $1,$2,$4,$3,$5,$6;
  3128. $1=self._stream();
  3129. $ctx1.sendIdx["stream"]=1;
  3130. _st($1)._nextPutAll_(_st(self._currentClass())._asJavascript());
  3131. $ctx1.sendIdx["nextPutAll:"]=1;
  3132. _st($1)._nextPutAll_(".superclass.fn.prototype.");
  3133. $ctx1.sendIdx["nextPutAll:"]=2;
  3134. _st($1)._nextPutAll_(_st(_st(_st(anIRSend)._selector())._asSelector()).__comma(".apply("));
  3135. $ctx1.sendIdx["nextPutAll:"]=3;
  3136. $2=_st($1)._nextPutAll_("_st(");
  3137. $ctx1.sendIdx["nextPutAll:"]=4;
  3138. $4=_st(anIRSend)._instructions();
  3139. $ctx1.sendIdx["instructions"]=1;
  3140. $3=_st($4)._first();
  3141. self._visit_($3);
  3142. $ctx1.sendIdx["visit:"]=1;
  3143. $5=self._stream();
  3144. $ctx1.sendIdx["stream"]=2;
  3145. _st($5)._nextPutAll_("), [");
  3146. $ctx1.sendIdx["nextPutAll:"]=5;
  3147. _st(_st(_st(anIRSend)._instructions())._allButFirst())._do_separatedBy_((function(each){
  3148. return smalltalk.withContext(function($ctx2) {
  3149. return self._visit_(each);
  3150. }, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1,1)})}),(function(){
  3151. return smalltalk.withContext(function($ctx2) {
  3152. $6=self._stream();
  3153. $ctx2.sendIdx["stream"]=3;
  3154. return _st($6)._nextPutAll_(",");
  3155. $ctx2.sendIdx["nextPutAll:"]=6;
  3156. }, function($ctx2) {$ctx2.fillBlock({},$ctx1,2)})}));
  3157. _st(self._stream())._nextPutAll_("])");
  3158. return self}, function($ctx1) {$ctx1.fill(self,"visitSuperSend:",{anIRSend:anIRSend},globals.IRJSTranslator)})},
  3159. args: ["anIRSend"],
  3160. source: "visitSuperSend: anIRSend\x0a\x09self stream\x0a\x09\x09nextPutAll: self currentClass asJavascript;\x0a\x09\x09nextPutAll: '.superclass.fn.prototype.';\x0a\x09\x09nextPutAll: anIRSend selector asSelector, '.apply(';\x0a\x09\x09nextPutAll: '_st('.\x0a\x09self visit: anIRSend instructions first.\x0a\x09self stream nextPutAll: '), ['.\x0a\x09anIRSend instructions allButFirst\x0a\x09\x09do: [ :each | self visit: each ]\x0a\x09\x09separatedBy: [ self stream nextPutAll: ',' ].\x0a\x09self stream nextPutAll: '])'",
  3161. messageSends: ["nextPutAll:", "stream", "asJavascript", "currentClass", ",", "asSelector", "selector", "visit:", "first", "instructions", "do:separatedBy:", "allButFirst"],
  3162. referencedClasses: []
  3163. }),
  3164. globals.IRJSTranslator);
  3165. smalltalk.addClass('JSStream', globals.Object, ['stream'], 'Compiler-IR');
  3166. smalltalk.addMethod(
  3167. smalltalk.method({
  3168. selector: "contents",
  3169. protocol: 'accessing',
  3170. fn: function (){
  3171. var self=this;
  3172. return smalltalk.withContext(function($ctx1) {
  3173. var $1;
  3174. $1=_st(self["@stream"])._contents();
  3175. return $1;
  3176. }, function($ctx1) {$ctx1.fill(self,"contents",{},globals.JSStream)})},
  3177. args: [],
  3178. source: "contents\x0a\x09^ stream contents",
  3179. messageSends: ["contents"],
  3180. referencedClasses: []
  3181. }),
  3182. globals.JSStream);
  3183. smalltalk.addMethod(
  3184. smalltalk.method({
  3185. selector: "initialize",
  3186. protocol: 'initialization',
  3187. fn: function (){
  3188. var self=this;
  3189. return smalltalk.withContext(function($ctx1) {
  3190. globals.JSStream.superclass.fn.prototype._initialize.apply(_st(self), []);
  3191. self["@stream"]=""._writeStream();
  3192. return self}, function($ctx1) {$ctx1.fill(self,"initialize",{},globals.JSStream)})},
  3193. args: [],
  3194. source: "initialize\x0a\x09super initialize.\x0a\x09stream := '' writeStream.",
  3195. messageSends: ["initialize", "writeStream"],
  3196. referencedClasses: []
  3197. }),
  3198. globals.JSStream);
  3199. smalltalk.addMethod(
  3200. smalltalk.method({
  3201. selector: "lf",
  3202. protocol: 'streaming',
  3203. fn: function (){
  3204. var self=this;
  3205. return smalltalk.withContext(function($ctx1) {
  3206. _st(self["@stream"])._lf();
  3207. return self}, function($ctx1) {$ctx1.fill(self,"lf",{},globals.JSStream)})},
  3208. args: [],
  3209. source: "lf\x0a\x09stream lf",
  3210. messageSends: ["lf"],
  3211. referencedClasses: []
  3212. }),
  3213. globals.JSStream);
  3214. smalltalk.addMethod(
  3215. smalltalk.method({
  3216. selector: "nextPut:",
  3217. protocol: 'streaming',
  3218. fn: function (aString){
  3219. var self=this;
  3220. return smalltalk.withContext(function($ctx1) {
  3221. _st(self["@stream"])._nextPut_(aString);
  3222. return self}, function($ctx1) {$ctx1.fill(self,"nextPut:",{aString:aString},globals.JSStream)})},
  3223. args: ["aString"],
  3224. source: "nextPut: aString\x0a\x09stream nextPut: aString",
  3225. messageSends: ["nextPut:"],
  3226. referencedClasses: []
  3227. }),
  3228. globals.JSStream);
  3229. smalltalk.addMethod(
  3230. smalltalk.method({
  3231. selector: "nextPutAll:",
  3232. protocol: 'streaming',
  3233. fn: function (aString){
  3234. var self=this;
  3235. return smalltalk.withContext(function($ctx1) {
  3236. _st(self["@stream"])._nextPutAll_(aString);
  3237. return self}, function($ctx1) {$ctx1.fill(self,"nextPutAll:",{aString:aString},globals.JSStream)})},
  3238. args: ["aString"],
  3239. source: "nextPutAll: aString\x0a\x09stream nextPutAll: aString",
  3240. messageSends: ["nextPutAll:"],
  3241. referencedClasses: []
  3242. }),
  3243. globals.JSStream);
  3244. smalltalk.addMethod(
  3245. smalltalk.method({
  3246. selector: "nextPutAssignment",
  3247. protocol: 'streaming',
  3248. fn: function (){
  3249. var self=this;
  3250. return smalltalk.withContext(function($ctx1) {
  3251. _st(self["@stream"])._nextPutAll_("=");
  3252. return self}, function($ctx1) {$ctx1.fill(self,"nextPutAssignment",{},globals.JSStream)})},
  3253. args: [],
  3254. source: "nextPutAssignment\x0a\x09stream nextPutAll: '='",
  3255. messageSends: ["nextPutAll:"],
  3256. referencedClasses: []
  3257. }),
  3258. globals.JSStream);
  3259. smalltalk.addMethod(
  3260. smalltalk.method({
  3261. selector: "nextPutBlockContextFor:during:",
  3262. protocol: 'streaming',
  3263. fn: function (anIRClosure,aBlock){
  3264. var self=this;
  3265. return smalltalk.withContext(function($ctx1) {
  3266. var $1,$2,$6,$5,$4,$3,$7,$11,$10,$9,$8,$15,$14,$13,$12,$16,$17,$24,$23,$22,$21,$20,$19,$18;
  3267. $1=_st(anIRClosure)._requiresSmalltalkContext();
  3268. if(! smalltalk.assert($1)){
  3269. $2=_st(aBlock)._value();
  3270. $ctx1.sendIdx["value"]=1;
  3271. return $2;
  3272. };
  3273. $6=_st(anIRClosure)._scope();
  3274. $ctx1.sendIdx["scope"]=1;
  3275. $5=_st($6)._alias();
  3276. $ctx1.sendIdx["alias"]=1;
  3277. $4="return smalltalk.withContext(function(".__comma($5);
  3278. $ctx1.sendIdx[","]=2;
  3279. $3=_st($4).__comma(") {");
  3280. $ctx1.sendIdx[","]=1;
  3281. self._nextPutAll_($3);
  3282. $ctx1.sendIdx["nextPutAll:"]=1;
  3283. $7=self._lf();
  3284. _st(aBlock)._value();
  3285. $11=_st(anIRClosure)._scope();
  3286. $ctx1.sendIdx["scope"]=2;
  3287. $10=_st($11)._alias();
  3288. $ctx1.sendIdx["alias"]=2;
  3289. $9="}, function(".__comma($10);
  3290. $ctx1.sendIdx[","]=4;
  3291. $8=_st($9).__comma(") {");
  3292. $ctx1.sendIdx[","]=3;
  3293. self._nextPutAll_($8);
  3294. $ctx1.sendIdx["nextPutAll:"]=2;
  3295. $15=_st(anIRClosure)._scope();
  3296. $ctx1.sendIdx["scope"]=3;
  3297. $14=_st($15)._alias();
  3298. $ctx1.sendIdx["alias"]=3;
  3299. $13=_st($14).__comma(".fillBlock({");
  3300. $ctx1.sendIdx[","]=5;
  3301. $12=self._nextPutAll_($13);
  3302. $ctx1.sendIdx["nextPutAll:"]=3;
  3303. _st(_st(anIRClosure)._locals())._do_separatedBy_((function(each){
  3304. return smalltalk.withContext(function($ctx2) {
  3305. $16=_st(each)._asVariableName();
  3306. $ctx2.sendIdx["asVariableName"]=1;
  3307. self._nextPutAll_($16);
  3308. $ctx2.sendIdx["nextPutAll:"]=4;
  3309. self._nextPutAll_(":");
  3310. $ctx2.sendIdx["nextPutAll:"]=5;
  3311. $17=self._nextPutAll_(_st(each)._asVariableName());
  3312. $ctx2.sendIdx["nextPutAll:"]=6;
  3313. return $17;
  3314. }, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1,2)})}),(function(){
  3315. return smalltalk.withContext(function($ctx2) {
  3316. return self._nextPutAll_(",");
  3317. $ctx2.sendIdx["nextPutAll:"]=7;
  3318. }, function($ctx2) {$ctx2.fillBlock({},$ctx1,3)})}));
  3319. self._nextPutAll_("},");
  3320. $ctx1.sendIdx["nextPutAll:"]=8;
  3321. $24=_st(anIRClosure)._scope();
  3322. $ctx1.sendIdx["scope"]=4;
  3323. $23=_st($24)._outerScope();
  3324. $22=_st($23)._alias();
  3325. $21=_st($22).__comma(",");
  3326. $20=_st($21).__comma(_st(_st(_st(anIRClosure)._scope())._blockIndex())._asString());
  3327. $ctx1.sendIdx[","]=7;
  3328. $19=_st($20).__comma(")})");
  3329. $ctx1.sendIdx[","]=6;
  3330. $18=self._nextPutAll_($19);
  3331. return self}, function($ctx1) {$ctx1.fill(self,"nextPutBlockContextFor:during:",{anIRClosure:anIRClosure,aBlock:aBlock},globals.JSStream)})},
  3332. args: ["anIRClosure", "aBlock"],
  3333. source: "nextPutBlockContextFor: anIRClosure during: aBlock\x0a\x09anIRClosure requiresSmalltalkContext ifFalse: [ ^ aBlock value ].\x0a\x09self\x0a\x09\x09nextPutAll: 'return smalltalk.withContext(function(', anIRClosure scope alias, ') {'; lf.\x0a\x09\x0a\x09aBlock value.\x0a\x09\x0a\x09self\x0a\x09\x09nextPutAll: '}, function(', anIRClosure scope alias, ') {';\x0a\x09\x09nextPutAll: anIRClosure scope alias, '.fillBlock({'.\x0a\x09\x0a\x09anIRClosure locals\x0a\x09\x09do: [ :each |\x0a\x09\x09\x09self\x0a\x09\x09\x09\x09nextPutAll: each asVariableName;\x0a\x09\x09\x09\x09nextPutAll: ':';\x0a\x09\x09\x09\x09nextPutAll: each asVariableName ]\x0a\x09\x09separatedBy: [ self nextPutAll: ',' ].\x0a\x09\x0a\x09self\x0a\x09\x09nextPutAll: '},';\x0a\x09\x09nextPutAll: anIRClosure scope outerScope alias, ',', anIRClosure scope blockIndex asString, ')})'",
  3334. messageSends: ["ifFalse:", "requiresSmalltalkContext", "value", "nextPutAll:", ",", "alias", "scope", "lf", "do:separatedBy:", "locals", "asVariableName", "outerScope", "asString", "blockIndex"],
  3335. referencedClasses: []
  3336. }),
  3337. globals.JSStream);
  3338. smalltalk.addMethod(
  3339. smalltalk.method({
  3340. selector: "nextPutClassRefFunction:",
  3341. protocol: 'streaming',
  3342. fn: function (aString){
  3343. var self=this;
  3344. return smalltalk.withContext(function($ctx1) {
  3345. var $1,$2;
  3346. $1=self["@stream"];
  3347. _st($1)._nextPutAll_("function $");
  3348. $ctx1.sendIdx["nextPutAll:"]=1;
  3349. _st($1)._nextPutAll_(aString);
  3350. $ctx1.sendIdx["nextPutAll:"]=2;
  3351. _st($1)._nextPutAll_("(){return globals.");
  3352. $ctx1.sendIdx["nextPutAll:"]=3;
  3353. _st($1)._nextPutAll_(aString);
  3354. $ctx1.sendIdx["nextPutAll:"]=4;
  3355. _st($1)._nextPutAll_("||(typeof ");
  3356. $ctx1.sendIdx["nextPutAll:"]=5;
  3357. _st($1)._nextPutAll_(aString);
  3358. $ctx1.sendIdx["nextPutAll:"]=6;
  3359. _st($1)._nextPutAll_("==\x22undefined\x22?nil:");
  3360. $ctx1.sendIdx["nextPutAll:"]=7;
  3361. _st($1)._nextPutAll_(aString);
  3362. $ctx1.sendIdx["nextPutAll:"]=8;
  3363. _st($1)._nextPutAll_(")}");
  3364. $2=_st($1)._lf();
  3365. return self}, function($ctx1) {$ctx1.fill(self,"nextPutClassRefFunction:",{aString:aString},globals.JSStream)})},
  3366. args: ["aString"],
  3367. source: "nextPutClassRefFunction: aString\x0a\x09\x22Creates an inner function $aString into method and called as `$Foo()`whenever the global is accessed.\x0a\x09This ensures that undefined global access will answer `nil`\x22\x0a\x09\x0a\x09stream\x0a\x09\x09nextPutAll: 'function $';\x0a\x09\x09nextPutAll: aString;\x0a\x09\x09nextPutAll: '(){return globals.';\x0a\x09\x09nextPutAll: aString;\x0a\x09\x09nextPutAll: '||(typeof ';\x0a\x09\x09nextPutAll: aString;\x0a\x09\x09nextPutAll: '==\x22undefined\x22?nil:';\x0a\x09\x09nextPutAll: aString;\x0a\x09\x09nextPutAll: ')}';\x0a\x09\x09lf",
  3368. messageSends: ["nextPutAll:", "lf"],
  3369. referencedClasses: []
  3370. }),
  3371. globals.JSStream);
  3372. smalltalk.addMethod(
  3373. smalltalk.method({
  3374. selector: "nextPutClosureWith:arguments:",
  3375. protocol: 'streaming',
  3376. fn: function (aBlock,anArray){
  3377. var self=this;
  3378. return smalltalk.withContext(function($ctx1) {
  3379. var $1,$2;
  3380. _st(self["@stream"])._nextPutAll_("(function(");
  3381. $ctx1.sendIdx["nextPutAll:"]=1;
  3382. _st(anArray)._do_separatedBy_((function(each){
  3383. return smalltalk.withContext(function($ctx2) {
  3384. return _st(self["@stream"])._nextPutAll_(_st(each)._asVariableName());
  3385. $ctx2.sendIdx["nextPutAll:"]=2;
  3386. }, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1,1)})}),(function(){
  3387. return smalltalk.withContext(function($ctx2) {
  3388. return _st(self["@stream"])._nextPut_(",");
  3389. }, function($ctx2) {$ctx2.fillBlock({},$ctx1,2)})}));
  3390. $1=self["@stream"];
  3391. _st($1)._nextPutAll_("){");
  3392. $ctx1.sendIdx["nextPutAll:"]=3;
  3393. $2=_st($1)._lf();
  3394. _st(aBlock)._value();
  3395. _st(self["@stream"])._nextPutAll_("})");
  3396. return self}, function($ctx1) {$ctx1.fill(self,"nextPutClosureWith:arguments:",{aBlock:aBlock,anArray:anArray},globals.JSStream)})},
  3397. args: ["aBlock", "anArray"],
  3398. source: "nextPutClosureWith: aBlock arguments: anArray\x0a\x09stream nextPutAll: '(function('.\x0a\x09anArray\x0a\x09\x09do: [ :each | stream nextPutAll: each asVariableName ]\x0a\x09\x09separatedBy: [ stream nextPut: ',' ].\x0a\x09stream nextPutAll: '){'; lf.\x0a\x09aBlock value.\x0a\x09stream nextPutAll: '})'",
  3399. messageSends: ["nextPutAll:", "do:separatedBy:", "asVariableName", "nextPut:", "lf", "value"],
  3400. referencedClasses: []
  3401. }),
  3402. globals.JSStream);
  3403. smalltalk.addMethod(
  3404. smalltalk.method({
  3405. selector: "nextPutContextFor:during:",
  3406. protocol: 'streaming',
  3407. fn: function (aMethod,aBlock){
  3408. var self=this;
  3409. return smalltalk.withContext(function($ctx1) {
  3410. var $1,$2,$6,$5,$4,$3,$7,$12,$11,$10,$9,$8,$16,$15,$14,$13,$17,$18,$19;
  3411. $1=_st(aMethod)._requiresSmalltalkContext();
  3412. if(! smalltalk.assert($1)){
  3413. $2=_st(aBlock)._value();
  3414. $ctx1.sendIdx["value"]=1;
  3415. return $2;
  3416. };
  3417. $6=_st(aMethod)._scope();
  3418. $ctx1.sendIdx["scope"]=1;
  3419. $5=_st($6)._alias();
  3420. $ctx1.sendIdx["alias"]=1;
  3421. $4="return smalltalk.withContext(function(".__comma($5);
  3422. $ctx1.sendIdx[","]=2;
  3423. $3=_st($4).__comma(") { ");
  3424. $ctx1.sendIdx[","]=1;
  3425. self._nextPutAll_($3);
  3426. $ctx1.sendIdx["nextPutAll:"]=1;
  3427. $7=self._lf();
  3428. _st(aBlock)._value();
  3429. $12=_st(aMethod)._scope();
  3430. $ctx1.sendIdx["scope"]=2;
  3431. $11=_st($12)._alias();
  3432. $ctx1.sendIdx["alias"]=2;
  3433. $10="}, function(".__comma($11);
  3434. $ctx1.sendIdx[","]=5;
  3435. $9=_st($10).__comma(") {");
  3436. $ctx1.sendIdx[","]=4;
  3437. $8=_st($9).__comma(_st(_st(aMethod)._scope())._alias());
  3438. $ctx1.sendIdx[","]=3;
  3439. self._nextPutAll_($8);
  3440. $ctx1.sendIdx["nextPutAll:"]=2;
  3441. $16=_st(_st(aMethod)._selector())._asJavascript();
  3442. $ctx1.sendIdx["asJavascript"]=1;
  3443. $15=".fill(self,".__comma($16);
  3444. $14=_st($15).__comma(",{");
  3445. $ctx1.sendIdx[","]=6;
  3446. $13=self._nextPutAll_($14);
  3447. $ctx1.sendIdx["nextPutAll:"]=3;
  3448. _st(_st(aMethod)._locals())._do_separatedBy_((function(each){
  3449. return smalltalk.withContext(function($ctx2) {
  3450. $17=_st(each)._asVariableName();
  3451. $ctx2.sendIdx["asVariableName"]=1;
  3452. self._nextPutAll_($17);
  3453. $ctx2.sendIdx["nextPutAll:"]=4;
  3454. self._nextPutAll_(":");
  3455. $ctx2.sendIdx["nextPutAll:"]=5;
  3456. $18=self._nextPutAll_(_st(each)._asVariableName());
  3457. $ctx2.sendIdx["nextPutAll:"]=6;
  3458. return $18;
  3459. }, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1,2)})}),(function(){
  3460. return smalltalk.withContext(function($ctx2) {
  3461. return self._nextPutAll_(",");
  3462. $ctx2.sendIdx["nextPutAll:"]=7;
  3463. }, function($ctx2) {$ctx2.fillBlock({},$ctx1,3)})}));
  3464. self._nextPutAll_("},");
  3465. $ctx1.sendIdx["nextPutAll:"]=8;
  3466. self._nextPutAll_(_st(_st(aMethod)._theClass())._asJavascript());
  3467. $ctx1.sendIdx["nextPutAll:"]=9;
  3468. $19=self._nextPutAll_(")})");
  3469. return self}, function($ctx1) {$ctx1.fill(self,"nextPutContextFor:during:",{aMethod:aMethod,aBlock:aBlock},globals.JSStream)})},
  3470. args: ["aMethod", "aBlock"],
  3471. source: "nextPutContextFor: aMethod during: aBlock\x0a\x09aMethod requiresSmalltalkContext ifFalse: [ ^ aBlock value ].\x0a\x09\x0a\x09self\x0a\x09\x09nextPutAll: 'return smalltalk.withContext(function(', aMethod scope alias, ') { '; lf.\x0a\x09aBlock value.\x0a\x09\x0a\x09self\x0a\x09\x09nextPutAll: '}, function(', aMethod scope alias, ') {', aMethod scope alias;\x0a\x09\x09nextPutAll: '.fill(self,', aMethod selector asJavascript, ',{'.\x0a\x0a\x09aMethod locals\x0a\x09\x09do: [ :each |\x0a\x09\x09\x09self\x0a\x09\x09\x09\x09nextPutAll: each asVariableName;\x0a\x09\x09\x09\x09nextPutAll: ':';\x0a\x09\x09\x09\x09nextPutAll: each asVariableName ]\x0a\x09\x09separatedBy: [ self nextPutAll: ',' ].\x0a\x09\x0a\x09self\x0a\x09\x09nextPutAll: '},';\x0a\x09\x09nextPutAll: aMethod theClass asJavascript;\x0a\x09\x09nextPutAll: ')})'",
  3472. messageSends: ["ifFalse:", "requiresSmalltalkContext", "value", "nextPutAll:", ",", "alias", "scope", "lf", "asJavascript", "selector", "do:separatedBy:", "locals", "asVariableName", "theClass"],
  3473. referencedClasses: []
  3474. }),
  3475. globals.JSStream);
  3476. smalltalk.addMethod(
  3477. smalltalk.method({
  3478. selector: "nextPutFunctionWith:arguments:",
  3479. protocol: 'streaming',
  3480. fn: function (aBlock,anArray){
  3481. var self=this;
  3482. return smalltalk.withContext(function($ctx1) {
  3483. var $1,$2,$3,$4;
  3484. _st(self["@stream"])._nextPutAll_("fn: function(");
  3485. $ctx1.sendIdx["nextPutAll:"]=1;
  3486. _st(anArray)._do_separatedBy_((function(each){
  3487. return smalltalk.withContext(function($ctx2) {
  3488. return _st(self["@stream"])._nextPutAll_(_st(each)._asVariableName());
  3489. $ctx2.sendIdx["nextPutAll:"]=2;
  3490. }, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1,1)})}),(function(){
  3491. return smalltalk.withContext(function($ctx2) {
  3492. return _st(self["@stream"])._nextPut_(",");
  3493. }, function($ctx2) {$ctx2.fillBlock({},$ctx1,2)})}));
  3494. $1=self["@stream"];
  3495. _st($1)._nextPutAll_("){");
  3496. $ctx1.sendIdx["nextPutAll:"]=3;
  3497. $2=_st($1)._lf();
  3498. $ctx1.sendIdx["lf"]=1;
  3499. $3=self["@stream"];
  3500. _st($3)._nextPutAll_("var self=this;");
  3501. $ctx1.sendIdx["nextPutAll:"]=4;
  3502. $4=_st($3)._lf();
  3503. _st(aBlock)._value();
  3504. _st(self["@stream"])._nextPutAll_("}");
  3505. return self}, function($ctx1) {$ctx1.fill(self,"nextPutFunctionWith:arguments:",{aBlock:aBlock,anArray:anArray},globals.JSStream)})},
  3506. args: ["aBlock", "anArray"],
  3507. source: "nextPutFunctionWith: aBlock arguments: anArray\x0a\x09stream nextPutAll: 'fn: function('.\x0a\x09anArray\x0a\x09\x09do: [ :each | stream nextPutAll: each asVariableName ]\x0a\x09\x09separatedBy: [ stream nextPut: ',' ].\x0a\x09stream nextPutAll: '){'; lf.\x0a\x09stream nextPutAll: 'var self=this;'; lf.\x0a\x09aBlock value.\x0a\x09stream nextPutAll: '}'",
  3508. messageSends: ["nextPutAll:", "do:separatedBy:", "asVariableName", "nextPut:", "lf", "value"],
  3509. referencedClasses: []
  3510. }),
  3511. globals.JSStream);
  3512. smalltalk.addMethod(
  3513. smalltalk.method({
  3514. selector: "nextPutIf:with:",
  3515. protocol: 'streaming',
  3516. fn: function (aBlock,anotherBlock){
  3517. var self=this;
  3518. return smalltalk.withContext(function($ctx1) {
  3519. var $1,$2;
  3520. _st(self["@stream"])._nextPutAll_("if(");
  3521. $ctx1.sendIdx["nextPutAll:"]=1;
  3522. _st(aBlock)._value();
  3523. $ctx1.sendIdx["value"]=1;
  3524. $1=self["@stream"];
  3525. _st($1)._nextPutAll_("){");
  3526. $ctx1.sendIdx["nextPutAll:"]=2;
  3527. $2=_st($1)._lf();
  3528. _st(anotherBlock)._value();
  3529. _st(self["@stream"])._nextPutAll_("}");
  3530. return self}, function($ctx1) {$ctx1.fill(self,"nextPutIf:with:",{aBlock:aBlock,anotherBlock:anotherBlock},globals.JSStream)})},
  3531. args: ["aBlock", "anotherBlock"],
  3532. source: "nextPutIf: aBlock with: anotherBlock\x0a\x09stream nextPutAll: 'if('.\x0a\x09aBlock value.\x0a\x09stream nextPutAll: '){'; lf.\x0a\x09anotherBlock value.\x0a\x09stream nextPutAll: '}'",
  3533. messageSends: ["nextPutAll:", "value", "lf"],
  3534. referencedClasses: []
  3535. }),
  3536. globals.JSStream);
  3537. smalltalk.addMethod(
  3538. smalltalk.method({
  3539. selector: "nextPutIfElse:with:with:",
  3540. protocol: 'streaming',
  3541. fn: function (aBlock,ifBlock,elseBlock){
  3542. var self=this;
  3543. return smalltalk.withContext(function($ctx1) {
  3544. var $1,$2,$3,$4;
  3545. _st(self["@stream"])._nextPutAll_("if(");
  3546. $ctx1.sendIdx["nextPutAll:"]=1;
  3547. _st(aBlock)._value();
  3548. $ctx1.sendIdx["value"]=1;
  3549. $1=self["@stream"];
  3550. _st($1)._nextPutAll_("){");
  3551. $ctx1.sendIdx["nextPutAll:"]=2;
  3552. $2=_st($1)._lf();
  3553. $ctx1.sendIdx["lf"]=1;
  3554. _st(ifBlock)._value();
  3555. $ctx1.sendIdx["value"]=2;
  3556. $3=self["@stream"];
  3557. _st($3)._nextPutAll_("} else {");
  3558. $ctx1.sendIdx["nextPutAll:"]=3;
  3559. $4=_st($3)._lf();
  3560. _st(elseBlock)._value();
  3561. _st(self["@stream"])._nextPutAll_("}");
  3562. return self}, function($ctx1) {$ctx1.fill(self,"nextPutIfElse:with:with:",{aBlock:aBlock,ifBlock:ifBlock,elseBlock:elseBlock},globals.JSStream)})},
  3563. args: ["aBlock", "ifBlock", "elseBlock"],
  3564. source: "nextPutIfElse: aBlock with: ifBlock with: elseBlock\x0a\x09stream nextPutAll: 'if('.\x0a\x09aBlock value.\x0a\x09stream nextPutAll: '){'; lf.\x0a\x09ifBlock value.\x0a\x09stream nextPutAll: '} else {'; lf.\x0a\x09elseBlock value.\x0a\x09stream nextPutAll: '}'",
  3565. messageSends: ["nextPutAll:", "value", "lf"],
  3566. referencedClasses: []
  3567. }),
  3568. globals.JSStream);
  3569. smalltalk.addMethod(
  3570. smalltalk.method({
  3571. selector: "nextPutMethodDeclaration:with:",
  3572. protocol: 'streaming',
  3573. fn: function (aMethod,aBlock){
  3574. var self=this;
  3575. function $String(){return globals.String||(typeof String=="undefined"?nil:String)}
  3576. return smalltalk.withContext(function($ctx1) {
  3577. var $1,$2,$5,$4,$3,$6,$9,$8,$7,$10,$11,$12,$15,$14,$13,$16,$19,$18,$17,$20,$23,$22,$21,$24,$25,$26;
  3578. $1=self["@stream"];
  3579. _st($1)._nextPutAll_("smalltalk.method({");
  3580. $ctx1.sendIdx["nextPutAll:"]=1;
  3581. _st($1)._lf();
  3582. $ctx1.sendIdx["lf"]=1;
  3583. $2=$1;
  3584. $5=_st(_st(aMethod)._selector())._asJavascript();
  3585. $ctx1.sendIdx["asJavascript"]=1;
  3586. $4="selector: ".__comma($5);
  3587. $ctx1.sendIdx[","]=2;
  3588. $3=_st($4).__comma(",");
  3589. $ctx1.sendIdx[","]=1;
  3590. _st($2)._nextPutAll_($3);
  3591. $ctx1.sendIdx["nextPutAll:"]=2;
  3592. _st($1)._lf();
  3593. $ctx1.sendIdx["lf"]=2;
  3594. $6=$1;
  3595. $9=_st(_st(aMethod)._source())._asJavascript();
  3596. $ctx1.sendIdx["asJavascript"]=2;
  3597. $8="source: ".__comma($9);
  3598. $ctx1.sendIdx[","]=4;
  3599. $7=_st($8).__comma(",");
  3600. $ctx1.sendIdx[","]=3;
  3601. _st($6)._nextPutAll_($7);
  3602. $ctx1.sendIdx["nextPutAll:"]=3;
  3603. $10=_st($1)._lf();
  3604. $ctx1.sendIdx["lf"]=3;
  3605. _st(aBlock)._value();
  3606. $ctx1.sendIdx["value"]=1;
  3607. $11=self["@stream"];
  3608. $12=$11;
  3609. $15=_st($String())._lf();
  3610. $ctx1.sendIdx["lf"]=4;
  3611. $14=",".__comma($15);
  3612. $ctx1.sendIdx[","]=6;
  3613. $13=_st($14).__comma("messageSends: ");
  3614. $ctx1.sendIdx[","]=5;
  3615. _st($12)._nextPutAll_($13);
  3616. $ctx1.sendIdx["nextPutAll:"]=4;
  3617. $16=$11;
  3618. $19=_st(_st(aMethod)._messageSends())._asArray();
  3619. $ctx1.sendIdx["asArray"]=1;
  3620. $18=_st($19)._asJavascript();
  3621. $ctx1.sendIdx["asJavascript"]=3;
  3622. $17=_st($18).__comma(",");
  3623. $ctx1.sendIdx[","]=7;
  3624. _st($16)._nextPutAll_($17);
  3625. $ctx1.sendIdx["nextPutAll:"]=5;
  3626. _st($11)._lf();
  3627. $ctx1.sendIdx["lf"]=5;
  3628. $20=$11;
  3629. $23=_st(_st(_st(_st(aMethod)._arguments())._collect_((function(each){
  3630. return smalltalk.withContext(function($ctx2) {
  3631. return _st(each)._value();
  3632. }, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1,1)})})))._asArray())._asJavascript();
  3633. $ctx1.sendIdx["asJavascript"]=4;
  3634. $22="args: ".__comma($23);
  3635. $21=_st($22).__comma(",");
  3636. $ctx1.sendIdx[","]=8;
  3637. _st($20)._nextPutAll_($21);
  3638. $ctx1.sendIdx["nextPutAll:"]=6;
  3639. _st($11)._lf();
  3640. $24=_st($11)._nextPutAll_("referencedClasses: [");
  3641. $ctx1.sendIdx["nextPutAll:"]=7;
  3642. _st(_st(aMethod)._classReferences())._do_separatedBy_((function(each){
  3643. return smalltalk.withContext(function($ctx2) {
  3644. return _st(self["@stream"])._nextPutAll_(_st(each)._asJavascript());
  3645. $ctx2.sendIdx["nextPutAll:"]=8;
  3646. }, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1,2)})}),(function(){
  3647. return smalltalk.withContext(function($ctx2) {
  3648. return _st(self["@stream"])._nextPutAll_(",");
  3649. $ctx2.sendIdx["nextPutAll:"]=9;
  3650. }, function($ctx2) {$ctx2.fillBlock({},$ctx1,3)})}));
  3651. $25=self["@stream"];
  3652. _st($25)._nextPutAll_("]");
  3653. $ctx1.sendIdx["nextPutAll:"]=10;
  3654. $26=_st($25)._nextPutAll_("})");
  3655. return self}, function($ctx1) {$ctx1.fill(self,"nextPutMethodDeclaration:with:",{aMethod:aMethod,aBlock:aBlock},globals.JSStream)})},
  3656. args: ["aMethod", "aBlock"],
  3657. source: "nextPutMethodDeclaration: aMethod with: aBlock\x0a\x09stream\x0a\x09\x09nextPutAll: 'smalltalk.method({'; lf;\x0a\x09\x09nextPutAll: 'selector: ', aMethod selector asJavascript, ','; lf;\x0a\x09\x09nextPutAll: 'source: ', aMethod source asJavascript, ',';lf.\x0a\x09aBlock value.\x0a\x09stream\x0a\x09\x09nextPutAll: ',', String lf, 'messageSends: ';\x0a\x09\x09nextPutAll: aMethod messageSends asArray asJavascript, ','; lf;\x0a\x09\x09nextPutAll: 'args: ', (aMethod arguments collect: [ :each | each value ]) asArray asJavascript, ','; lf;\x0a\x09\x09nextPutAll: 'referencedClasses: ['.\x0a\x09aMethod classReferences\x0a\x09\x09do: [ :each | stream nextPutAll: each asJavascript ]\x0a\x09\x09separatedBy: [ stream nextPutAll: ',' ].\x0a\x09stream\x0a\x09\x09nextPutAll: ']';\x0a\x09\x09nextPutAll: '})'",
  3658. messageSends: ["nextPutAll:", "lf", ",", "asJavascript", "selector", "source", "value", "asArray", "messageSends", "collect:", "arguments", "do:separatedBy:", "classReferences"],
  3659. referencedClasses: ["String"]
  3660. }),
  3661. globals.JSStream);
  3662. smalltalk.addMethod(
  3663. smalltalk.method({
  3664. selector: "nextPutNonLocalReturnHandlingWith:",
  3665. protocol: 'streaming',
  3666. fn: function (aBlock){
  3667. var self=this;
  3668. return smalltalk.withContext(function($ctx1) {
  3669. var $1,$2,$3,$4;
  3670. $1=self["@stream"];
  3671. _st($1)._nextPutAll_("var $early={};");
  3672. $ctx1.sendIdx["nextPutAll:"]=1;
  3673. _st($1)._lf();
  3674. $ctx1.sendIdx["lf"]=1;
  3675. _st($1)._nextPutAll_("try {");
  3676. $ctx1.sendIdx["nextPutAll:"]=2;
  3677. $2=_st($1)._lf();
  3678. $ctx1.sendIdx["lf"]=2;
  3679. _st(aBlock)._value();
  3680. $3=self["@stream"];
  3681. _st($3)._nextPutAll_("}");
  3682. $ctx1.sendIdx["nextPutAll:"]=3;
  3683. _st($3)._lf();
  3684. $ctx1.sendIdx["lf"]=3;
  3685. _st($3)._nextPutAll_("catch(e) {if(e===$early)return e[0]; throw e}");
  3686. $4=_st($3)._lf();
  3687. return self}, function($ctx1) {$ctx1.fill(self,"nextPutNonLocalReturnHandlingWith:",{aBlock:aBlock},globals.JSStream)})},
  3688. args: ["aBlock"],
  3689. source: "nextPutNonLocalReturnHandlingWith: aBlock\x0a\x09stream\x0a\x09\x09nextPutAll: 'var $early={};'; lf;\x0a\x09\x09nextPutAll: 'try {'; lf.\x0a\x09aBlock value.\x0a\x09stream\x0a\x09\x09nextPutAll: '}'; lf;\x0a\x09\x09nextPutAll: 'catch(e) {if(e===$early)return e[0]; throw e}'; lf",
  3690. messageSends: ["nextPutAll:", "lf", "value"],
  3691. referencedClasses: []
  3692. }),
  3693. globals.JSStream);
  3694. smalltalk.addMethod(
  3695. smalltalk.method({
  3696. selector: "nextPutNonLocalReturnWith:",
  3697. protocol: 'streaming',
  3698. fn: function (aBlock){
  3699. var self=this;
  3700. return smalltalk.withContext(function($ctx1) {
  3701. _st(self["@stream"])._nextPutAll_("throw $early=[");
  3702. $ctx1.sendIdx["nextPutAll:"]=1;
  3703. _st(aBlock)._value();
  3704. _st(self["@stream"])._nextPutAll_("]");
  3705. return self}, function($ctx1) {$ctx1.fill(self,"nextPutNonLocalReturnWith:",{aBlock:aBlock},globals.JSStream)})},
  3706. args: ["aBlock"],
  3707. source: "nextPutNonLocalReturnWith: aBlock\x0a\x09stream nextPutAll: 'throw $early=['.\x0a\x09aBlock value.\x0a\x09stream nextPutAll: ']'",
  3708. messageSends: ["nextPutAll:", "value"],
  3709. referencedClasses: []
  3710. }),
  3711. globals.JSStream);
  3712. smalltalk.addMethod(
  3713. smalltalk.method({
  3714. selector: "nextPutReturn",
  3715. protocol: 'streaming',
  3716. fn: function (){
  3717. var self=this;
  3718. return smalltalk.withContext(function($ctx1) {
  3719. _st(self["@stream"])._nextPutAll_("return ");
  3720. return self}, function($ctx1) {$ctx1.fill(self,"nextPutReturn",{},globals.JSStream)})},
  3721. args: [],
  3722. source: "nextPutReturn\x0a\x09stream nextPutAll: 'return '",
  3723. messageSends: ["nextPutAll:"],
  3724. referencedClasses: []
  3725. }),
  3726. globals.JSStream);
  3727. smalltalk.addMethod(
  3728. smalltalk.method({
  3729. selector: "nextPutReturnWith:",
  3730. protocol: 'streaming',
  3731. fn: function (aBlock){
  3732. var self=this;
  3733. return smalltalk.withContext(function($ctx1) {
  3734. self._nextPutReturn();
  3735. _st(aBlock)._value();
  3736. return self}, function($ctx1) {$ctx1.fill(self,"nextPutReturnWith:",{aBlock:aBlock},globals.JSStream)})},
  3737. args: ["aBlock"],
  3738. source: "nextPutReturnWith: aBlock\x0a\x09self nextPutReturn.\x0a\x09aBlock value",
  3739. messageSends: ["nextPutReturn", "value"],
  3740. referencedClasses: []
  3741. }),
  3742. globals.JSStream);
  3743. smalltalk.addMethod(
  3744. smalltalk.method({
  3745. selector: "nextPutSendIndexFor:",
  3746. protocol: 'streaming',
  3747. fn: function (anIRSend){
  3748. var self=this;
  3749. return smalltalk.withContext(function($ctx1) {
  3750. var $1;
  3751. self._nextPutAll_(";");
  3752. $ctx1.sendIdx["nextPutAll:"]=1;
  3753. self._lf();
  3754. self._nextPutAll_(_st(_st(anIRSend)._scope())._alias());
  3755. $ctx1.sendIdx["nextPutAll:"]=2;
  3756. self._nextPutAll_(".sendIdx[");
  3757. $ctx1.sendIdx["nextPutAll:"]=3;
  3758. self._nextPutAll_(_st(_st(anIRSend)._selector())._asJavascript());
  3759. $ctx1.sendIdx["nextPutAll:"]=4;
  3760. self._nextPutAll_("]=");
  3761. $ctx1.sendIdx["nextPutAll:"]=5;
  3762. $1=self._nextPutAll_(_st(_st(anIRSend)._index())._asString());
  3763. return self}, function($ctx1) {$ctx1.fill(self,"nextPutSendIndexFor:",{anIRSend:anIRSend},globals.JSStream)})},
  3764. args: ["anIRSend"],
  3765. source: "nextPutSendIndexFor: anIRSend\x0a\x09self \x0a\x09\x09nextPutAll: ';'; lf;\x0a\x09\x09nextPutAll: anIRSend scope alias;\x0a\x09\x09nextPutAll: '.sendIdx[';\x0a\x09\x09nextPutAll: anIRSend selector asJavascript;\x0a\x09\x09nextPutAll: ']=';\x0a\x09\x09nextPutAll: anIRSend index asString",
  3766. messageSends: ["nextPutAll:", "lf", "alias", "scope", "asJavascript", "selector", "asString", "index"],
  3767. referencedClasses: []
  3768. }),
  3769. globals.JSStream);
  3770. smalltalk.addMethod(
  3771. smalltalk.method({
  3772. selector: "nextPutSequenceWith:",
  3773. protocol: 'streaming',
  3774. fn: function (aBlock){
  3775. var self=this;
  3776. return smalltalk.withContext(function($ctx1) {
  3777. _st(aBlock)._value();
  3778. return self}, function($ctx1) {$ctx1.fill(self,"nextPutSequenceWith:",{aBlock:aBlock},globals.JSStream)})},
  3779. args: ["aBlock"],
  3780. source: "nextPutSequenceWith: aBlock\x0a\x09\x22stream\x0a\x09\x09nextPutAll: 'switch(smalltalk.thisContext.pc){'; lf.\x22\x0a\x09aBlock value.\x0a\x09\x22stream\x0a\x09\x09nextPutAll: '};'; lf\x22",
  3781. messageSends: ["value"],
  3782. referencedClasses: []
  3783. }),
  3784. globals.JSStream);
  3785. smalltalk.addMethod(
  3786. smalltalk.method({
  3787. selector: "nextPutStatementWith:",
  3788. protocol: 'streaming',
  3789. fn: function (aBlock){
  3790. var self=this;
  3791. return smalltalk.withContext(function($ctx1) {
  3792. var $1,$2;
  3793. _st(aBlock)._value();
  3794. $1=self["@stream"];
  3795. _st($1)._nextPutAll_(";");
  3796. $2=_st($1)._lf();
  3797. return self}, function($ctx1) {$ctx1.fill(self,"nextPutStatementWith:",{aBlock:aBlock},globals.JSStream)})},
  3798. args: ["aBlock"],
  3799. source: "nextPutStatementWith: aBlock\x0a\x09aBlock value.\x0a\x09stream nextPutAll: ';'; lf",
  3800. messageSends: ["value", "nextPutAll:", "lf"],
  3801. referencedClasses: []
  3802. }),
  3803. globals.JSStream);
  3804. smalltalk.addMethod(
  3805. smalltalk.method({
  3806. selector: "nextPutVars:",
  3807. protocol: 'streaming',
  3808. fn: function (aCollection){
  3809. var self=this;
  3810. return smalltalk.withContext(function($ctx1) {
  3811. var $1,$2;
  3812. var $early={};
  3813. try {
  3814. _st(aCollection)._ifEmpty_((function(){
  3815. return smalltalk.withContext(function($ctx2) {
  3816. throw $early=[self];
  3817. }, function($ctx2) {$ctx2.fillBlock({},$ctx1,1)})}));
  3818. _st(self["@stream"])._nextPutAll_("var ");
  3819. $ctx1.sendIdx["nextPutAll:"]=1;
  3820. _st(aCollection)._do_separatedBy_((function(each){
  3821. return smalltalk.withContext(function($ctx2) {
  3822. return _st(self["@stream"])._nextPutAll_(each);
  3823. $ctx2.sendIdx["nextPutAll:"]=2;
  3824. }, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1,2)})}),(function(){
  3825. return smalltalk.withContext(function($ctx2) {
  3826. return _st(self["@stream"])._nextPutAll_(",");
  3827. $ctx2.sendIdx["nextPutAll:"]=3;
  3828. }, function($ctx2) {$ctx2.fillBlock({},$ctx1,3)})}));
  3829. $1=self["@stream"];
  3830. _st($1)._nextPutAll_(";");
  3831. $2=_st($1)._lf();
  3832. return self}
  3833. catch(e) {if(e===$early)return e[0]; throw e}
  3834. }, function($ctx1) {$ctx1.fill(self,"nextPutVars:",{aCollection:aCollection},globals.JSStream)})},
  3835. args: ["aCollection"],
  3836. source: "nextPutVars: aCollection\x0a\x09aCollection ifEmpty: [ ^ self ].\x0a\x09\x0a\x09stream nextPutAll: 'var '.\x0a\x09aCollection\x0a\x09\x09do: [ :each | stream nextPutAll: each ]\x0a\x09\x09separatedBy: [ stream nextPutAll: ',' ].\x0a\x09stream nextPutAll: ';'; lf",
  3837. messageSends: ["ifEmpty:", "nextPutAll:", "do:separatedBy:", "lf"],
  3838. referencedClasses: []
  3839. }),
  3840. globals.JSStream);
  3841. smalltalk.addMethod(
  3842. smalltalk.method({
  3843. selector: "appendToInstruction:",
  3844. protocol: '*Compiler-IR',
  3845. fn: function (anIRInstruction){
  3846. var self=this;
  3847. return smalltalk.withContext(function($ctx1) {
  3848. _st(anIRInstruction)._appendBlock_(self);
  3849. return self}, function($ctx1) {$ctx1.fill(self,"appendToInstruction:",{anIRInstruction:anIRInstruction},globals.BlockClosure)})},
  3850. args: ["anIRInstruction"],
  3851. source: "appendToInstruction: anIRInstruction\x0a\x09anIRInstruction appendBlock: self",
  3852. messageSends: ["appendBlock:"],
  3853. referencedClasses: []
  3854. }),
  3855. globals.BlockClosure);
  3856. });