Compiler-Inlining.js 95 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989990991992993994995996997998999100010011002100310041005100610071008100910101011101210131014101510161017101810191020102110221023102410251026102710281029103010311032103310341035103610371038103910401041104210431044104510461047104810491050105110521053105410551056105710581059106010611062106310641065106610671068106910701071107210731074107510761077107810791080108110821083108410851086108710881089109010911092109310941095109610971098109911001101110211031104110511061107110811091110111111121113111411151116111711181119112011211122112311241125112611271128112911301131113211331134113511361137113811391140114111421143114411451146114711481149115011511152115311541155115611571158115911601161116211631164116511661167116811691170117111721173117411751176117711781179118011811182118311841185118611871188118911901191119211931194119511961197119811991200120112021203120412051206120712081209121012111212121312141215121612171218121912201221122212231224122512261227122812291230123112321233123412351236123712381239124012411242124312441245124612471248124912501251125212531254125512561257125812591260126112621263126412651266126712681269127012711272127312741275127612771278127912801281128212831284128512861287128812891290129112921293129412951296129712981299130013011302130313041305130613071308130913101311131213131314131513161317131813191320132113221323132413251326132713281329133013311332133313341335133613371338133913401341134213431344134513461347134813491350135113521353135413551356135713581359136013611362136313641365136613671368136913701371137213731374137513761377137813791380138113821383138413851386138713881389139013911392139313941395139613971398139914001401140214031404140514061407140814091410141114121413141414151416141714181419142014211422142314241425142614271428142914301431143214331434143514361437143814391440144114421443144414451446144714481449145014511452145314541455145614571458145914601461146214631464146514661467146814691470147114721473147414751476147714781479148014811482148314841485148614871488148914901491149214931494149514961497149814991500150115021503150415051506150715081509151015111512151315141515151615171518151915201521152215231524152515261527152815291530153115321533153415351536153715381539154015411542154315441545154615471548154915501551155215531554155515561557155815591560156115621563156415651566156715681569157015711572157315741575157615771578157915801581158215831584158515861587158815891590159115921593159415951596159715981599160016011602160316041605160616071608160916101611161216131614161516161617161816191620162116221623162416251626162716281629163016311632163316341635163616371638163916401641164216431644164516461647164816491650165116521653165416551656165716581659166016611662166316641665166616671668166916701671167216731674167516761677167816791680168116821683168416851686168716881689169016911692169316941695169616971698169917001701170217031704170517061707170817091710171117121713171417151716171717181719172017211722172317241725172617271728172917301731173217331734173517361737173817391740174117421743174417451746174717481749175017511752175317541755175617571758175917601761176217631764176517661767176817691770177117721773177417751776177717781779178017811782178317841785178617871788178917901791179217931794179517961797179817991800180118021803180418051806180718081809181018111812181318141815181618171818181918201821182218231824182518261827182818291830183118321833183418351836183718381839184018411842184318441845184618471848184918501851185218531854185518561857185818591860186118621863186418651866186718681869187018711872187318741875187618771878187918801881188218831884188518861887188818891890189118921893189418951896189718981899190019011902190319041905190619071908190919101911191219131914191519161917191819191920192119221923192419251926192719281929193019311932193319341935193619371938193919401941194219431944194519461947194819491950195119521953195419551956195719581959196019611962196319641965196619671968196919701971197219731974197519761977197819791980198119821983198419851986198719881989199019911992199319941995199619971998199920002001200220032004200520062007200820092010201120122013201420152016201720182019202020212022202320242025202620272028202920302031203220332034203520362037203820392040204120422043204420452046204720482049205020512052205320542055205620572058205920602061206220632064206520662067206820692070207120722073207420752076207720782079208020812082208320842085208620872088208920902091209220932094209520962097209820992100210121022103210421052106210721082109211021112112211321142115211621172118211921202121212221232124212521262127212821292130213121322133213421352136213721382139214021412142214321442145214621472148214921502151215221532154215521562157215821592160216121622163216421652166216721682169217021712172217321742175217621772178217921802181218221832184218521862187218821892190219121922193219421952196219721982199220022012202220322042205220622072208220922102211221222132214221522162217221822192220222122222223222422252226222722282229223022312232223322342235223622372238223922402241224222432244224522462247224822492250225122522253225422552256225722582259226022612262226322642265226622672268226922702271227222732274227522762277227822792280228122822283228422852286228722882289229022912292229322942295229622972298229923002301230223032304230523062307230823092310231123122313231423152316231723182319232023212322232323242325232623272328232923302331233223332334233523362337233823392340234123422343234423452346234723482349235023512352235323542355235623572358235923602361236223632364236523662367236823692370237123722373237423752376237723782379238023812382238323842385238623872388238923902391239223932394239523962397239823992400240124022403240424052406240724082409241024112412241324142415241624172418241924202421242224232424242524262427242824292430243124322433243424352436243724382439244024412442244324442445244624472448244924502451245224532454245524562457245824592460246124622463246424652466246724682469247024712472247324742475247624772478247924802481248224832484248524862487248824892490249124922493249424952496249724982499250025012502250325042505250625072508250925102511251225132514251525162517251825192520252125222523252425252526252725282529
  1. define(["amber/boot", "amber_core/Compiler-Core", "amber_core/Compiler-IR", "amber_core/Compiler-Semantic", "amber_core/Kernel-Objects"], function($boot){"use strict";
  2. var $core=$boot.api,nil=$boot.nil,$recv=$boot.asReceiver,$globals=$boot.globals;
  3. if(!$boot.nilAsClass)$boot.nilAsClass=$boot.dnu;
  4. $core.addPackage('Compiler-Inlining');
  5. $core.packages["Compiler-Inlining"].innerEval = function (expr) { return eval(expr); };
  6. $core.packages["Compiler-Inlining"].transport = {"type":"amd","amdNamespace":"amber_core"};
  7. $core.addClass('IRInlinedAssignment', $globals.IRAssignment, [], 'Compiler-Inlining');
  8. //>>excludeStart("ide", pragmas.excludeIdeData);
  9. $globals.IRInlinedAssignment.comment="I represent an inlined assignment instruction.";
  10. //>>excludeEnd("ide");
  11. $core.addMethod(
  12. $core.method({
  13. selector: "accept:",
  14. protocol: 'visiting',
  15. fn: function (aVisitor){
  16. var self=this;
  17. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  18. return $core.withContext(function($ctx1) {
  19. //>>excludeEnd("ctx");
  20. return $recv(aVisitor)._visitIRInlinedAssignment_(self);
  21. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  22. }, function($ctx1) {$ctx1.fill(self,"accept:",{aVisitor:aVisitor},$globals.IRInlinedAssignment)});
  23. //>>excludeEnd("ctx");
  24. },
  25. //>>excludeStart("ide", pragmas.excludeIdeData);
  26. args: ["aVisitor"],
  27. source: "accept: aVisitor\x0a\x09^ aVisitor visitIRInlinedAssignment: self",
  28. referencedClasses: [],
  29. //>>excludeEnd("ide");
  30. messageSends: ["visitIRInlinedAssignment:"]
  31. }),
  32. $globals.IRInlinedAssignment);
  33. $core.addMethod(
  34. $core.method({
  35. selector: "isInlined",
  36. protocol: 'testing',
  37. fn: function (){
  38. var self=this;
  39. return true;
  40. },
  41. //>>excludeStart("ide", pragmas.excludeIdeData);
  42. args: [],
  43. source: "isInlined\x0a\x09^ true",
  44. referencedClasses: [],
  45. //>>excludeEnd("ide");
  46. messageSends: []
  47. }),
  48. $globals.IRInlinedAssignment);
  49. $core.addClass('IRInlinedClosure', $globals.IRClosure, [], 'Compiler-Inlining');
  50. //>>excludeStart("ide", pragmas.excludeIdeData);
  51. $globals.IRInlinedClosure.comment="I represent an inlined closure instruction.";
  52. //>>excludeEnd("ide");
  53. $core.addMethod(
  54. $core.method({
  55. selector: "accept:",
  56. protocol: 'visiting',
  57. fn: function (aVisitor){
  58. var self=this;
  59. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  60. return $core.withContext(function($ctx1) {
  61. //>>excludeEnd("ctx");
  62. $recv(aVisitor)._visitIRInlinedClosure_(self);
  63. return self;
  64. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  65. }, function($ctx1) {$ctx1.fill(self,"accept:",{aVisitor:aVisitor},$globals.IRInlinedClosure)});
  66. //>>excludeEnd("ctx");
  67. },
  68. //>>excludeStart("ide", pragmas.excludeIdeData);
  69. args: ["aVisitor"],
  70. source: "accept: aVisitor\x0a\x09aVisitor visitIRInlinedClosure: self",
  71. referencedClasses: [],
  72. //>>excludeEnd("ide");
  73. messageSends: ["visitIRInlinedClosure:"]
  74. }),
  75. $globals.IRInlinedClosure);
  76. $core.addMethod(
  77. $core.method({
  78. selector: "isInlined",
  79. protocol: 'testing',
  80. fn: function (){
  81. var self=this;
  82. return true;
  83. },
  84. //>>excludeStart("ide", pragmas.excludeIdeData);
  85. args: [],
  86. source: "isInlined\x0a\x09^ true",
  87. referencedClasses: [],
  88. //>>excludeEnd("ide");
  89. messageSends: []
  90. }),
  91. $globals.IRInlinedClosure);
  92. $core.addClass('IRInlinedReturn', $globals.IRReturn, [], 'Compiler-Inlining');
  93. //>>excludeStart("ide", pragmas.excludeIdeData);
  94. $globals.IRInlinedReturn.comment="I represent an inlined local return instruction.";
  95. //>>excludeEnd("ide");
  96. $core.addMethod(
  97. $core.method({
  98. selector: "accept:",
  99. protocol: 'visiting',
  100. fn: function (aVisitor){
  101. var self=this;
  102. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  103. return $core.withContext(function($ctx1) {
  104. //>>excludeEnd("ctx");
  105. return $recv(aVisitor)._visitIRInlinedReturn_(self);
  106. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  107. }, function($ctx1) {$ctx1.fill(self,"accept:",{aVisitor:aVisitor},$globals.IRInlinedReturn)});
  108. //>>excludeEnd("ctx");
  109. },
  110. //>>excludeStart("ide", pragmas.excludeIdeData);
  111. args: ["aVisitor"],
  112. source: "accept: aVisitor\x0a\x09^ aVisitor visitIRInlinedReturn: self",
  113. referencedClasses: [],
  114. //>>excludeEnd("ide");
  115. messageSends: ["visitIRInlinedReturn:"]
  116. }),
  117. $globals.IRInlinedReturn);
  118. $core.addMethod(
  119. $core.method({
  120. selector: "isInlined",
  121. protocol: 'testing',
  122. fn: function (){
  123. var self=this;
  124. return true;
  125. },
  126. //>>excludeStart("ide", pragmas.excludeIdeData);
  127. args: [],
  128. source: "isInlined\x0a\x09^ true",
  129. referencedClasses: [],
  130. //>>excludeEnd("ide");
  131. messageSends: []
  132. }),
  133. $globals.IRInlinedReturn);
  134. $core.addClass('IRInlinedSend', $globals.IRSend, [], 'Compiler-Inlining');
  135. //>>excludeStart("ide", pragmas.excludeIdeData);
  136. $globals.IRInlinedSend.comment="I am the abstract super class of inlined message send instructions.";
  137. //>>excludeEnd("ide");
  138. $core.addMethod(
  139. $core.method({
  140. selector: "accept:",
  141. protocol: 'visiting',
  142. fn: function (aVisitor){
  143. var self=this;
  144. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  145. return $core.withContext(function($ctx1) {
  146. //>>excludeEnd("ctx");
  147. $recv(aVisitor)._visitInlinedSend_(self);
  148. return self;
  149. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  150. }, function($ctx1) {$ctx1.fill(self,"accept:",{aVisitor:aVisitor},$globals.IRInlinedSend)});
  151. //>>excludeEnd("ctx");
  152. },
  153. //>>excludeStart("ide", pragmas.excludeIdeData);
  154. args: ["aVisitor"],
  155. source: "accept: aVisitor\x0a\x09aVisitor visitInlinedSend: self",
  156. referencedClasses: [],
  157. //>>excludeEnd("ide");
  158. messageSends: ["visitInlinedSend:"]
  159. }),
  160. $globals.IRInlinedSend);
  161. $core.addMethod(
  162. $core.method({
  163. selector: "internalVariables",
  164. protocol: 'accessing',
  165. fn: function (){
  166. var self=this;
  167. return [];
  168. },
  169. //>>excludeStart("ide", pragmas.excludeIdeData);
  170. args: [],
  171. source: "internalVariables\x0a\x09\x22Answer a collection of internal variables required \x0a\x09to perform the inlining\x22\x0a\x09\x0a\x09^ #()",
  172. referencedClasses: [],
  173. //>>excludeEnd("ide");
  174. messageSends: []
  175. }),
  176. $globals.IRInlinedSend);
  177. $core.addMethod(
  178. $core.method({
  179. selector: "isInlined",
  180. protocol: 'testing',
  181. fn: function (){
  182. var self=this;
  183. return true;
  184. },
  185. //>>excludeStart("ide", pragmas.excludeIdeData);
  186. args: [],
  187. source: "isInlined\x0a\x09^ true",
  188. referencedClasses: [],
  189. //>>excludeEnd("ide");
  190. messageSends: []
  191. }),
  192. $globals.IRInlinedSend);
  193. $core.addClass('IRInlinedIfFalse', $globals.IRInlinedSend, [], 'Compiler-Inlining');
  194. //>>excludeStart("ide", pragmas.excludeIdeData);
  195. $globals.IRInlinedIfFalse.comment="I represent an inlined `#ifFalse:` message send instruction.";
  196. //>>excludeEnd("ide");
  197. $core.addMethod(
  198. $core.method({
  199. selector: "accept:",
  200. protocol: 'visiting',
  201. fn: function (aVisitor){
  202. var self=this;
  203. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  204. return $core.withContext(function($ctx1) {
  205. //>>excludeEnd("ctx");
  206. $recv(aVisitor)._visitIRInlinedIfFalse_(self);
  207. return self;
  208. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  209. }, function($ctx1) {$ctx1.fill(self,"accept:",{aVisitor:aVisitor},$globals.IRInlinedIfFalse)});
  210. //>>excludeEnd("ctx");
  211. },
  212. //>>excludeStart("ide", pragmas.excludeIdeData);
  213. args: ["aVisitor"],
  214. source: "accept: aVisitor\x0a\x09aVisitor visitIRInlinedIfFalse: self",
  215. referencedClasses: [],
  216. //>>excludeEnd("ide");
  217. messageSends: ["visitIRInlinedIfFalse:"]
  218. }),
  219. $globals.IRInlinedIfFalse);
  220. $core.addClass('IRInlinedIfNilIfNotNil', $globals.IRInlinedSend, [], 'Compiler-Inlining');
  221. //>>excludeStart("ide", pragmas.excludeIdeData);
  222. $globals.IRInlinedIfNilIfNotNil.comment="I represent an inlined `#ifNil:ifNotNil:` message send instruction.";
  223. //>>excludeEnd("ide");
  224. $core.addMethod(
  225. $core.method({
  226. selector: "accept:",
  227. protocol: 'visiting',
  228. fn: function (aVisitor){
  229. var self=this;
  230. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  231. return $core.withContext(function($ctx1) {
  232. //>>excludeEnd("ctx");
  233. $recv(aVisitor)._visitIRInlinedIfNilIfNotNil_(self);
  234. return self;
  235. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  236. }, function($ctx1) {$ctx1.fill(self,"accept:",{aVisitor:aVisitor},$globals.IRInlinedIfNilIfNotNil)});
  237. //>>excludeEnd("ctx");
  238. },
  239. //>>excludeStart("ide", pragmas.excludeIdeData);
  240. args: ["aVisitor"],
  241. source: "accept: aVisitor\x0a\x09aVisitor visitIRInlinedIfNilIfNotNil: self",
  242. referencedClasses: [],
  243. //>>excludeEnd("ide");
  244. messageSends: ["visitIRInlinedIfNilIfNotNil:"]
  245. }),
  246. $globals.IRInlinedIfNilIfNotNil);
  247. $core.addMethod(
  248. $core.method({
  249. selector: "internalVariables",
  250. protocol: 'accessing',
  251. fn: function (){
  252. var self=this;
  253. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  254. return $core.withContext(function($ctx1) {
  255. //>>excludeEnd("ctx");
  256. return $recv($globals.Array)._with_(self._receiverInternalVariable());
  257. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  258. }, function($ctx1) {$ctx1.fill(self,"internalVariables",{},$globals.IRInlinedIfNilIfNotNil)});
  259. //>>excludeEnd("ctx");
  260. },
  261. //>>excludeStart("ide", pragmas.excludeIdeData);
  262. args: [],
  263. source: "internalVariables\x0a\x09^ Array with: self receiverInternalVariable",
  264. referencedClasses: ["Array"],
  265. //>>excludeEnd("ide");
  266. messageSends: ["with:", "receiverInternalVariable"]
  267. }),
  268. $globals.IRInlinedIfNilIfNotNil);
  269. $core.addMethod(
  270. $core.method({
  271. selector: "receiverInternalVariable",
  272. protocol: 'accessing',
  273. fn: function (){
  274. var self=this;
  275. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  276. return $core.withContext(function($ctx1) {
  277. //>>excludeEnd("ctx");
  278. var $1;
  279. $1=$recv($globals.IRVariable)._new();
  280. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  281. $ctx1.sendIdx["new"]=1;
  282. //>>excludeEnd("ctx");
  283. $recv($1)._variable_($recv($recv($globals.AliasVar)._new())._name_(self._receiverInternalVariableName()));
  284. return $recv($1)._yourself();
  285. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  286. }, function($ctx1) {$ctx1.fill(self,"receiverInternalVariable",{},$globals.IRInlinedIfNilIfNotNil)});
  287. //>>excludeEnd("ctx");
  288. },
  289. //>>excludeStart("ide", pragmas.excludeIdeData);
  290. args: [],
  291. source: "receiverInternalVariable\x0a\x09^ IRVariable new\x0a\x09\x09variable: (AliasVar new name: self receiverInternalVariableName);\x0a\x09\x09yourself.",
  292. referencedClasses: ["IRVariable", "AliasVar"],
  293. //>>excludeEnd("ide");
  294. messageSends: ["variable:", "new", "name:", "receiverInternalVariableName", "yourself"]
  295. }),
  296. $globals.IRInlinedIfNilIfNotNil);
  297. $core.addMethod(
  298. $core.method({
  299. selector: "receiverInternalVariableName",
  300. protocol: 'accessing',
  301. fn: function (){
  302. var self=this;
  303. return "$receiver";
  304. },
  305. //>>excludeStart("ide", pragmas.excludeIdeData);
  306. args: [],
  307. source: "receiverInternalVariableName\x0a\x09^ '$receiver'",
  308. referencedClasses: [],
  309. //>>excludeEnd("ide");
  310. messageSends: []
  311. }),
  312. $globals.IRInlinedIfNilIfNotNil);
  313. $core.addClass('IRInlinedIfTrue', $globals.IRInlinedSend, [], 'Compiler-Inlining');
  314. //>>excludeStart("ide", pragmas.excludeIdeData);
  315. $globals.IRInlinedIfTrue.comment="I represent an inlined `#ifTrue:` message send instruction.";
  316. //>>excludeEnd("ide");
  317. $core.addMethod(
  318. $core.method({
  319. selector: "accept:",
  320. protocol: 'visiting',
  321. fn: function (aVisitor){
  322. var self=this;
  323. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  324. return $core.withContext(function($ctx1) {
  325. //>>excludeEnd("ctx");
  326. $recv(aVisitor)._visitIRInlinedIfTrue_(self);
  327. return self;
  328. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  329. }, function($ctx1) {$ctx1.fill(self,"accept:",{aVisitor:aVisitor},$globals.IRInlinedIfTrue)});
  330. //>>excludeEnd("ctx");
  331. },
  332. //>>excludeStart("ide", pragmas.excludeIdeData);
  333. args: ["aVisitor"],
  334. source: "accept: aVisitor\x0a\x09aVisitor visitIRInlinedIfTrue: self",
  335. referencedClasses: [],
  336. //>>excludeEnd("ide");
  337. messageSends: ["visitIRInlinedIfTrue:"]
  338. }),
  339. $globals.IRInlinedIfTrue);
  340. $core.addClass('IRInlinedIfTrueIfFalse', $globals.IRInlinedSend, [], 'Compiler-Inlining');
  341. //>>excludeStart("ide", pragmas.excludeIdeData);
  342. $globals.IRInlinedIfTrueIfFalse.comment="I represent an inlined `#ifTrue:ifFalse:` message send instruction.";
  343. //>>excludeEnd("ide");
  344. $core.addMethod(
  345. $core.method({
  346. selector: "accept:",
  347. protocol: 'visiting',
  348. fn: function (aVisitor){
  349. var self=this;
  350. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  351. return $core.withContext(function($ctx1) {
  352. //>>excludeEnd("ctx");
  353. $recv(aVisitor)._visitIRInlinedIfTrueIfFalse_(self);
  354. return self;
  355. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  356. }, function($ctx1) {$ctx1.fill(self,"accept:",{aVisitor:aVisitor},$globals.IRInlinedIfTrueIfFalse)});
  357. //>>excludeEnd("ctx");
  358. },
  359. //>>excludeStart("ide", pragmas.excludeIdeData);
  360. args: ["aVisitor"],
  361. source: "accept: aVisitor\x0a\x09aVisitor visitIRInlinedIfTrueIfFalse: self",
  362. referencedClasses: [],
  363. //>>excludeEnd("ide");
  364. messageSends: ["visitIRInlinedIfTrueIfFalse:"]
  365. }),
  366. $globals.IRInlinedIfTrueIfFalse);
  367. $core.addClass('IRInlinedSequence', $globals.IRBlockSequence, [], 'Compiler-Inlining');
  368. //>>excludeStart("ide", pragmas.excludeIdeData);
  369. $globals.IRInlinedSequence.comment="I represent a (block) sequence inside an inlined closure instruction (instance of `IRInlinedClosure`).";
  370. //>>excludeEnd("ide");
  371. $core.addMethod(
  372. $core.method({
  373. selector: "accept:",
  374. protocol: 'visiting',
  375. fn: function (aVisitor){
  376. var self=this;
  377. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  378. return $core.withContext(function($ctx1) {
  379. //>>excludeEnd("ctx");
  380. $recv(aVisitor)._visitIRInlinedSequence_(self);
  381. return self;
  382. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  383. }, function($ctx1) {$ctx1.fill(self,"accept:",{aVisitor:aVisitor},$globals.IRInlinedSequence)});
  384. //>>excludeEnd("ctx");
  385. },
  386. //>>excludeStart("ide", pragmas.excludeIdeData);
  387. args: ["aVisitor"],
  388. source: "accept: aVisitor\x0a\x09aVisitor visitIRInlinedSequence: self",
  389. referencedClasses: [],
  390. //>>excludeEnd("ide");
  391. messageSends: ["visitIRInlinedSequence:"]
  392. }),
  393. $globals.IRInlinedSequence);
  394. $core.addMethod(
  395. $core.method({
  396. selector: "isInlined",
  397. protocol: 'testing',
  398. fn: function (){
  399. var self=this;
  400. return true;
  401. },
  402. //>>excludeStart("ide", pragmas.excludeIdeData);
  403. args: [],
  404. source: "isInlined\x0a\x09^ true",
  405. referencedClasses: [],
  406. //>>excludeEnd("ide");
  407. messageSends: []
  408. }),
  409. $globals.IRInlinedSequence);
  410. $core.addClass('IRInliner', $globals.IRVisitor, [], 'Compiler-Inlining');
  411. //>>excludeStart("ide", pragmas.excludeIdeData);
  412. $globals.IRInliner.comment="I visit an IR tree, inlining message sends and block closures.\x0a\x0aMessage selectors that can be inlined are answered by `IRSendInliner >> #inlinedSelectors`";
  413. //>>excludeEnd("ide");
  414. $core.addMethod(
  415. $core.method({
  416. selector: "assignmentInliner",
  417. protocol: 'factory',
  418. fn: function (){
  419. var self=this;
  420. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  421. return $core.withContext(function($ctx1) {
  422. //>>excludeEnd("ctx");
  423. var $1;
  424. $1=$recv($globals.IRAssignmentInliner)._new();
  425. $recv($1)._translator_(self);
  426. return $recv($1)._yourself();
  427. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  428. }, function($ctx1) {$ctx1.fill(self,"assignmentInliner",{},$globals.IRInliner)});
  429. //>>excludeEnd("ctx");
  430. },
  431. //>>excludeStart("ide", pragmas.excludeIdeData);
  432. args: [],
  433. source: "assignmentInliner\x0a\x09^ IRAssignmentInliner new\x0a\x09\x09translator: self;\x0a\x09\x09yourself",
  434. referencedClasses: ["IRAssignmentInliner"],
  435. //>>excludeEnd("ide");
  436. messageSends: ["translator:", "new", "yourself"]
  437. }),
  438. $globals.IRInliner);
  439. $core.addMethod(
  440. $core.method({
  441. selector: "returnInliner",
  442. protocol: 'factory',
  443. fn: function (){
  444. var self=this;
  445. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  446. return $core.withContext(function($ctx1) {
  447. //>>excludeEnd("ctx");
  448. var $1;
  449. $1=$recv($globals.IRReturnInliner)._new();
  450. $recv($1)._translator_(self);
  451. return $recv($1)._yourself();
  452. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  453. }, function($ctx1) {$ctx1.fill(self,"returnInliner",{},$globals.IRInliner)});
  454. //>>excludeEnd("ctx");
  455. },
  456. //>>excludeStart("ide", pragmas.excludeIdeData);
  457. args: [],
  458. source: "returnInliner\x0a\x09^ IRReturnInliner new\x0a\x09\x09translator: self;\x0a\x09\x09yourself",
  459. referencedClasses: ["IRReturnInliner"],
  460. //>>excludeEnd("ide");
  461. messageSends: ["translator:", "new", "yourself"]
  462. }),
  463. $globals.IRInliner);
  464. $core.addMethod(
  465. $core.method({
  466. selector: "sendInliner",
  467. protocol: 'factory',
  468. fn: function (){
  469. var self=this;
  470. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  471. return $core.withContext(function($ctx1) {
  472. //>>excludeEnd("ctx");
  473. var $1;
  474. $1=$recv($globals.IRSendInliner)._new();
  475. $recv($1)._translator_(self);
  476. return $recv($1)._yourself();
  477. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  478. }, function($ctx1) {$ctx1.fill(self,"sendInliner",{},$globals.IRInliner)});
  479. //>>excludeEnd("ctx");
  480. },
  481. //>>excludeStart("ide", pragmas.excludeIdeData);
  482. args: [],
  483. source: "sendInliner\x0a\x09^ IRSendInliner new\x0a\x09\x09translator: self;\x0a\x09\x09yourself",
  484. referencedClasses: ["IRSendInliner"],
  485. //>>excludeEnd("ide");
  486. messageSends: ["translator:", "new", "yourself"]
  487. }),
  488. $globals.IRInliner);
  489. $core.addMethod(
  490. $core.method({
  491. selector: "shouldInlineAssignment:",
  492. protocol: 'testing',
  493. fn: function (anIRAssignment){
  494. var self=this;
  495. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  496. return $core.withContext(function($ctx1) {
  497. //>>excludeEnd("ctx");
  498. var $4,$3,$2,$1;
  499. $1=$recv($recv($recv(anIRAssignment)._isInlined())._not())._and_((function(){
  500. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  501. return $core.withContext(function($ctx2) {
  502. //>>excludeEnd("ctx");
  503. $4=$recv(anIRAssignment)._instructions();
  504. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  505. $ctx2.sendIdx["instructions"]=1;
  506. //>>excludeEnd("ctx");
  507. $3=$recv($4)._last();
  508. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  509. $ctx2.sendIdx["last"]=1;
  510. //>>excludeEnd("ctx");
  511. $2=$recv($3)._isSend();
  512. return $recv($2)._and_((function(){
  513. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  514. return $core.withContext(function($ctx3) {
  515. //>>excludeEnd("ctx");
  516. return self._shouldInlineSend_($recv($recv(anIRAssignment)._instructions())._last());
  517. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  518. }, function($ctx3) {$ctx3.fillBlock({},$ctx2,2)});
  519. //>>excludeEnd("ctx");
  520. }));
  521. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  522. }, function($ctx2) {$ctx2.fillBlock({},$ctx1,1)});
  523. //>>excludeEnd("ctx");
  524. }));
  525. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  526. $ctx1.sendIdx["and:"]=1;
  527. //>>excludeEnd("ctx");
  528. return $1;
  529. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  530. }, function($ctx1) {$ctx1.fill(self,"shouldInlineAssignment:",{anIRAssignment:anIRAssignment},$globals.IRInliner)});
  531. //>>excludeEnd("ctx");
  532. },
  533. //>>excludeStart("ide", pragmas.excludeIdeData);
  534. args: ["anIRAssignment"],
  535. source: "shouldInlineAssignment: anIRAssignment\x0a\x09^ anIRAssignment isInlined not and: [\x0a\x09\x09anIRAssignment instructions last isSend and: [\x0a\x09\x09\x09self shouldInlineSend: (anIRAssignment instructions last) ]]",
  536. referencedClasses: [],
  537. //>>excludeEnd("ide");
  538. messageSends: ["and:", "not", "isInlined", "isSend", "last", "instructions", "shouldInlineSend:"]
  539. }),
  540. $globals.IRInliner);
  541. $core.addMethod(
  542. $core.method({
  543. selector: "shouldInlineReturn:",
  544. protocol: 'testing',
  545. fn: function (anIRReturn){
  546. var self=this;
  547. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  548. return $core.withContext(function($ctx1) {
  549. //>>excludeEnd("ctx");
  550. var $4,$3,$2,$1;
  551. $1=$recv($recv($recv(anIRReturn)._isInlined())._not())._and_((function(){
  552. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  553. return $core.withContext(function($ctx2) {
  554. //>>excludeEnd("ctx");
  555. $4=$recv(anIRReturn)._instructions();
  556. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  557. $ctx2.sendIdx["instructions"]=1;
  558. //>>excludeEnd("ctx");
  559. $3=$recv($4)._first();
  560. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  561. $ctx2.sendIdx["first"]=1;
  562. //>>excludeEnd("ctx");
  563. $2=$recv($3)._isSend();
  564. return $recv($2)._and_((function(){
  565. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  566. return $core.withContext(function($ctx3) {
  567. //>>excludeEnd("ctx");
  568. return self._shouldInlineSend_($recv($recv(anIRReturn)._instructions())._first());
  569. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  570. }, function($ctx3) {$ctx3.fillBlock({},$ctx2,2)});
  571. //>>excludeEnd("ctx");
  572. }));
  573. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  574. }, function($ctx2) {$ctx2.fillBlock({},$ctx1,1)});
  575. //>>excludeEnd("ctx");
  576. }));
  577. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  578. $ctx1.sendIdx["and:"]=1;
  579. //>>excludeEnd("ctx");
  580. return $1;
  581. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  582. }, function($ctx1) {$ctx1.fill(self,"shouldInlineReturn:",{anIRReturn:anIRReturn},$globals.IRInliner)});
  583. //>>excludeEnd("ctx");
  584. },
  585. //>>excludeStart("ide", pragmas.excludeIdeData);
  586. args: ["anIRReturn"],
  587. source: "shouldInlineReturn: anIRReturn\x0a\x09^ anIRReturn isInlined not and: [\x0a\x09\x09anIRReturn instructions first isSend and: [\x0a\x09\x09\x09self shouldInlineSend: (anIRReturn instructions first) ]]",
  588. referencedClasses: [],
  589. //>>excludeEnd("ide");
  590. messageSends: ["and:", "not", "isInlined", "isSend", "first", "instructions", "shouldInlineSend:"]
  591. }),
  592. $globals.IRInliner);
  593. $core.addMethod(
  594. $core.method({
  595. selector: "shouldInlineSend:",
  596. protocol: 'testing',
  597. fn: function (anIRSend){
  598. var self=this;
  599. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  600. return $core.withContext(function($ctx1) {
  601. //>>excludeEnd("ctx");
  602. return $recv($recv($recv(anIRSend)._isInlined())._not())._and_((function(){
  603. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  604. return $core.withContext(function($ctx2) {
  605. //>>excludeEnd("ctx");
  606. return $recv($globals.IRSendInliner)._shouldInline_(anIRSend);
  607. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  608. }, function($ctx2) {$ctx2.fillBlock({},$ctx1,1)});
  609. //>>excludeEnd("ctx");
  610. }));
  611. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  612. }, function($ctx1) {$ctx1.fill(self,"shouldInlineSend:",{anIRSend:anIRSend},$globals.IRInliner)});
  613. //>>excludeEnd("ctx");
  614. },
  615. //>>excludeStart("ide", pragmas.excludeIdeData);
  616. args: ["anIRSend"],
  617. source: "shouldInlineSend: anIRSend\x0a\x09^ anIRSend isInlined not and: [\x0a\x09\x09IRSendInliner shouldInline: anIRSend ]",
  618. referencedClasses: ["IRSendInliner"],
  619. //>>excludeEnd("ide");
  620. messageSends: ["and:", "not", "isInlined", "shouldInline:"]
  621. }),
  622. $globals.IRInliner);
  623. $core.addMethod(
  624. $core.method({
  625. selector: "transformNonLocalReturn:",
  626. protocol: 'visiting',
  627. fn: function (anIRNonLocalReturn){
  628. var self=this;
  629. var localReturn;
  630. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  631. return $core.withContext(function($ctx1) {
  632. //>>excludeEnd("ctx");
  633. var $2,$1,$4,$3,$5,$6,$7;
  634. $2=$recv(anIRNonLocalReturn)._scope();
  635. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  636. $ctx1.sendIdx["scope"]=1;
  637. //>>excludeEnd("ctx");
  638. $1=$recv($2)._canInlineNonLocalReturns();
  639. if($core.assert($1)){
  640. $4=$recv(anIRNonLocalReturn)._scope();
  641. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  642. $ctx1.sendIdx["scope"]=2;
  643. //>>excludeEnd("ctx");
  644. $3=$recv($4)._methodScope();
  645. $5=$recv(anIRNonLocalReturn)._scope();
  646. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  647. $ctx1.sendIdx["scope"]=3;
  648. //>>excludeEnd("ctx");
  649. $recv($3)._removeNonLocalReturn_($5);
  650. $6=$recv($globals.IRReturn)._new();
  651. $recv($6)._scope_($recv(anIRNonLocalReturn)._scope());
  652. localReturn=$recv($6)._yourself();
  653. localReturn;
  654. $recv($recv(anIRNonLocalReturn)._instructions())._do_((function(each){
  655. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  656. return $core.withContext(function($ctx2) {
  657. //>>excludeEnd("ctx");
  658. return $recv(localReturn)._add_(each);
  659. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  660. }, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1,2)});
  661. //>>excludeEnd("ctx");
  662. }));
  663. $recv(anIRNonLocalReturn)._replaceWith_(localReturn);
  664. return localReturn;
  665. };
  666. $7=(
  667. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  668. $ctx1.supercall = true,
  669. //>>excludeEnd("ctx");
  670. ($globals.IRInliner.superclass||$boot.nilAsClass).fn.prototype._visitIRNonLocalReturn_.apply($recv(self), [anIRNonLocalReturn]));
  671. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  672. $ctx1.supercall = false;
  673. //>>excludeEnd("ctx");;
  674. return $7;
  675. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  676. }, function($ctx1) {$ctx1.fill(self,"transformNonLocalReturn:",{anIRNonLocalReturn:anIRNonLocalReturn,localReturn:localReturn},$globals.IRInliner)});
  677. //>>excludeEnd("ctx");
  678. },
  679. //>>excludeStart("ide", pragmas.excludeIdeData);
  680. args: ["anIRNonLocalReturn"],
  681. source: "transformNonLocalReturn: anIRNonLocalReturn\x0a\x09\x22Replace a non local return into a local return\x22\x0a\x0a\x09| localReturn |\x0a\x09anIRNonLocalReturn scope canInlineNonLocalReturns ifTrue: [\x0a\x09\x09anIRNonLocalReturn scope methodScope removeNonLocalReturn: anIRNonLocalReturn scope.\x0a\x09\x09localReturn := IRReturn new\x0a\x09\x09\x09scope: anIRNonLocalReturn scope;\x0a\x09\x09\x09yourself.\x0a\x09\x09anIRNonLocalReturn instructions do: [ :each |\x0a\x09\x09\x09localReturn add: each ].\x0a\x09\x09anIRNonLocalReturn replaceWith: localReturn.\x0a\x09\x09^ localReturn ].\x0a\x09^ super visitIRNonLocalReturn: anIRNonLocalReturn",
  682. referencedClasses: ["IRReturn"],
  683. //>>excludeEnd("ide");
  684. messageSends: ["ifTrue:", "canInlineNonLocalReturns", "scope", "removeNonLocalReturn:", "methodScope", "scope:", "new", "yourself", "do:", "instructions", "add:", "replaceWith:", "visitIRNonLocalReturn:"]
  685. }),
  686. $globals.IRInliner);
  687. $core.addMethod(
  688. $core.method({
  689. selector: "visitIRAssignment:",
  690. protocol: 'visiting',
  691. fn: function (anIRAssignment){
  692. var self=this;
  693. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  694. return $core.withContext(function($ctx1) {
  695. //>>excludeEnd("ctx");
  696. var $1;
  697. $1=self._shouldInlineAssignment_(anIRAssignment);
  698. if($core.assert($1)){
  699. return $recv(self._assignmentInliner())._inlineAssignment_(anIRAssignment);
  700. } else {
  701. return (
  702. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  703. $ctx1.supercall = true,
  704. //>>excludeEnd("ctx");
  705. ($globals.IRInliner.superclass||$boot.nilAsClass).fn.prototype._visitIRAssignment_.apply($recv(self), [anIRAssignment]));
  706. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  707. $ctx1.supercall = false;
  708. //>>excludeEnd("ctx");;
  709. };
  710. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  711. }, function($ctx1) {$ctx1.fill(self,"visitIRAssignment:",{anIRAssignment:anIRAssignment},$globals.IRInliner)});
  712. //>>excludeEnd("ctx");
  713. },
  714. //>>excludeStart("ide", pragmas.excludeIdeData);
  715. args: ["anIRAssignment"],
  716. source: "visitIRAssignment: anIRAssignment\x0a\x09^ (self shouldInlineAssignment: anIRAssignment)\x0a\x09\x09ifTrue: [ self assignmentInliner inlineAssignment: anIRAssignment ]\x0a\x09\x09ifFalse: [ super visitIRAssignment: anIRAssignment ]",
  717. referencedClasses: [],
  718. //>>excludeEnd("ide");
  719. messageSends: ["ifTrue:ifFalse:", "shouldInlineAssignment:", "inlineAssignment:", "assignmentInliner", "visitIRAssignment:"]
  720. }),
  721. $globals.IRInliner);
  722. $core.addMethod(
  723. $core.method({
  724. selector: "visitIRNonLocalReturn:",
  725. protocol: 'visiting',
  726. fn: function (anIRNonLocalReturn){
  727. var self=this;
  728. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  729. return $core.withContext(function($ctx1) {
  730. //>>excludeEnd("ctx");
  731. return self._transformNonLocalReturn_(anIRNonLocalReturn);
  732. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  733. }, function($ctx1) {$ctx1.fill(self,"visitIRNonLocalReturn:",{anIRNonLocalReturn:anIRNonLocalReturn},$globals.IRInliner)});
  734. //>>excludeEnd("ctx");
  735. },
  736. //>>excludeStart("ide", pragmas.excludeIdeData);
  737. args: ["anIRNonLocalReturn"],
  738. source: "visitIRNonLocalReturn: anIRNonLocalReturn\x0a\x09^ self transformNonLocalReturn: anIRNonLocalReturn",
  739. referencedClasses: [],
  740. //>>excludeEnd("ide");
  741. messageSends: ["transformNonLocalReturn:"]
  742. }),
  743. $globals.IRInliner);
  744. $core.addMethod(
  745. $core.method({
  746. selector: "visitIRReturn:",
  747. protocol: 'visiting',
  748. fn: function (anIRReturn){
  749. var self=this;
  750. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  751. return $core.withContext(function($ctx1) {
  752. //>>excludeEnd("ctx");
  753. var $1;
  754. $1=self._shouldInlineReturn_(anIRReturn);
  755. if($core.assert($1)){
  756. return $recv(self._returnInliner())._inlineReturn_(anIRReturn);
  757. } else {
  758. return (
  759. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  760. $ctx1.supercall = true,
  761. //>>excludeEnd("ctx");
  762. ($globals.IRInliner.superclass||$boot.nilAsClass).fn.prototype._visitIRReturn_.apply($recv(self), [anIRReturn]));
  763. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  764. $ctx1.supercall = false;
  765. //>>excludeEnd("ctx");;
  766. };
  767. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  768. }, function($ctx1) {$ctx1.fill(self,"visitIRReturn:",{anIRReturn:anIRReturn},$globals.IRInliner)});
  769. //>>excludeEnd("ctx");
  770. },
  771. //>>excludeStart("ide", pragmas.excludeIdeData);
  772. args: ["anIRReturn"],
  773. source: "visitIRReturn: anIRReturn\x0a\x09^ (self shouldInlineReturn: anIRReturn)\x0a\x09\x09ifTrue: [ self returnInliner inlineReturn: anIRReturn ]\x0a\x09\x09ifFalse: [ super visitIRReturn: anIRReturn ]",
  774. referencedClasses: [],
  775. //>>excludeEnd("ide");
  776. messageSends: ["ifTrue:ifFalse:", "shouldInlineReturn:", "inlineReturn:", "returnInliner", "visitIRReturn:"]
  777. }),
  778. $globals.IRInliner);
  779. $core.addMethod(
  780. $core.method({
  781. selector: "visitIRSend:",
  782. protocol: 'visiting',
  783. fn: function (anIRSend){
  784. var self=this;
  785. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  786. return $core.withContext(function($ctx1) {
  787. //>>excludeEnd("ctx");
  788. var $1;
  789. $1=self._shouldInlineSend_(anIRSend);
  790. if($core.assert($1)){
  791. return $recv(self._sendInliner())._inlineSend_(anIRSend);
  792. } else {
  793. return (
  794. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  795. $ctx1.supercall = true,
  796. //>>excludeEnd("ctx");
  797. ($globals.IRInliner.superclass||$boot.nilAsClass).fn.prototype._visitIRSend_.apply($recv(self), [anIRSend]));
  798. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  799. $ctx1.supercall = false;
  800. //>>excludeEnd("ctx");;
  801. };
  802. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  803. }, function($ctx1) {$ctx1.fill(self,"visitIRSend:",{anIRSend:anIRSend},$globals.IRInliner)});
  804. //>>excludeEnd("ctx");
  805. },
  806. //>>excludeStart("ide", pragmas.excludeIdeData);
  807. args: ["anIRSend"],
  808. source: "visitIRSend: anIRSend\x0a\x09^ (self shouldInlineSend: anIRSend)\x0a\x09\x09ifTrue: [ self sendInliner inlineSend: anIRSend ]\x0a\x09\x09ifFalse: [ super visitIRSend: anIRSend ]",
  809. referencedClasses: [],
  810. //>>excludeEnd("ide");
  811. messageSends: ["ifTrue:ifFalse:", "shouldInlineSend:", "inlineSend:", "sendInliner", "visitIRSend:"]
  812. }),
  813. $globals.IRInliner);
  814. $core.addClass('IRInliningJSTranslator', $globals.IRJSTranslator, [], 'Compiler-Inlining');
  815. //>>excludeStart("ide", pragmas.excludeIdeData);
  816. $globals.IRInliningJSTranslator.comment="I am a specialized JavaScript translator able to write inlined IR instructions to JavaScript stream (`JSStream` instance).";
  817. //>>excludeEnd("ide");
  818. $core.addMethod(
  819. $core.method({
  820. selector: "visitIRInlinedAssignment:",
  821. protocol: 'visiting',
  822. fn: function (anIRInlinedAssignment){
  823. var self=this;
  824. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  825. return $core.withContext(function($ctx1) {
  826. //>>excludeEnd("ctx");
  827. self._visit_($recv($recv(anIRInlinedAssignment)._instructions())._last());
  828. return self;
  829. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  830. }, function($ctx1) {$ctx1.fill(self,"visitIRInlinedAssignment:",{anIRInlinedAssignment:anIRInlinedAssignment},$globals.IRInliningJSTranslator)});
  831. //>>excludeEnd("ctx");
  832. },
  833. //>>excludeStart("ide", pragmas.excludeIdeData);
  834. args: ["anIRInlinedAssignment"],
  835. source: "visitIRInlinedAssignment: anIRInlinedAssignment\x0a\x09self visit: anIRInlinedAssignment instructions last",
  836. referencedClasses: [],
  837. //>>excludeEnd("ide");
  838. messageSends: ["visit:", "last", "instructions"]
  839. }),
  840. $globals.IRInliningJSTranslator);
  841. $core.addMethod(
  842. $core.method({
  843. selector: "visitIRInlinedClosure:",
  844. protocol: 'visiting',
  845. fn: function (anIRInlinedClosure){
  846. var self=this;
  847. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  848. return $core.withContext(function($ctx1) {
  849. //>>excludeEnd("ctx");
  850. $recv(self._stream())._nextPutVars_($recv($recv(anIRInlinedClosure)._tempDeclarations())._collect_((function(each){
  851. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  852. return $core.withContext(function($ctx2) {
  853. //>>excludeEnd("ctx");
  854. return $recv($recv(each)._name())._asVariableName();
  855. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  856. }, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1,1)});
  857. //>>excludeEnd("ctx");
  858. })));
  859. $recv($recv(anIRInlinedClosure)._instructions())._do_((function(each){
  860. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  861. return $core.withContext(function($ctx2) {
  862. //>>excludeEnd("ctx");
  863. return self._visit_(each);
  864. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  865. }, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1,2)});
  866. //>>excludeEnd("ctx");
  867. }));
  868. return self;
  869. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  870. }, function($ctx1) {$ctx1.fill(self,"visitIRInlinedClosure:",{anIRInlinedClosure:anIRInlinedClosure},$globals.IRInliningJSTranslator)});
  871. //>>excludeEnd("ctx");
  872. },
  873. //>>excludeStart("ide", pragmas.excludeIdeData);
  874. args: ["anIRInlinedClosure"],
  875. source: "visitIRInlinedClosure: anIRInlinedClosure\x0a\x09self stream nextPutVars: (anIRInlinedClosure tempDeclarations collect: [ :each |\x0a\x09\x09each name asVariableName ]).\x0a\x09anIRInlinedClosure instructions do: [ :each |\x0a\x09\x09self visit: each ]",
  876. referencedClasses: [],
  877. //>>excludeEnd("ide");
  878. messageSends: ["nextPutVars:", "stream", "collect:", "tempDeclarations", "asVariableName", "name", "do:", "instructions", "visit:"]
  879. }),
  880. $globals.IRInliningJSTranslator);
  881. $core.addMethod(
  882. $core.method({
  883. selector: "visitIRInlinedIfFalse:",
  884. protocol: 'visiting',
  885. fn: function (anIRInlinedIfFalse){
  886. var self=this;
  887. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  888. return $core.withContext(function($ctx1) {
  889. //>>excludeEnd("ctx");
  890. var $1,$2,$4,$3;
  891. $1=self._stream();
  892. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  893. $ctx1.sendIdx["stream"]=1;
  894. //>>excludeEnd("ctx");
  895. $recv($1)._nextPutIf_then_((function(){
  896. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  897. return $core.withContext(function($ctx2) {
  898. //>>excludeEnd("ctx");
  899. $2=self._stream();
  900. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  901. $ctx2.sendIdx["stream"]=2;
  902. //>>excludeEnd("ctx");
  903. $recv($2)._nextPutAll_("!$core.assert(");
  904. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  905. $ctx2.sendIdx["nextPutAll:"]=1;
  906. //>>excludeEnd("ctx");
  907. $4=$recv(anIRInlinedIfFalse)._instructions();
  908. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  909. $ctx2.sendIdx["instructions"]=1;
  910. //>>excludeEnd("ctx");
  911. $3=$recv($4)._first();
  912. self._visit_($3);
  913. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  914. $ctx2.sendIdx["visit:"]=1;
  915. //>>excludeEnd("ctx");
  916. return $recv(self._stream())._nextPutAll_(")");
  917. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  918. }, function($ctx2) {$ctx2.fillBlock({},$ctx1,1)});
  919. //>>excludeEnd("ctx");
  920. }),(function(){
  921. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  922. return $core.withContext(function($ctx2) {
  923. //>>excludeEnd("ctx");
  924. return self._visit_($recv($recv(anIRInlinedIfFalse)._instructions())._last());
  925. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  926. }, function($ctx2) {$ctx2.fillBlock({},$ctx1,2)});
  927. //>>excludeEnd("ctx");
  928. }));
  929. return self;
  930. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  931. }, function($ctx1) {$ctx1.fill(self,"visitIRInlinedIfFalse:",{anIRInlinedIfFalse:anIRInlinedIfFalse},$globals.IRInliningJSTranslator)});
  932. //>>excludeEnd("ctx");
  933. },
  934. //>>excludeStart("ide", pragmas.excludeIdeData);
  935. args: ["anIRInlinedIfFalse"],
  936. source: "visitIRInlinedIfFalse: anIRInlinedIfFalse\x0a\x09self stream nextPutIf: [\x0a\x09\x09self stream nextPutAll: '!$core.assert('.\x0a\x09\x09self visit: anIRInlinedIfFalse instructions first.\x0a\x09\x09self stream nextPutAll: ')' ]\x0a\x09\x09then: [ self visit: anIRInlinedIfFalse instructions last ]",
  937. referencedClasses: [],
  938. //>>excludeEnd("ide");
  939. messageSends: ["nextPutIf:then:", "stream", "nextPutAll:", "visit:", "first", "instructions", "last"]
  940. }),
  941. $globals.IRInliningJSTranslator);
  942. $core.addMethod(
  943. $core.method({
  944. selector: "visitIRInlinedIfNilIfNotNil:",
  945. protocol: 'visiting',
  946. fn: function (anIRInlinedIfNilIfNotNil){
  947. var self=this;
  948. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  949. return $core.withContext(function($ctx1) {
  950. //>>excludeEnd("ctx");
  951. var $1,$2,$4,$3,$6,$5,$7,$8,$10,$9;
  952. $1=self._stream();
  953. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  954. $ctx1.sendIdx["stream"]=1;
  955. //>>excludeEnd("ctx");
  956. $recv($1)._nextPutIf_then_else_((function(){
  957. var recvVarName;
  958. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  959. return $core.withContext(function($ctx2) {
  960. //>>excludeEnd("ctx");
  961. recvVarName=$recv(anIRInlinedIfNilIfNotNil)._receiverInternalVariableName();
  962. recvVarName;
  963. $2=self._stream();
  964. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  965. $ctx2.sendIdx["stream"]=2;
  966. //>>excludeEnd("ctx");
  967. $4="(".__comma(recvVarName);
  968. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  969. $ctx2.sendIdx[","]=2;
  970. //>>excludeEnd("ctx");
  971. $3=$recv($4).__comma(" = ");
  972. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  973. $ctx2.sendIdx[","]=1;
  974. //>>excludeEnd("ctx");
  975. $recv($2)._nextPutAll_($3);
  976. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  977. $ctx2.sendIdx["nextPutAll:"]=1;
  978. //>>excludeEnd("ctx");
  979. $6=$recv(anIRInlinedIfNilIfNotNil)._instructions();
  980. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  981. $ctx2.sendIdx["instructions"]=1;
  982. //>>excludeEnd("ctx");
  983. $5=$recv($6)._first();
  984. self._visit_($5);
  985. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  986. $ctx2.sendIdx["visit:"]=1;
  987. //>>excludeEnd("ctx");
  988. $7=self._stream();
  989. $8=$recv(") == null || ".__comma(recvVarName)).__comma(".isNil");
  990. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  991. $ctx2.sendIdx[","]=3;
  992. //>>excludeEnd("ctx");
  993. return $recv($7)._nextPutAll_($8);
  994. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  995. }, function($ctx2) {$ctx2.fillBlock({recvVarName:recvVarName},$ctx1,1)});
  996. //>>excludeEnd("ctx");
  997. }),(function(){
  998. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  999. return $core.withContext(function($ctx2) {
  1000. //>>excludeEnd("ctx");
  1001. $10=$recv(anIRInlinedIfNilIfNotNil)._instructions();
  1002. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1003. $ctx2.sendIdx["instructions"]=2;
  1004. //>>excludeEnd("ctx");
  1005. $9=$recv($10)._second();
  1006. return self._visit_($9);
  1007. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1008. $ctx2.sendIdx["visit:"]=2;
  1009. //>>excludeEnd("ctx");
  1010. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1011. }, function($ctx2) {$ctx2.fillBlock({},$ctx1,2)});
  1012. //>>excludeEnd("ctx");
  1013. }),(function(){
  1014. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1015. return $core.withContext(function($ctx2) {
  1016. //>>excludeEnd("ctx");
  1017. return self._visit_($recv($recv(anIRInlinedIfNilIfNotNil)._instructions())._third());
  1018. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1019. }, function($ctx2) {$ctx2.fillBlock({},$ctx1,3)});
  1020. //>>excludeEnd("ctx");
  1021. }));
  1022. return self;
  1023. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1024. }, function($ctx1) {$ctx1.fill(self,"visitIRInlinedIfNilIfNotNil:",{anIRInlinedIfNilIfNotNil:anIRInlinedIfNilIfNotNil},$globals.IRInliningJSTranslator)});
  1025. //>>excludeEnd("ctx");
  1026. },
  1027. //>>excludeStart("ide", pragmas.excludeIdeData);
  1028. args: ["anIRInlinedIfNilIfNotNil"],
  1029. source: "visitIRInlinedIfNilIfNotNil: anIRInlinedIfNilIfNotNil\x0a\x09self stream\x0a\x09\x09nextPutIf: [\x0a\x09\x09\x09| recvVarName |\x0a\x09\x09\x09recvVarName := anIRInlinedIfNilIfNotNil receiverInternalVariableName.\x0a\x09\x09\x09self stream nextPutAll: '(', recvVarName, ' = '.\x0a\x09\x09\x09self visit: anIRInlinedIfNilIfNotNil instructions first.\x0a\x09\x09\x09self stream nextPutAll: ') == null || ', recvVarName, '.isNil' ]\x0a\x09\x09then: [ self visit: anIRInlinedIfNilIfNotNil instructions second ]\x0a\x09\x09else: [ self visit: anIRInlinedIfNilIfNotNil instructions third ]",
  1030. referencedClasses: [],
  1031. //>>excludeEnd("ide");
  1032. messageSends: ["nextPutIf:then:else:", "stream", "receiverInternalVariableName", "nextPutAll:", ",", "visit:", "first", "instructions", "second", "third"]
  1033. }),
  1034. $globals.IRInliningJSTranslator);
  1035. $core.addMethod(
  1036. $core.method({
  1037. selector: "visitIRInlinedIfTrue:",
  1038. protocol: 'visiting',
  1039. fn: function (anIRInlinedIfTrue){
  1040. var self=this;
  1041. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1042. return $core.withContext(function($ctx1) {
  1043. //>>excludeEnd("ctx");
  1044. var $1,$2,$4,$3;
  1045. $1=self._stream();
  1046. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1047. $ctx1.sendIdx["stream"]=1;
  1048. //>>excludeEnd("ctx");
  1049. $recv($1)._nextPutIf_then_((function(){
  1050. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1051. return $core.withContext(function($ctx2) {
  1052. //>>excludeEnd("ctx");
  1053. $2=self._stream();
  1054. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1055. $ctx2.sendIdx["stream"]=2;
  1056. //>>excludeEnd("ctx");
  1057. $recv($2)._nextPutAll_("$core.assert(");
  1058. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1059. $ctx2.sendIdx["nextPutAll:"]=1;
  1060. //>>excludeEnd("ctx");
  1061. $4=$recv(anIRInlinedIfTrue)._instructions();
  1062. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1063. $ctx2.sendIdx["instructions"]=1;
  1064. //>>excludeEnd("ctx");
  1065. $3=$recv($4)._first();
  1066. self._visit_($3);
  1067. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1068. $ctx2.sendIdx["visit:"]=1;
  1069. //>>excludeEnd("ctx");
  1070. return $recv(self._stream())._nextPutAll_(")");
  1071. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1072. }, function($ctx2) {$ctx2.fillBlock({},$ctx1,1)});
  1073. //>>excludeEnd("ctx");
  1074. }),(function(){
  1075. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1076. return $core.withContext(function($ctx2) {
  1077. //>>excludeEnd("ctx");
  1078. return self._visit_($recv($recv(anIRInlinedIfTrue)._instructions())._last());
  1079. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1080. }, function($ctx2) {$ctx2.fillBlock({},$ctx1,2)});
  1081. //>>excludeEnd("ctx");
  1082. }));
  1083. return self;
  1084. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1085. }, function($ctx1) {$ctx1.fill(self,"visitIRInlinedIfTrue:",{anIRInlinedIfTrue:anIRInlinedIfTrue},$globals.IRInliningJSTranslator)});
  1086. //>>excludeEnd("ctx");
  1087. },
  1088. //>>excludeStart("ide", pragmas.excludeIdeData);
  1089. args: ["anIRInlinedIfTrue"],
  1090. source: "visitIRInlinedIfTrue: anIRInlinedIfTrue\x0a\x09self stream nextPutIf: [\x0a\x09\x09self stream nextPutAll: '$core.assert('.\x0a\x09\x09self visit: anIRInlinedIfTrue instructions first.\x0a\x09\x09self stream nextPutAll: ')' ]\x0a\x09\x09then: [ self visit: anIRInlinedIfTrue instructions last ]",
  1091. referencedClasses: [],
  1092. //>>excludeEnd("ide");
  1093. messageSends: ["nextPutIf:then:", "stream", "nextPutAll:", "visit:", "first", "instructions", "last"]
  1094. }),
  1095. $globals.IRInliningJSTranslator);
  1096. $core.addMethod(
  1097. $core.method({
  1098. selector: "visitIRInlinedIfTrueIfFalse:",
  1099. protocol: 'visiting',
  1100. fn: function (anIRInlinedIfTrueIfFalse){
  1101. var self=this;
  1102. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1103. return $core.withContext(function($ctx1) {
  1104. //>>excludeEnd("ctx");
  1105. var $1,$2,$4,$3,$6,$5;
  1106. $1=self._stream();
  1107. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1108. $ctx1.sendIdx["stream"]=1;
  1109. //>>excludeEnd("ctx");
  1110. $recv($1)._nextPutIf_then_else_((function(){
  1111. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1112. return $core.withContext(function($ctx2) {
  1113. //>>excludeEnd("ctx");
  1114. $2=self._stream();
  1115. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1116. $ctx2.sendIdx["stream"]=2;
  1117. //>>excludeEnd("ctx");
  1118. $recv($2)._nextPutAll_("$core.assert(");
  1119. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1120. $ctx2.sendIdx["nextPutAll:"]=1;
  1121. //>>excludeEnd("ctx");
  1122. $4=$recv(anIRInlinedIfTrueIfFalse)._instructions();
  1123. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1124. $ctx2.sendIdx["instructions"]=1;
  1125. //>>excludeEnd("ctx");
  1126. $3=$recv($4)._first();
  1127. self._visit_($3);
  1128. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1129. $ctx2.sendIdx["visit:"]=1;
  1130. //>>excludeEnd("ctx");
  1131. return $recv(self._stream())._nextPutAll_(")");
  1132. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1133. }, function($ctx2) {$ctx2.fillBlock({},$ctx1,1)});
  1134. //>>excludeEnd("ctx");
  1135. }),(function(){
  1136. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1137. return $core.withContext(function($ctx2) {
  1138. //>>excludeEnd("ctx");
  1139. $6=$recv(anIRInlinedIfTrueIfFalse)._instructions();
  1140. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1141. $ctx2.sendIdx["instructions"]=2;
  1142. //>>excludeEnd("ctx");
  1143. $5=$recv($6)._second();
  1144. return self._visit_($5);
  1145. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1146. $ctx2.sendIdx["visit:"]=2;
  1147. //>>excludeEnd("ctx");
  1148. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1149. }, function($ctx2) {$ctx2.fillBlock({},$ctx1,2)});
  1150. //>>excludeEnd("ctx");
  1151. }),(function(){
  1152. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1153. return $core.withContext(function($ctx2) {
  1154. //>>excludeEnd("ctx");
  1155. return self._visit_($recv($recv(anIRInlinedIfTrueIfFalse)._instructions())._third());
  1156. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1157. }, function($ctx2) {$ctx2.fillBlock({},$ctx1,3)});
  1158. //>>excludeEnd("ctx");
  1159. }));
  1160. return self;
  1161. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1162. }, function($ctx1) {$ctx1.fill(self,"visitIRInlinedIfTrueIfFalse:",{anIRInlinedIfTrueIfFalse:anIRInlinedIfTrueIfFalse},$globals.IRInliningJSTranslator)});
  1163. //>>excludeEnd("ctx");
  1164. },
  1165. //>>excludeStart("ide", pragmas.excludeIdeData);
  1166. args: ["anIRInlinedIfTrueIfFalse"],
  1167. source: "visitIRInlinedIfTrueIfFalse: anIRInlinedIfTrueIfFalse\x0a\x09self stream\x0a\x09\x09nextPutIf: [\x0a\x09\x09\x09self stream nextPutAll: '$core.assert('.\x0a\x09\x09\x09self visit: anIRInlinedIfTrueIfFalse instructions first.\x0a\x09\x09\x09self stream nextPutAll: ')' ]\x0a\x09\x09then: [ self visit: anIRInlinedIfTrueIfFalse instructions second ]\x0a\x09\x09else: [ self visit: anIRInlinedIfTrueIfFalse instructions third ]",
  1168. referencedClasses: [],
  1169. //>>excludeEnd("ide");
  1170. messageSends: ["nextPutIf:then:else:", "stream", "nextPutAll:", "visit:", "first", "instructions", "second", "third"]
  1171. }),
  1172. $globals.IRInliningJSTranslator);
  1173. $core.addMethod(
  1174. $core.method({
  1175. selector: "visitIRInlinedNonLocalReturn:",
  1176. protocol: 'visiting',
  1177. fn: function (anIRInlinedReturn){
  1178. var self=this;
  1179. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1180. return $core.withContext(function($ctx1) {
  1181. //>>excludeEnd("ctx");
  1182. var $1;
  1183. $1=self._stream();
  1184. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1185. $ctx1.sendIdx["stream"]=1;
  1186. //>>excludeEnd("ctx");
  1187. $recv($1)._nextPutStatementWith_((function(){
  1188. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1189. return $core.withContext(function($ctx2) {
  1190. //>>excludeEnd("ctx");
  1191. return self._visit_($recv($recv(anIRInlinedReturn)._instructions())._last());
  1192. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1193. }, function($ctx2) {$ctx2.fillBlock({},$ctx1,1)});
  1194. //>>excludeEnd("ctx");
  1195. }));
  1196. $recv(self._stream())._nextPutNonLocalReturnWith_((function(){
  1197. }));
  1198. return self;
  1199. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1200. }, function($ctx1) {$ctx1.fill(self,"visitIRInlinedNonLocalReturn:",{anIRInlinedReturn:anIRInlinedReturn},$globals.IRInliningJSTranslator)});
  1201. //>>excludeEnd("ctx");
  1202. },
  1203. //>>excludeStart("ide", pragmas.excludeIdeData);
  1204. args: ["anIRInlinedReturn"],
  1205. source: "visitIRInlinedNonLocalReturn: anIRInlinedReturn\x0a\x09self stream nextPutStatementWith: [\x0a\x09\x09self visit: anIRInlinedReturn instructions last ].\x0a\x09self stream nextPutNonLocalReturnWith: [ ]",
  1206. referencedClasses: [],
  1207. //>>excludeEnd("ide");
  1208. messageSends: ["nextPutStatementWith:", "stream", "visit:", "last", "instructions", "nextPutNonLocalReturnWith:"]
  1209. }),
  1210. $globals.IRInliningJSTranslator);
  1211. $core.addMethod(
  1212. $core.method({
  1213. selector: "visitIRInlinedReturn:",
  1214. protocol: 'visiting',
  1215. fn: function (anIRInlinedReturn){
  1216. var self=this;
  1217. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1218. return $core.withContext(function($ctx1) {
  1219. //>>excludeEnd("ctx");
  1220. self._visit_($recv($recv(anIRInlinedReturn)._instructions())._last());
  1221. return self;
  1222. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1223. }, function($ctx1) {$ctx1.fill(self,"visitIRInlinedReturn:",{anIRInlinedReturn:anIRInlinedReturn},$globals.IRInliningJSTranslator)});
  1224. //>>excludeEnd("ctx");
  1225. },
  1226. //>>excludeStart("ide", pragmas.excludeIdeData);
  1227. args: ["anIRInlinedReturn"],
  1228. source: "visitIRInlinedReturn: anIRInlinedReturn\x0a\x09self visit: anIRInlinedReturn instructions last",
  1229. referencedClasses: [],
  1230. //>>excludeEnd("ide");
  1231. messageSends: ["visit:", "last", "instructions"]
  1232. }),
  1233. $globals.IRInliningJSTranslator);
  1234. $core.addMethod(
  1235. $core.method({
  1236. selector: "visitIRInlinedSequence:",
  1237. protocol: 'visiting',
  1238. fn: function (anIRInlinedSequence){
  1239. var self=this;
  1240. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1241. return $core.withContext(function($ctx1) {
  1242. //>>excludeEnd("ctx");
  1243. $recv($recv(anIRInlinedSequence)._instructions())._do_((function(each){
  1244. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1245. return $core.withContext(function($ctx2) {
  1246. //>>excludeEnd("ctx");
  1247. return $recv(self._stream())._nextPutStatementWith_((function(){
  1248. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1249. return $core.withContext(function($ctx3) {
  1250. //>>excludeEnd("ctx");
  1251. return self._visit_(each);
  1252. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1253. }, function($ctx3) {$ctx3.fillBlock({},$ctx2,2)});
  1254. //>>excludeEnd("ctx");
  1255. }));
  1256. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1257. }, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1,1)});
  1258. //>>excludeEnd("ctx");
  1259. }));
  1260. return self;
  1261. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1262. }, function($ctx1) {$ctx1.fill(self,"visitIRInlinedSequence:",{anIRInlinedSequence:anIRInlinedSequence},$globals.IRInliningJSTranslator)});
  1263. //>>excludeEnd("ctx");
  1264. },
  1265. //>>excludeStart("ide", pragmas.excludeIdeData);
  1266. args: ["anIRInlinedSequence"],
  1267. source: "visitIRInlinedSequence: anIRInlinedSequence\x0a\x09anIRInlinedSequence instructions do: [ :each |\x0a\x09\x09self stream nextPutStatementWith: [ self visit: each ]]",
  1268. referencedClasses: [],
  1269. //>>excludeEnd("ide");
  1270. messageSends: ["do:", "instructions", "nextPutStatementWith:", "stream", "visit:"]
  1271. }),
  1272. $globals.IRInliningJSTranslator);
  1273. $core.addClass('IRSendInliner', $globals.Object, ['send', 'translator'], 'Compiler-Inlining');
  1274. //>>excludeStart("ide", pragmas.excludeIdeData);
  1275. $globals.IRSendInliner.comment="I inline some message sends and block closure arguments. I heavily rely on #perform: to dispatch inlining methods.";
  1276. //>>excludeEnd("ide");
  1277. $core.addMethod(
  1278. $core.method({
  1279. selector: "ifFalse:",
  1280. protocol: 'inlining',
  1281. fn: function (anIRInstruction){
  1282. var self=this;
  1283. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1284. return $core.withContext(function($ctx1) {
  1285. //>>excludeEnd("ctx");
  1286. return self._inlinedSend_withBlock_($recv($globals.IRInlinedIfFalse)._new(),anIRInstruction);
  1287. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1288. }, function($ctx1) {$ctx1.fill(self,"ifFalse:",{anIRInstruction:anIRInstruction},$globals.IRSendInliner)});
  1289. //>>excludeEnd("ctx");
  1290. },
  1291. //>>excludeStart("ide", pragmas.excludeIdeData);
  1292. args: ["anIRInstruction"],
  1293. source: "ifFalse: anIRInstruction\x0a\x09^ self inlinedSend: IRInlinedIfFalse new withBlock: anIRInstruction",
  1294. referencedClasses: ["IRInlinedIfFalse"],
  1295. //>>excludeEnd("ide");
  1296. messageSends: ["inlinedSend:withBlock:", "new"]
  1297. }),
  1298. $globals.IRSendInliner);
  1299. $core.addMethod(
  1300. $core.method({
  1301. selector: "ifFalse:ifTrue:",
  1302. protocol: 'inlining',
  1303. fn: function (anIRInstruction,anotherIRInstruction){
  1304. var self=this;
  1305. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1306. return $core.withContext(function($ctx1) {
  1307. //>>excludeEnd("ctx");
  1308. return self._perform_withArguments_("ifTrue:ifFalse:",[anotherIRInstruction,anIRInstruction]);
  1309. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1310. }, function($ctx1) {$ctx1.fill(self,"ifFalse:ifTrue:",{anIRInstruction:anIRInstruction,anotherIRInstruction:anotherIRInstruction},$globals.IRSendInliner)});
  1311. //>>excludeEnd("ctx");
  1312. },
  1313. //>>excludeStart("ide", pragmas.excludeIdeData);
  1314. args: ["anIRInstruction", "anotherIRInstruction"],
  1315. source: "ifFalse: anIRInstruction ifTrue: anotherIRInstruction\x0a\x09^ self perform: #ifTrue:ifFalse: withArguments: { anotherIRInstruction. anIRInstruction }",
  1316. referencedClasses: [],
  1317. //>>excludeEnd("ide");
  1318. messageSends: ["perform:withArguments:"]
  1319. }),
  1320. $globals.IRSendInliner);
  1321. $core.addMethod(
  1322. $core.method({
  1323. selector: "ifNil:",
  1324. protocol: 'inlining',
  1325. fn: function (anIRInstruction){
  1326. var self=this;
  1327. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1328. return $core.withContext(function($ctx1) {
  1329. //>>excludeEnd("ctx");
  1330. var $1,$3,$5,$6,$4,$2;
  1331. $1=$recv($globals.IRInlinedIfNilIfNotNil)._new();
  1332. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1333. $ctx1.sendIdx["new"]=1;
  1334. //>>excludeEnd("ctx");
  1335. $3=$recv($globals.IRClosure)._new();
  1336. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1337. $ctx1.sendIdx["new"]=2;
  1338. //>>excludeEnd("ctx");
  1339. $recv($3)._scope_($recv($recv(anIRInstruction)._scope())._copy());
  1340. $5=$recv($globals.IRBlockSequence)._new();
  1341. $recv($5)._add_($recv($recv(self._send())._instructions())._first());
  1342. $6=$recv($5)._yourself();
  1343. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1344. $ctx1.sendIdx["yourself"]=1;
  1345. //>>excludeEnd("ctx");
  1346. $4=$6;
  1347. $recv($3)._add_($4);
  1348. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1349. $ctx1.sendIdx["add:"]=1;
  1350. //>>excludeEnd("ctx");
  1351. $2=$recv($3)._yourself();
  1352. return self._inlinedSend_withBlock_withBlock_($1,anIRInstruction,$2);
  1353. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1354. }, function($ctx1) {$ctx1.fill(self,"ifNil:",{anIRInstruction:anIRInstruction},$globals.IRSendInliner)});
  1355. //>>excludeEnd("ctx");
  1356. },
  1357. //>>excludeStart("ide", pragmas.excludeIdeData);
  1358. args: ["anIRInstruction"],
  1359. source: "ifNil: anIRInstruction\x0a\x09^ self\x0a\x09\x09inlinedSend: IRInlinedIfNilIfNotNil new\x0a\x09\x09withBlock: anIRInstruction\x0a\x09\x09withBlock: (IRClosure new\x0a\x09\x09\x09scope: anIRInstruction scope copy;\x0a\x09\x09\x09add: (IRBlockSequence new\x0a\x09\x09\x09\x09add: self send instructions first;\x0a\x09\x09\x09\x09yourself);\x0a\x09\x09\x09yourself)",
  1360. referencedClasses: ["IRInlinedIfNilIfNotNil", "IRClosure", "IRBlockSequence"],
  1361. //>>excludeEnd("ide");
  1362. messageSends: ["inlinedSend:withBlock:withBlock:", "new", "scope:", "copy", "scope", "add:", "first", "instructions", "send", "yourself"]
  1363. }),
  1364. $globals.IRSendInliner);
  1365. $core.addMethod(
  1366. $core.method({
  1367. selector: "ifNil:ifNotNil:",
  1368. protocol: 'inlining',
  1369. fn: function (anIRInstruction,anotherIRInstruction){
  1370. var self=this;
  1371. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1372. return $core.withContext(function($ctx1) {
  1373. //>>excludeEnd("ctx");
  1374. return self._inlinedSend_withBlock_withBlock_($recv($globals.IRInlinedIfNilIfNotNil)._new(),anIRInstruction,anotherIRInstruction);
  1375. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1376. }, function($ctx1) {$ctx1.fill(self,"ifNil:ifNotNil:",{anIRInstruction:anIRInstruction,anotherIRInstruction:anotherIRInstruction},$globals.IRSendInliner)});
  1377. //>>excludeEnd("ctx");
  1378. },
  1379. //>>excludeStart("ide", pragmas.excludeIdeData);
  1380. args: ["anIRInstruction", "anotherIRInstruction"],
  1381. source: "ifNil: anIRInstruction ifNotNil: anotherIRInstruction\x0a\x09^ self inlinedSend: IRInlinedIfNilIfNotNil new withBlock: anIRInstruction withBlock: anotherIRInstruction",
  1382. referencedClasses: ["IRInlinedIfNilIfNotNil"],
  1383. //>>excludeEnd("ide");
  1384. messageSends: ["inlinedSend:withBlock:withBlock:", "new"]
  1385. }),
  1386. $globals.IRSendInliner);
  1387. $core.addMethod(
  1388. $core.method({
  1389. selector: "ifNotNil:",
  1390. protocol: 'inlining',
  1391. fn: function (anIRInstruction){
  1392. var self=this;
  1393. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1394. return $core.withContext(function($ctx1) {
  1395. //>>excludeEnd("ctx");
  1396. var $1,$3,$5,$6,$4,$2;
  1397. $1=$recv($globals.IRInlinedIfNilIfNotNil)._new();
  1398. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1399. $ctx1.sendIdx["new"]=1;
  1400. //>>excludeEnd("ctx");
  1401. $3=$recv($globals.IRClosure)._new();
  1402. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1403. $ctx1.sendIdx["new"]=2;
  1404. //>>excludeEnd("ctx");
  1405. $recv($3)._scope_($recv($recv(anIRInstruction)._scope())._copy());
  1406. $5=$recv($globals.IRBlockSequence)._new();
  1407. $recv($5)._add_($recv($recv(self._send())._instructions())._first());
  1408. $6=$recv($5)._yourself();
  1409. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1410. $ctx1.sendIdx["yourself"]=1;
  1411. //>>excludeEnd("ctx");
  1412. $4=$6;
  1413. $recv($3)._add_($4);
  1414. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1415. $ctx1.sendIdx["add:"]=1;
  1416. //>>excludeEnd("ctx");
  1417. $2=$recv($3)._yourself();
  1418. return self._inlinedSend_withBlock_withBlock_($1,$2,anIRInstruction);
  1419. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1420. }, function($ctx1) {$ctx1.fill(self,"ifNotNil:",{anIRInstruction:anIRInstruction},$globals.IRSendInliner)});
  1421. //>>excludeEnd("ctx");
  1422. },
  1423. //>>excludeStart("ide", pragmas.excludeIdeData);
  1424. args: ["anIRInstruction"],
  1425. source: "ifNotNil: anIRInstruction\x0a\x09^ self\x0a\x09\x09inlinedSend: IRInlinedIfNilIfNotNil new\x0a\x09\x09withBlock: (IRClosure new\x0a\x09\x09\x09scope: anIRInstruction scope copy;\x0a\x09\x09\x09add: (IRBlockSequence new\x0a\x09\x09\x09\x09add: self send instructions first;\x0a\x09\x09\x09\x09yourself);\x0a\x09\x09\x09yourself)\x0a\x09\x09withBlock: anIRInstruction",
  1426. referencedClasses: ["IRInlinedIfNilIfNotNil", "IRClosure", "IRBlockSequence"],
  1427. //>>excludeEnd("ide");
  1428. messageSends: ["inlinedSend:withBlock:withBlock:", "new", "scope:", "copy", "scope", "add:", "first", "instructions", "send", "yourself"]
  1429. }),
  1430. $globals.IRSendInliner);
  1431. $core.addMethod(
  1432. $core.method({
  1433. selector: "ifNotNil:ifNil:",
  1434. protocol: 'inlining',
  1435. fn: function (anIRInstruction,anotherIRInstruction){
  1436. var self=this;
  1437. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1438. return $core.withContext(function($ctx1) {
  1439. //>>excludeEnd("ctx");
  1440. return self._inlinedSend_withBlock_withBlock_($recv($globals.IRInlinedIfNilIfNotNil)._new(),anotherIRInstruction,anIRInstruction);
  1441. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1442. }, function($ctx1) {$ctx1.fill(self,"ifNotNil:ifNil:",{anIRInstruction:anIRInstruction,anotherIRInstruction:anotherIRInstruction},$globals.IRSendInliner)});
  1443. //>>excludeEnd("ctx");
  1444. },
  1445. //>>excludeStart("ide", pragmas.excludeIdeData);
  1446. args: ["anIRInstruction", "anotherIRInstruction"],
  1447. source: "ifNotNil: anIRInstruction ifNil: anotherIRInstruction\x0a\x09^ self inlinedSend: IRInlinedIfNilIfNotNil new withBlock: anotherIRInstruction withBlock: anIRInstruction",
  1448. referencedClasses: ["IRInlinedIfNilIfNotNil"],
  1449. //>>excludeEnd("ide");
  1450. messageSends: ["inlinedSend:withBlock:withBlock:", "new"]
  1451. }),
  1452. $globals.IRSendInliner);
  1453. $core.addMethod(
  1454. $core.method({
  1455. selector: "ifTrue:",
  1456. protocol: 'inlining',
  1457. fn: function (anIRInstruction){
  1458. var self=this;
  1459. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1460. return $core.withContext(function($ctx1) {
  1461. //>>excludeEnd("ctx");
  1462. return self._inlinedSend_withBlock_($recv($globals.IRInlinedIfTrue)._new(),anIRInstruction);
  1463. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1464. }, function($ctx1) {$ctx1.fill(self,"ifTrue:",{anIRInstruction:anIRInstruction},$globals.IRSendInliner)});
  1465. //>>excludeEnd("ctx");
  1466. },
  1467. //>>excludeStart("ide", pragmas.excludeIdeData);
  1468. args: ["anIRInstruction"],
  1469. source: "ifTrue: anIRInstruction\x0a\x09^ self inlinedSend: IRInlinedIfTrue new withBlock: anIRInstruction",
  1470. referencedClasses: ["IRInlinedIfTrue"],
  1471. //>>excludeEnd("ide");
  1472. messageSends: ["inlinedSend:withBlock:", "new"]
  1473. }),
  1474. $globals.IRSendInliner);
  1475. $core.addMethod(
  1476. $core.method({
  1477. selector: "ifTrue:ifFalse:",
  1478. protocol: 'inlining',
  1479. fn: function (anIRInstruction,anotherIRInstruction){
  1480. var self=this;
  1481. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1482. return $core.withContext(function($ctx1) {
  1483. //>>excludeEnd("ctx");
  1484. return self._inlinedSend_withBlock_withBlock_($recv($globals.IRInlinedIfTrueIfFalse)._new(),anIRInstruction,anotherIRInstruction);
  1485. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1486. }, function($ctx1) {$ctx1.fill(self,"ifTrue:ifFalse:",{anIRInstruction:anIRInstruction,anotherIRInstruction:anotherIRInstruction},$globals.IRSendInliner)});
  1487. //>>excludeEnd("ctx");
  1488. },
  1489. //>>excludeStart("ide", pragmas.excludeIdeData);
  1490. args: ["anIRInstruction", "anotherIRInstruction"],
  1491. source: "ifTrue: anIRInstruction ifFalse: anotherIRInstruction\x0a\x09^ self inlinedSend: IRInlinedIfTrueIfFalse new withBlock: anIRInstruction withBlock: anotherIRInstruction",
  1492. referencedClasses: ["IRInlinedIfTrueIfFalse"],
  1493. //>>excludeEnd("ide");
  1494. messageSends: ["inlinedSend:withBlock:withBlock:", "new"]
  1495. }),
  1496. $globals.IRSendInliner);
  1497. $core.addMethod(
  1498. $core.method({
  1499. selector: "inlineClosure:",
  1500. protocol: 'inlining',
  1501. fn: function (anIRClosure){
  1502. var self=this;
  1503. var inlinedClosure,sequence,statements;
  1504. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1505. return $core.withContext(function($ctx1) {
  1506. //>>excludeEnd("ctx");
  1507. var $1,$2,$3,$5,$6,$4,$7,$9,$11,$13,$14,$15,$12,$10,$17,$19,$20,$18,$16,$8,$22,$21,$25,$24,$26,$23,$27,$30,$29,$28;
  1508. inlinedClosure=self._inlinedClosure();
  1509. $1=inlinedClosure;
  1510. $2=$recv(anIRClosure)._scope();
  1511. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1512. $ctx1.sendIdx["scope"]=1;
  1513. //>>excludeEnd("ctx");
  1514. $recv($1)._scope_($2);
  1515. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1516. $ctx1.sendIdx["scope:"]=1;
  1517. //>>excludeEnd("ctx");
  1518. $recv($1)._parent_($recv(anIRClosure)._parent());
  1519. $recv($recv(anIRClosure)._tempDeclarations())._do_((function(each){
  1520. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1521. return $core.withContext(function($ctx2) {
  1522. //>>excludeEnd("ctx");
  1523. return $recv(inlinedClosure)._add_(each);
  1524. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1525. $ctx2.sendIdx["add:"]=1;
  1526. //>>excludeEnd("ctx");
  1527. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1528. }, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1,1)});
  1529. //>>excludeEnd("ctx");
  1530. }));
  1531. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1532. $ctx1.sendIdx["do:"]=1;
  1533. //>>excludeEnd("ctx");
  1534. sequence=self._inlinedSequence();
  1535. $recv($recv(anIRClosure)._arguments())._do_((function(each){
  1536. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1537. return $core.withContext(function($ctx2) {
  1538. //>>excludeEnd("ctx");
  1539. $3=inlinedClosure;
  1540. $5=$recv($globals.IRTempDeclaration)._new();
  1541. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1542. $ctx2.sendIdx["new"]=1;
  1543. //>>excludeEnd("ctx");
  1544. $recv($5)._name_(each);
  1545. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1546. $ctx2.sendIdx["name:"]=1;
  1547. //>>excludeEnd("ctx");
  1548. $6=$recv($5)._yourself();
  1549. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1550. $ctx2.sendIdx["yourself"]=1;
  1551. //>>excludeEnd("ctx");
  1552. $4=$6;
  1553. $recv($3)._add_($4);
  1554. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1555. $ctx2.sendIdx["add:"]=2;
  1556. //>>excludeEnd("ctx");
  1557. $7=sequence;
  1558. $9=$recv($globals.IRAssignment)._new();
  1559. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1560. $ctx2.sendIdx["new"]=2;
  1561. //>>excludeEnd("ctx");
  1562. $11=$recv($globals.IRVariable)._new();
  1563. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1564. $ctx2.sendIdx["new"]=3;
  1565. //>>excludeEnd("ctx");
  1566. $13=$recv($globals.AliasVar)._new();
  1567. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1568. $ctx2.sendIdx["new"]=4;
  1569. //>>excludeEnd("ctx");
  1570. $14=$recv(inlinedClosure)._scope();
  1571. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1572. $ctx2.sendIdx["scope"]=2;
  1573. //>>excludeEnd("ctx");
  1574. $recv($13)._scope_($14);
  1575. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1576. $ctx2.sendIdx["scope:"]=2;
  1577. //>>excludeEnd("ctx");
  1578. $recv($13)._name_(each);
  1579. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1580. $ctx2.sendIdx["name:"]=2;
  1581. //>>excludeEnd("ctx");
  1582. $15=$recv($13)._yourself();
  1583. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1584. $ctx2.sendIdx["yourself"]=2;
  1585. //>>excludeEnd("ctx");
  1586. $12=$15;
  1587. $10=$recv($11)._variable_($12);
  1588. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1589. $ctx2.sendIdx["variable:"]=1;
  1590. //>>excludeEnd("ctx");
  1591. $recv($9)._add_($10);
  1592. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1593. $ctx2.sendIdx["add:"]=4;
  1594. //>>excludeEnd("ctx");
  1595. $17=$recv($globals.IRVariable)._new();
  1596. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1597. $ctx2.sendIdx["new"]=5;
  1598. //>>excludeEnd("ctx");
  1599. $19=$recv($globals.AliasVar)._new();
  1600. $recv($19)._scope_($recv(inlinedClosure)._scope());
  1601. $recv($19)._name_("$receiver");
  1602. $20=$recv($19)._yourself();
  1603. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1604. $ctx2.sendIdx["yourself"]=3;
  1605. //>>excludeEnd("ctx");
  1606. $18=$20;
  1607. $16=$recv($17)._variable_($18);
  1608. $recv($9)._add_($16);
  1609. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1610. $ctx2.sendIdx["add:"]=5;
  1611. //>>excludeEnd("ctx");
  1612. $8=$recv($9)._yourself();
  1613. return $recv($7)._add_($8);
  1614. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1615. $ctx2.sendIdx["add:"]=3;
  1616. //>>excludeEnd("ctx");
  1617. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1618. }, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1,2)});
  1619. //>>excludeEnd("ctx");
  1620. }));
  1621. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1622. $ctx1.sendIdx["do:"]=2;
  1623. //>>excludeEnd("ctx");
  1624. $recv(inlinedClosure)._add_(sequence);
  1625. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1626. $ctx1.sendIdx["add:"]=6;
  1627. //>>excludeEnd("ctx");
  1628. $22=$recv(anIRClosure)._instructions();
  1629. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1630. $ctx1.sendIdx["instructions"]=2;
  1631. //>>excludeEnd("ctx");
  1632. $21=$recv($22)._last();
  1633. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1634. $ctx1.sendIdx["last"]=1;
  1635. //>>excludeEnd("ctx");
  1636. statements=$recv($21)._instructions();
  1637. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1638. $ctx1.sendIdx["instructions"]=1;
  1639. //>>excludeEnd("ctx");
  1640. $recv(statements)._ifNotEmpty_((function(){
  1641. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1642. return $core.withContext(function($ctx2) {
  1643. //>>excludeEnd("ctx");
  1644. $recv($recv(statements)._allButLast())._do_((function(each){
  1645. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1646. return $core.withContext(function($ctx3) {
  1647. //>>excludeEnd("ctx");
  1648. return $recv(sequence)._add_(each);
  1649. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1650. $ctx3.sendIdx["add:"]=7;
  1651. //>>excludeEnd("ctx");
  1652. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1653. }, function($ctx3) {$ctx3.fillBlock({each:each},$ctx2,4)});
  1654. //>>excludeEnd("ctx");
  1655. }));
  1656. $25=$recv(statements)._last();
  1657. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1658. $ctx2.sendIdx["last"]=2;
  1659. //>>excludeEnd("ctx");
  1660. $24=$recv($25)._isReturn();
  1661. $23=$recv($24)._and_((function(){
  1662. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1663. return $core.withContext(function($ctx3) {
  1664. //>>excludeEnd("ctx");
  1665. $26=$recv(statements)._last();
  1666. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1667. $ctx3.sendIdx["last"]=3;
  1668. //>>excludeEnd("ctx");
  1669. return $recv($26)._isBlockReturn();
  1670. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1671. }, function($ctx3) {$ctx3.fillBlock({},$ctx2,5)});
  1672. //>>excludeEnd("ctx");
  1673. }));
  1674. if($core.assert($23)){
  1675. $27=sequence;
  1676. $30=$recv(statements)._last();
  1677. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1678. $ctx2.sendIdx["last"]=4;
  1679. //>>excludeEnd("ctx");
  1680. $29=$recv($30)._instructions();
  1681. $28=$recv($29)._first();
  1682. return $recv($27)._add_($28);
  1683. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1684. $ctx2.sendIdx["add:"]=8;
  1685. //>>excludeEnd("ctx");
  1686. } else {
  1687. return $recv(sequence)._add_($recv(statements)._last());
  1688. };
  1689. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1690. }, function($ctx2) {$ctx2.fillBlock({},$ctx1,3)});
  1691. //>>excludeEnd("ctx");
  1692. }));
  1693. return inlinedClosure;
  1694. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1695. }, function($ctx1) {$ctx1.fill(self,"inlineClosure:",{anIRClosure:anIRClosure,inlinedClosure:inlinedClosure,sequence:sequence,statements:statements},$globals.IRSendInliner)});
  1696. //>>excludeEnd("ctx");
  1697. },
  1698. //>>excludeStart("ide", pragmas.excludeIdeData);
  1699. args: ["anIRClosure"],
  1700. source: "inlineClosure: anIRClosure\x0a\x09| inlinedClosure sequence statements |\x0a\x0a\x09inlinedClosure := self inlinedClosure.\x0a\x09inlinedClosure \x0a\x09\x09scope: anIRClosure scope;\x0a\x09\x09parent: anIRClosure parent.\x0a\x0a\x09\x22Add the possible temp declarations\x22\x0a\x09anIRClosure tempDeclarations do: [ :each |\x0a\x09\x09\x09inlinedClosure add: each ].\x0a\x0a\x09\x22Add a block sequence\x22\x0a\x09sequence := self inlinedSequence.\x0a\x0a\x09\x22Map the closure arguments to the receiver of the message send\x22\x0a\x09anIRClosure arguments do: [ :each |\x0a\x09\x09inlinedClosure add: (IRTempDeclaration new name: each; yourself).\x0a\x09\x09sequence add: (IRAssignment new\x0a\x09\x09\x09add: (IRVariable new variable: (AliasVar new scope: inlinedClosure scope; name: each; yourself));\x0a\x09\x09\x09add: (IRVariable new variable: (AliasVar new scope: inlinedClosure scope; name: '$receiver'; yourself));\x0a\x09\x09\x09yourself) ].\x0a\x09\x09\x09\x0a\x09\x22To ensure the correct order of the closure instructions: first the temps then the sequence\x22\x0a\x09inlinedClosure add: sequence.\x0a\x0a\x09\x22Get all the statements\x22\x0a\x09statements := anIRClosure instructions last instructions.\x0a\x09\x0a\x09statements ifNotEmpty: [\x0a\x09\x09statements allButLast do: [ :each | sequence add: each ].\x0a\x0a\x09\x09\x22Inlined closures don't have implicit local returns\x22\x0a\x09\x09(statements last isReturn and: [ statements last isBlockReturn ])\x0a\x09\x09\x09ifTrue: [ sequence add: statements last instructions first ]\x0a\x09\x09\x09ifFalse: [ sequence add: statements last ] ].\x0a\x0a\x09^ inlinedClosure",
  1701. referencedClasses: ["IRTempDeclaration", "IRAssignment", "IRVariable", "AliasVar"],
  1702. //>>excludeEnd("ide");
  1703. messageSends: ["inlinedClosure", "scope:", "scope", "parent:", "parent", "do:", "tempDeclarations", "add:", "inlinedSequence", "arguments", "name:", "new", "yourself", "variable:", "instructions", "last", "ifNotEmpty:", "allButLast", "ifTrue:ifFalse:", "and:", "isReturn", "isBlockReturn", "first"]
  1704. }),
  1705. $globals.IRSendInliner);
  1706. $core.addMethod(
  1707. $core.method({
  1708. selector: "inlineSend:",
  1709. protocol: 'inlining',
  1710. fn: function (anIRSend){
  1711. var self=this;
  1712. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1713. return $core.withContext(function($ctx1) {
  1714. //>>excludeEnd("ctx");
  1715. var $2,$1;
  1716. self._send_(anIRSend);
  1717. $2=self._send();
  1718. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1719. $ctx1.sendIdx["send"]=1;
  1720. //>>excludeEnd("ctx");
  1721. $1=$recv($2)._selector();
  1722. return self._perform_withArguments_($1,$recv($recv(self._send())._instructions())._allButFirst());
  1723. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1724. }, function($ctx1) {$ctx1.fill(self,"inlineSend:",{anIRSend:anIRSend},$globals.IRSendInliner)});
  1725. //>>excludeEnd("ctx");
  1726. },
  1727. //>>excludeStart("ide", pragmas.excludeIdeData);
  1728. args: ["anIRSend"],
  1729. source: "inlineSend: anIRSend\x0a\x09self send: anIRSend.\x0a\x09^ self\x0a\x09\x09perform: self send selector\x0a\x09\x09withArguments: self send instructions allButFirst",
  1730. referencedClasses: [],
  1731. //>>excludeEnd("ide");
  1732. messageSends: ["send:", "perform:withArguments:", "selector", "send", "allButFirst", "instructions"]
  1733. }),
  1734. $globals.IRSendInliner);
  1735. $core.addMethod(
  1736. $core.method({
  1737. selector: "inlinedClosure",
  1738. protocol: 'factory',
  1739. fn: function (){
  1740. var self=this;
  1741. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1742. return $core.withContext(function($ctx1) {
  1743. //>>excludeEnd("ctx");
  1744. return $recv($globals.IRInlinedClosure)._new();
  1745. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1746. }, function($ctx1) {$ctx1.fill(self,"inlinedClosure",{},$globals.IRSendInliner)});
  1747. //>>excludeEnd("ctx");
  1748. },
  1749. //>>excludeStart("ide", pragmas.excludeIdeData);
  1750. args: [],
  1751. source: "inlinedClosure\x0a\x09^ IRInlinedClosure new",
  1752. referencedClasses: ["IRInlinedClosure"],
  1753. //>>excludeEnd("ide");
  1754. messageSends: ["new"]
  1755. }),
  1756. $globals.IRSendInliner);
  1757. $core.addMethod(
  1758. $core.method({
  1759. selector: "inlinedSend:withBlock:",
  1760. protocol: 'inlining',
  1761. fn: function (inlinedSend,anIRInstruction){
  1762. var self=this;
  1763. var inlinedClosure;
  1764. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1765. return $core.withContext(function($ctx1) {
  1766. //>>excludeEnd("ctx");
  1767. var $1,$2,$5,$4,$3,$6;
  1768. $1=$recv(anIRInstruction)._isClosure();
  1769. if(!$core.assert($1)){
  1770. self._inliningError_("Message argument should be a block");
  1771. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1772. $ctx1.sendIdx["inliningError:"]=1;
  1773. //>>excludeEnd("ctx");
  1774. };
  1775. $2=$recv($recv($recv(anIRInstruction)._arguments())._size()).__eq((0));
  1776. if(!$core.assert($2)){
  1777. self._inliningError_("Inlined block should have zero argument");
  1778. };
  1779. inlinedClosure=$recv(self._translator())._visit_(self._inlineClosure_(anIRInstruction));
  1780. $5=self._send();
  1781. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1782. $ctx1.sendIdx["send"]=1;
  1783. //>>excludeEnd("ctx");
  1784. $4=$recv($5)._instructions();
  1785. $3=$recv($4)._first();
  1786. $recv(inlinedSend)._add_($3);
  1787. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1788. $ctx1.sendIdx["add:"]=1;
  1789. //>>excludeEnd("ctx");
  1790. $recv(inlinedSend)._add_(inlinedClosure);
  1791. $recv(self._send())._replaceWith_(inlinedSend);
  1792. $6=$recv($recv(inlinedSend)._method())._internalVariables();
  1793. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1794. $ctx1.sendIdx["internalVariables"]=1;
  1795. //>>excludeEnd("ctx");
  1796. $recv($6)._addAll_($recv(inlinedSend)._internalVariables());
  1797. return inlinedSend;
  1798. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1799. }, function($ctx1) {$ctx1.fill(self,"inlinedSend:withBlock:",{inlinedSend:inlinedSend,anIRInstruction:anIRInstruction,inlinedClosure:inlinedClosure},$globals.IRSendInliner)});
  1800. //>>excludeEnd("ctx");
  1801. },
  1802. //>>excludeStart("ide", pragmas.excludeIdeData);
  1803. args: ["inlinedSend", "anIRInstruction"],
  1804. source: "inlinedSend: inlinedSend withBlock: anIRInstruction\x0a\x09| inlinedClosure |\x0a\x0a\x09anIRInstruction isClosure ifFalse: [ self inliningError: 'Message argument should be a block' ].\x0a\x09anIRInstruction arguments size = 0 ifFalse: [ self inliningError: 'Inlined block should have zero argument' ].\x0a\x0a\x09inlinedClosure := self translator visit: (self inlineClosure: anIRInstruction).\x0a\x0a\x09inlinedSend\x0a\x09\x09add: self send instructions first;\x0a\x09\x09add: inlinedClosure.\x0a\x0a\x09self send replaceWith: inlinedSend.\x0a\x09inlinedSend method internalVariables \x0a\x09\x09addAll: inlinedSend internalVariables.\x0a\x0a\x09^ inlinedSend",
  1805. referencedClasses: [],
  1806. //>>excludeEnd("ide");
  1807. messageSends: ["ifFalse:", "isClosure", "inliningError:", "=", "size", "arguments", "visit:", "translator", "inlineClosure:", "add:", "first", "instructions", "send", "replaceWith:", "addAll:", "internalVariables", "method"]
  1808. }),
  1809. $globals.IRSendInliner);
  1810. $core.addMethod(
  1811. $core.method({
  1812. selector: "inlinedSend:withBlock:withBlock:",
  1813. protocol: 'inlining',
  1814. fn: function (inlinedSend,anIRInstruction,anotherIRInstruction){
  1815. var self=this;
  1816. var inlinedClosure1,inlinedClosure2;
  1817. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1818. return $core.withContext(function($ctx1) {
  1819. //>>excludeEnd("ctx");
  1820. var $1,$2,$3,$4,$7,$6,$5,$8;
  1821. $1=$recv(anIRInstruction)._isClosure();
  1822. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1823. $ctx1.sendIdx["isClosure"]=1;
  1824. //>>excludeEnd("ctx");
  1825. if(!$core.assert($1)){
  1826. self._inliningError_("Message argument should be a block");
  1827. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1828. $ctx1.sendIdx["inliningError:"]=1;
  1829. //>>excludeEnd("ctx");
  1830. };
  1831. $2=$recv(anotherIRInstruction)._isClosure();
  1832. if(!$core.assert($2)){
  1833. self._inliningError_("Message argument should be a block");
  1834. };
  1835. $3=self._translator();
  1836. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1837. $ctx1.sendIdx["translator"]=1;
  1838. //>>excludeEnd("ctx");
  1839. $4=self._inlineClosure_(anIRInstruction);
  1840. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1841. $ctx1.sendIdx["inlineClosure:"]=1;
  1842. //>>excludeEnd("ctx");
  1843. inlinedClosure1=$recv($3)._visit_($4);
  1844. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1845. $ctx1.sendIdx["visit:"]=1;
  1846. //>>excludeEnd("ctx");
  1847. inlinedClosure2=$recv(self._translator())._visit_(self._inlineClosure_(anotherIRInstruction));
  1848. $7=self._send();
  1849. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1850. $ctx1.sendIdx["send"]=1;
  1851. //>>excludeEnd("ctx");
  1852. $6=$recv($7)._instructions();
  1853. $5=$recv($6)._first();
  1854. $recv(inlinedSend)._add_($5);
  1855. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1856. $ctx1.sendIdx["add:"]=1;
  1857. //>>excludeEnd("ctx");
  1858. $recv(inlinedSend)._add_(inlinedClosure1);
  1859. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1860. $ctx1.sendIdx["add:"]=2;
  1861. //>>excludeEnd("ctx");
  1862. $recv(inlinedSend)._add_(inlinedClosure2);
  1863. $recv(self._send())._replaceWith_(inlinedSend);
  1864. $8=$recv($recv(inlinedSend)._method())._internalVariables();
  1865. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1866. $ctx1.sendIdx["internalVariables"]=1;
  1867. //>>excludeEnd("ctx");
  1868. $recv($8)._addAll_($recv(inlinedSend)._internalVariables());
  1869. return inlinedSend;
  1870. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1871. }, function($ctx1) {$ctx1.fill(self,"inlinedSend:withBlock:withBlock:",{inlinedSend:inlinedSend,anIRInstruction:anIRInstruction,anotherIRInstruction:anotherIRInstruction,inlinedClosure1:inlinedClosure1,inlinedClosure2:inlinedClosure2},$globals.IRSendInliner)});
  1872. //>>excludeEnd("ctx");
  1873. },
  1874. //>>excludeStart("ide", pragmas.excludeIdeData);
  1875. args: ["inlinedSend", "anIRInstruction", "anotherIRInstruction"],
  1876. source: "inlinedSend: inlinedSend withBlock: anIRInstruction withBlock: anotherIRInstruction\x0a\x09| inlinedClosure1 inlinedClosure2 |\x0a\x0a\x09anIRInstruction isClosure ifFalse: [ self inliningError: 'Message argument should be a block' ].\x0a\x09anotherIRInstruction isClosure ifFalse: [ self inliningError: 'Message argument should be a block' ].\x0a\x0a\x09inlinedClosure1 := self translator visit: (self inlineClosure: anIRInstruction).\x0a\x09inlinedClosure2 := self translator visit: (self inlineClosure: anotherIRInstruction).\x0a\x0a\x09inlinedSend\x0a\x09\x09add: self send instructions first;\x0a\x09\x09add: inlinedClosure1;\x0a\x09\x09add: inlinedClosure2.\x0a\x0a\x09self send replaceWith: inlinedSend.\x0a\x09inlinedSend method internalVariables \x0a\x09\x09addAll: inlinedSend internalVariables.\x0a\x09\x09\x0a\x09^ inlinedSend",
  1877. referencedClasses: [],
  1878. //>>excludeEnd("ide");
  1879. messageSends: ["ifFalse:", "isClosure", "inliningError:", "visit:", "translator", "inlineClosure:", "add:", "first", "instructions", "send", "replaceWith:", "addAll:", "internalVariables", "method"]
  1880. }),
  1881. $globals.IRSendInliner);
  1882. $core.addMethod(
  1883. $core.method({
  1884. selector: "inlinedSequence",
  1885. protocol: 'factory',
  1886. fn: function (){
  1887. var self=this;
  1888. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1889. return $core.withContext(function($ctx1) {
  1890. //>>excludeEnd("ctx");
  1891. return $recv($globals.IRInlinedSequence)._new();
  1892. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1893. }, function($ctx1) {$ctx1.fill(self,"inlinedSequence",{},$globals.IRSendInliner)});
  1894. //>>excludeEnd("ctx");
  1895. },
  1896. //>>excludeStart("ide", pragmas.excludeIdeData);
  1897. args: [],
  1898. source: "inlinedSequence\x0a\x09^ IRInlinedSequence new",
  1899. referencedClasses: ["IRInlinedSequence"],
  1900. //>>excludeEnd("ide");
  1901. messageSends: ["new"]
  1902. }),
  1903. $globals.IRSendInliner);
  1904. $core.addMethod(
  1905. $core.method({
  1906. selector: "inliningError:",
  1907. protocol: 'error handling',
  1908. fn: function (aString){
  1909. var self=this;
  1910. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1911. return $core.withContext(function($ctx1) {
  1912. //>>excludeEnd("ctx");
  1913. $recv($globals.InliningError)._signal_(aString);
  1914. return self;
  1915. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1916. }, function($ctx1) {$ctx1.fill(self,"inliningError:",{aString:aString},$globals.IRSendInliner)});
  1917. //>>excludeEnd("ctx");
  1918. },
  1919. //>>excludeStart("ide", pragmas.excludeIdeData);
  1920. args: ["aString"],
  1921. source: "inliningError: aString\x0a\x09InliningError signal: aString",
  1922. referencedClasses: ["InliningError"],
  1923. //>>excludeEnd("ide");
  1924. messageSends: ["signal:"]
  1925. }),
  1926. $globals.IRSendInliner);
  1927. $core.addMethod(
  1928. $core.method({
  1929. selector: "send",
  1930. protocol: 'accessing',
  1931. fn: function (){
  1932. var self=this;
  1933. return self["@send"];
  1934. },
  1935. //>>excludeStart("ide", pragmas.excludeIdeData);
  1936. args: [],
  1937. source: "send\x0a\x09^ send",
  1938. referencedClasses: [],
  1939. //>>excludeEnd("ide");
  1940. messageSends: []
  1941. }),
  1942. $globals.IRSendInliner);
  1943. $core.addMethod(
  1944. $core.method({
  1945. selector: "send:",
  1946. protocol: 'accessing',
  1947. fn: function (anIRSend){
  1948. var self=this;
  1949. self["@send"]=anIRSend;
  1950. return self;
  1951. },
  1952. //>>excludeStart("ide", pragmas.excludeIdeData);
  1953. args: ["anIRSend"],
  1954. source: "send: anIRSend\x0a\x09send := anIRSend",
  1955. referencedClasses: [],
  1956. //>>excludeEnd("ide");
  1957. messageSends: []
  1958. }),
  1959. $globals.IRSendInliner);
  1960. $core.addMethod(
  1961. $core.method({
  1962. selector: "translator",
  1963. protocol: 'accessing',
  1964. fn: function (){
  1965. var self=this;
  1966. return self["@translator"];
  1967. },
  1968. //>>excludeStart("ide", pragmas.excludeIdeData);
  1969. args: [],
  1970. source: "translator\x0a\x09^ translator",
  1971. referencedClasses: [],
  1972. //>>excludeEnd("ide");
  1973. messageSends: []
  1974. }),
  1975. $globals.IRSendInliner);
  1976. $core.addMethod(
  1977. $core.method({
  1978. selector: "translator:",
  1979. protocol: 'accessing',
  1980. fn: function (anASTTranslator){
  1981. var self=this;
  1982. self["@translator"]=anASTTranslator;
  1983. return self;
  1984. },
  1985. //>>excludeStart("ide", pragmas.excludeIdeData);
  1986. args: ["anASTTranslator"],
  1987. source: "translator: anASTTranslator\x0a\x09translator := anASTTranslator",
  1988. referencedClasses: [],
  1989. //>>excludeEnd("ide");
  1990. messageSends: []
  1991. }),
  1992. $globals.IRSendInliner);
  1993. $core.addMethod(
  1994. $core.method({
  1995. selector: "inlinedSelectors",
  1996. protocol: 'accessing',
  1997. fn: function (){
  1998. var self=this;
  1999. return ["ifTrue:", "ifFalse:", "ifTrue:ifFalse:", "ifFalse:ifTrue:", "ifNil:", "ifNotNil:", "ifNil:ifNotNil:", "ifNotNil:ifNil:"];
  2000. },
  2001. //>>excludeStart("ide", pragmas.excludeIdeData);
  2002. args: [],
  2003. source: "inlinedSelectors\x0a\x09^ #('ifTrue:' 'ifFalse:' 'ifTrue:ifFalse:' 'ifFalse:ifTrue:' 'ifNil:' 'ifNotNil:' 'ifNil:ifNotNil:' 'ifNotNil:ifNil:')",
  2004. referencedClasses: [],
  2005. //>>excludeEnd("ide");
  2006. messageSends: []
  2007. }),
  2008. $globals.IRSendInliner.klass);
  2009. $core.addMethod(
  2010. $core.method({
  2011. selector: "shouldInline:",
  2012. protocol: 'accessing',
  2013. fn: function (anIRInstruction){
  2014. var self=this;
  2015. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  2016. return $core.withContext(function($ctx1) {
  2017. //>>excludeEnd("ctx");
  2018. var $1;
  2019. $1=$recv(self._inlinedSelectors())._includes_($recv(anIRInstruction)._selector());
  2020. if(!$core.assert($1)){
  2021. return false;
  2022. };
  2023. return $recv($recv($recv(anIRInstruction)._instructions())._allButFirst())._allSatisfy_((function(each){
  2024. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  2025. return $core.withContext(function($ctx2) {
  2026. //>>excludeEnd("ctx");
  2027. return $recv(each)._isClosure();
  2028. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  2029. }, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1,2)});
  2030. //>>excludeEnd("ctx");
  2031. }));
  2032. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  2033. }, function($ctx1) {$ctx1.fill(self,"shouldInline:",{anIRInstruction:anIRInstruction},$globals.IRSendInliner.klass)});
  2034. //>>excludeEnd("ctx");
  2035. },
  2036. //>>excludeStart("ide", pragmas.excludeIdeData);
  2037. args: ["anIRInstruction"],
  2038. source: "shouldInline: anIRInstruction\x0a\x09(self inlinedSelectors includes: anIRInstruction selector) ifFalse: [ ^ false ].\x0a\x09^ anIRInstruction instructions allButFirst allSatisfy: [ :each | each isClosure]",
  2039. referencedClasses: [],
  2040. //>>excludeEnd("ide");
  2041. messageSends: ["ifFalse:", "includes:", "inlinedSelectors", "selector", "allSatisfy:", "allButFirst", "instructions", "isClosure"]
  2042. }),
  2043. $globals.IRSendInliner.klass);
  2044. $core.addClass('IRAssignmentInliner', $globals.IRSendInliner, ['assignment'], 'Compiler-Inlining');
  2045. //>>excludeStart("ide", pragmas.excludeIdeData);
  2046. $globals.IRAssignmentInliner.comment="I inline message sends together with assignments by moving them around into the inline closure instructions.\x0a\x0a##Example\x0a\x0a\x09foo\x0a\x09\x09| a |\x0a\x09\x09a := true ifTrue: [ 1 ]\x0a\x0aWill produce:\x0a\x0a\x09if($core.assert(true) {\x0a\x09\x09a = 1;\x0a\x09};";
  2047. //>>excludeEnd("ide");
  2048. $core.addMethod(
  2049. $core.method({
  2050. selector: "assignment",
  2051. protocol: 'accessing',
  2052. fn: function (){
  2053. var self=this;
  2054. return self["@assignment"];
  2055. },
  2056. //>>excludeStart("ide", pragmas.excludeIdeData);
  2057. args: [],
  2058. source: "assignment\x0a\x09^ assignment",
  2059. referencedClasses: [],
  2060. //>>excludeEnd("ide");
  2061. messageSends: []
  2062. }),
  2063. $globals.IRAssignmentInliner);
  2064. $core.addMethod(
  2065. $core.method({
  2066. selector: "assignment:",
  2067. protocol: 'accessing',
  2068. fn: function (aNode){
  2069. var self=this;
  2070. self["@assignment"]=aNode;
  2071. return self;
  2072. },
  2073. //>>excludeStart("ide", pragmas.excludeIdeData);
  2074. args: ["aNode"],
  2075. source: "assignment: aNode\x0a\x09assignment := aNode",
  2076. referencedClasses: [],
  2077. //>>excludeEnd("ide");
  2078. messageSends: []
  2079. }),
  2080. $globals.IRAssignmentInliner);
  2081. $core.addMethod(
  2082. $core.method({
  2083. selector: "inlineAssignment:",
  2084. protocol: 'inlining',
  2085. fn: function (anIRAssignment){
  2086. var self=this;
  2087. var inlinedAssignment;
  2088. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  2089. return $core.withContext(function($ctx1) {
  2090. //>>excludeEnd("ctx");
  2091. var $1;
  2092. self._assignment_(anIRAssignment);
  2093. inlinedAssignment=$recv($globals.IRInlinedAssignment)._new();
  2094. $1=$recv(anIRAssignment)._instructions();
  2095. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  2096. $ctx1.sendIdx["instructions"]=1;
  2097. //>>excludeEnd("ctx");
  2098. $recv($1)._do_((function(each){
  2099. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  2100. return $core.withContext(function($ctx2) {
  2101. //>>excludeEnd("ctx");
  2102. return $recv(inlinedAssignment)._add_(each);
  2103. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  2104. }, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1,1)});
  2105. //>>excludeEnd("ctx");
  2106. }));
  2107. $recv(anIRAssignment)._replaceWith_(inlinedAssignment);
  2108. self._inlineSend_($recv($recv(inlinedAssignment)._instructions())._last());
  2109. return inlinedAssignment;
  2110. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  2111. }, function($ctx1) {$ctx1.fill(self,"inlineAssignment:",{anIRAssignment:anIRAssignment,inlinedAssignment:inlinedAssignment},$globals.IRAssignmentInliner)});
  2112. //>>excludeEnd("ctx");
  2113. },
  2114. //>>excludeStart("ide", pragmas.excludeIdeData);
  2115. args: ["anIRAssignment"],
  2116. source: "inlineAssignment: anIRAssignment\x0a\x09| inlinedAssignment |\x0a\x09self assignment: anIRAssignment.\x0a\x09inlinedAssignment := IRInlinedAssignment new.\x0a\x09anIRAssignment instructions do: [ :each |\x0a\x09\x09inlinedAssignment add: each ].\x0a\x09anIRAssignment replaceWith: inlinedAssignment.\x0a\x09self inlineSend: inlinedAssignment instructions last.\x0a\x09^ inlinedAssignment",
  2117. referencedClasses: ["IRInlinedAssignment"],
  2118. //>>excludeEnd("ide");
  2119. messageSends: ["assignment:", "new", "do:", "instructions", "add:", "replaceWith:", "inlineSend:", "last"]
  2120. }),
  2121. $globals.IRAssignmentInliner);
  2122. $core.addMethod(
  2123. $core.method({
  2124. selector: "inlineClosure:",
  2125. protocol: 'inlining',
  2126. fn: function (anIRClosure){
  2127. var self=this;
  2128. var inlinedClosure,statements;
  2129. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  2130. return $core.withContext(function($ctx1) {
  2131. //>>excludeEnd("ctx");
  2132. var $2,$1,$4,$3,$5,$7,$6;
  2133. inlinedClosure=(
  2134. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  2135. $ctx1.supercall = true,
  2136. //>>excludeEnd("ctx");
  2137. ($globals.IRAssignmentInliner.superclass||$boot.nilAsClass).fn.prototype._inlineClosure_.apply($recv(self), [anIRClosure]));
  2138. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  2139. $ctx1.supercall = false;
  2140. //>>excludeEnd("ctx");;
  2141. $2=$recv(inlinedClosure)._instructions();
  2142. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  2143. $ctx1.sendIdx["instructions"]=2;
  2144. //>>excludeEnd("ctx");
  2145. $1=$recv($2)._last();
  2146. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  2147. $ctx1.sendIdx["last"]=1;
  2148. //>>excludeEnd("ctx");
  2149. statements=$recv($1)._instructions();
  2150. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  2151. $ctx1.sendIdx["instructions"]=1;
  2152. //>>excludeEnd("ctx");
  2153. $recv(statements)._ifNotEmpty_((function(){
  2154. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  2155. return $core.withContext(function($ctx2) {
  2156. //>>excludeEnd("ctx");
  2157. $4=$recv(statements)._last();
  2158. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  2159. $ctx2.sendIdx["last"]=2;
  2160. //>>excludeEnd("ctx");
  2161. $3=$recv($4)._canBeAssigned();
  2162. if($core.assert($3)){
  2163. $5=$recv(statements)._last();
  2164. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  2165. $ctx2.sendIdx["last"]=3;
  2166. //>>excludeEnd("ctx");
  2167. $7=$recv($globals.IRAssignment)._new();
  2168. $recv($7)._add_($recv($recv(self._assignment())._instructions())._first());
  2169. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  2170. $ctx2.sendIdx["add:"]=1;
  2171. //>>excludeEnd("ctx");
  2172. $recv($7)._add_($recv($recv(statements)._last())._copy());
  2173. $6=$recv($7)._yourself();
  2174. return $recv($5)._replaceWith_($6);
  2175. };
  2176. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  2177. }, function($ctx2) {$ctx2.fillBlock({},$ctx1,1)});
  2178. //>>excludeEnd("ctx");
  2179. }));
  2180. return inlinedClosure;
  2181. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  2182. }, function($ctx1) {$ctx1.fill(self,"inlineClosure:",{anIRClosure:anIRClosure,inlinedClosure:inlinedClosure,statements:statements},$globals.IRAssignmentInliner)});
  2183. //>>excludeEnd("ctx");
  2184. },
  2185. //>>excludeStart("ide", pragmas.excludeIdeData);
  2186. args: ["anIRClosure"],
  2187. source: "inlineClosure: anIRClosure\x0a\x09| inlinedClosure statements |\x0a\x0a\x09inlinedClosure := super inlineClosure: anIRClosure.\x0a\x09statements := inlinedClosure instructions last instructions.\x0a\x09\x0a\x09statements ifNotEmpty: [\x0a\x09\x09statements last canBeAssigned ifTrue: [\x0a\x09\x09\x09statements last replaceWith: (IRAssignment new\x0a\x09\x09\x09\x09add: self assignment instructions first;\x0a\x09\x09\x09\x09add: statements last copy;\x0a\x09\x09\x09\x09yourself) ] ].\x0a\x0a\x09^ inlinedClosure",
  2188. referencedClasses: ["IRAssignment"],
  2189. //>>excludeEnd("ide");
  2190. messageSends: ["inlineClosure:", "instructions", "last", "ifNotEmpty:", "ifTrue:", "canBeAssigned", "replaceWith:", "add:", "new", "first", "assignment", "copy", "yourself"]
  2191. }),
  2192. $globals.IRAssignmentInliner);
  2193. $core.addClass('IRReturnInliner', $globals.IRSendInliner, [], 'Compiler-Inlining');
  2194. //>>excludeStart("ide", pragmas.excludeIdeData);
  2195. $globals.IRReturnInliner.comment="I inline message sends with inlined closure together with a return instruction.";
  2196. //>>excludeEnd("ide");
  2197. $core.addMethod(
  2198. $core.method({
  2199. selector: "inlineClosure:",
  2200. protocol: 'inlining',
  2201. fn: function (anIRClosure){
  2202. var self=this;
  2203. var closure,statements;
  2204. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  2205. return $core.withContext(function($ctx1) {
  2206. //>>excludeEnd("ctx");
  2207. var $1,$3,$2,$4,$6,$5;
  2208. closure=(
  2209. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  2210. $ctx1.supercall = true,
  2211. //>>excludeEnd("ctx");
  2212. ($globals.IRReturnInliner.superclass||$boot.nilAsClass).fn.prototype._inlineClosure_.apply($recv(self), [anIRClosure]));
  2213. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  2214. $ctx1.supercall = false;
  2215. //>>excludeEnd("ctx");;
  2216. $1=$recv($recv(closure)._instructions())._last();
  2217. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  2218. $ctx1.sendIdx["last"]=1;
  2219. //>>excludeEnd("ctx");
  2220. statements=$recv($1)._instructions();
  2221. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  2222. $ctx1.sendIdx["instructions"]=1;
  2223. //>>excludeEnd("ctx");
  2224. $recv(statements)._ifNotEmpty_((function(){
  2225. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  2226. return $core.withContext(function($ctx2) {
  2227. //>>excludeEnd("ctx");
  2228. $3=$recv(statements)._last();
  2229. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  2230. $ctx2.sendIdx["last"]=2;
  2231. //>>excludeEnd("ctx");
  2232. $2=$recv($3)._isReturn();
  2233. if(!$core.assert($2)){
  2234. $4=$recv(statements)._last();
  2235. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  2236. $ctx2.sendIdx["last"]=3;
  2237. //>>excludeEnd("ctx");
  2238. $6=$recv($globals.IRReturn)._new();
  2239. $recv($6)._add_($recv($recv(statements)._last())._copy());
  2240. $5=$recv($6)._yourself();
  2241. return $recv($4)._replaceWith_($5);
  2242. };
  2243. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  2244. }, function($ctx2) {$ctx2.fillBlock({},$ctx1,1)});
  2245. //>>excludeEnd("ctx");
  2246. }));
  2247. return closure;
  2248. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  2249. }, function($ctx1) {$ctx1.fill(self,"inlineClosure:",{anIRClosure:anIRClosure,closure:closure,statements:statements},$globals.IRReturnInliner)});
  2250. //>>excludeEnd("ctx");
  2251. },
  2252. //>>excludeStart("ide", pragmas.excludeIdeData);
  2253. args: ["anIRClosure"],
  2254. source: "inlineClosure: anIRClosure\x0a\x09| closure statements |\x0a\x0a\x09closure := super inlineClosure: anIRClosure.\x0a\x09statements := closure instructions last instructions.\x0a\x09\x0a\x09statements ifNotEmpty: [\x0a\x09\x09statements last isReturn\x0a\x09\x09\x09ifFalse: [ statements last replaceWith: (IRReturn new\x0a\x09\x09\x09\x09add: statements last copy;\x0a\x09\x09\x09\x09yourself)] ].\x0a\x0a\x09^ closure",
  2255. referencedClasses: ["IRReturn"],
  2256. //>>excludeEnd("ide");
  2257. messageSends: ["inlineClosure:", "instructions", "last", "ifNotEmpty:", "ifFalse:", "isReturn", "replaceWith:", "add:", "new", "copy", "yourself"]
  2258. }),
  2259. $globals.IRReturnInliner);
  2260. $core.addMethod(
  2261. $core.method({
  2262. selector: "inlineReturn:",
  2263. protocol: 'inlining',
  2264. fn: function (anIRReturn){
  2265. var self=this;
  2266. var return_;
  2267. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  2268. return $core.withContext(function($ctx1) {
  2269. //>>excludeEnd("ctx");
  2270. var $1;
  2271. return_=self._inlinedReturn();
  2272. $1=$recv(anIRReturn)._instructions();
  2273. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  2274. $ctx1.sendIdx["instructions"]=1;
  2275. //>>excludeEnd("ctx");
  2276. $recv($1)._do_((function(each){
  2277. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  2278. return $core.withContext(function($ctx2) {
  2279. //>>excludeEnd("ctx");
  2280. return $recv(return_)._add_(each);
  2281. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  2282. }, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1,1)});
  2283. //>>excludeEnd("ctx");
  2284. }));
  2285. $recv(anIRReturn)._replaceWith_(return_);
  2286. self._inlineSend_($recv($recv(return_)._instructions())._last());
  2287. return return_;
  2288. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  2289. }, function($ctx1) {$ctx1.fill(self,"inlineReturn:",{anIRReturn:anIRReturn,return_:return_},$globals.IRReturnInliner)});
  2290. //>>excludeEnd("ctx");
  2291. },
  2292. //>>excludeStart("ide", pragmas.excludeIdeData);
  2293. args: ["anIRReturn"],
  2294. source: "inlineReturn: anIRReturn\x0a\x09| return |\x0a\x09return := self inlinedReturn.\x0a\x09anIRReturn instructions do: [ :each |\x0a\x09\x09return add: each ].\x0a\x09anIRReturn replaceWith: return.\x0a\x09self inlineSend: return instructions last.\x0a\x09^ return",
  2295. referencedClasses: [],
  2296. //>>excludeEnd("ide");
  2297. messageSends: ["inlinedReturn", "do:", "instructions", "add:", "replaceWith:", "inlineSend:", "last"]
  2298. }),
  2299. $globals.IRReturnInliner);
  2300. $core.addMethod(
  2301. $core.method({
  2302. selector: "inlinedReturn",
  2303. protocol: 'factory',
  2304. fn: function (){
  2305. var self=this;
  2306. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  2307. return $core.withContext(function($ctx1) {
  2308. //>>excludeEnd("ctx");
  2309. return $recv($globals.IRInlinedReturn)._new();
  2310. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  2311. }, function($ctx1) {$ctx1.fill(self,"inlinedReturn",{},$globals.IRReturnInliner)});
  2312. //>>excludeEnd("ctx");
  2313. },
  2314. //>>excludeStart("ide", pragmas.excludeIdeData);
  2315. args: [],
  2316. source: "inlinedReturn\x0a\x09^ IRInlinedReturn new",
  2317. referencedClasses: ["IRInlinedReturn"],
  2318. //>>excludeEnd("ide");
  2319. messageSends: ["new"]
  2320. }),
  2321. $globals.IRReturnInliner);
  2322. $core.addClass('InliningCodeGenerator', $globals.CodeGenerator, [], 'Compiler-Inlining');
  2323. //>>excludeStart("ide", pragmas.excludeIdeData);
  2324. $globals.InliningCodeGenerator.comment="I am a specialized code generator that uses inlining to produce more optimized JavaScript output";
  2325. //>>excludeEnd("ide");
  2326. $core.addMethod(
  2327. $core.method({
  2328. selector: "compileNode:",
  2329. protocol: 'compiling',
  2330. fn: function (aNode){
  2331. var self=this;
  2332. var ir,stream;
  2333. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  2334. return $core.withContext(function($ctx1) {
  2335. //>>excludeEnd("ctx");
  2336. var $1;
  2337. $recv(self._semanticAnalyzer())._visit_(aNode);
  2338. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  2339. $ctx1.sendIdx["visit:"]=1;
  2340. //>>excludeEnd("ctx");
  2341. ir=$recv(self._translator())._visit_(aNode);
  2342. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  2343. $ctx1.sendIdx["visit:"]=2;
  2344. //>>excludeEnd("ctx");
  2345. $recv(self._inliner())._visit_(ir);
  2346. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  2347. $ctx1.sendIdx["visit:"]=3;
  2348. //>>excludeEnd("ctx");
  2349. $1=self._irTranslator();
  2350. $recv($1)._currentClass_(self._currentClass());
  2351. $recv($1)._visit_(ir);
  2352. return $recv($1)._contents();
  2353. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  2354. }, function($ctx1) {$ctx1.fill(self,"compileNode:",{aNode:aNode,ir:ir,stream:stream},$globals.InliningCodeGenerator)});
  2355. //>>excludeEnd("ctx");
  2356. },
  2357. //>>excludeStart("ide", pragmas.excludeIdeData);
  2358. args: ["aNode"],
  2359. source: "compileNode: aNode\x0a\x09| ir stream |\x0a\x0a\x09self semanticAnalyzer visit: aNode.\x0a\x09ir := self translator visit: aNode.\x0a\x09self inliner visit: ir.\x0a\x0a\x09^ self irTranslator\x0a\x09\x09currentClass: self currentClass;\x0a\x09\x09visit: ir;\x0a\x09\x09contents",
  2360. referencedClasses: [],
  2361. //>>excludeEnd("ide");
  2362. messageSends: ["visit:", "semanticAnalyzer", "translator", "inliner", "currentClass:", "irTranslator", "currentClass", "contents"]
  2363. }),
  2364. $globals.InliningCodeGenerator);
  2365. $core.addMethod(
  2366. $core.method({
  2367. selector: "inliner",
  2368. protocol: 'compiling',
  2369. fn: function (){
  2370. var self=this;
  2371. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  2372. return $core.withContext(function($ctx1) {
  2373. //>>excludeEnd("ctx");
  2374. return $recv($globals.IRInliner)._new();
  2375. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  2376. }, function($ctx1) {$ctx1.fill(self,"inliner",{},$globals.InliningCodeGenerator)});
  2377. //>>excludeEnd("ctx");
  2378. },
  2379. //>>excludeStart("ide", pragmas.excludeIdeData);
  2380. args: [],
  2381. source: "inliner\x0a\x09^ IRInliner new",
  2382. referencedClasses: ["IRInliner"],
  2383. //>>excludeEnd("ide");
  2384. messageSends: ["new"]
  2385. }),
  2386. $globals.InliningCodeGenerator);
  2387. $core.addMethod(
  2388. $core.method({
  2389. selector: "irTranslator",
  2390. protocol: 'compiling',
  2391. fn: function (){
  2392. var self=this;
  2393. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  2394. return $core.withContext(function($ctx1) {
  2395. //>>excludeEnd("ctx");
  2396. return $recv($globals.IRInliningJSTranslator)._new();
  2397. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  2398. }, function($ctx1) {$ctx1.fill(self,"irTranslator",{},$globals.InliningCodeGenerator)});
  2399. //>>excludeEnd("ctx");
  2400. },
  2401. //>>excludeStart("ide", pragmas.excludeIdeData);
  2402. args: [],
  2403. source: "irTranslator\x0a\x09^ IRInliningJSTranslator new",
  2404. referencedClasses: ["IRInliningJSTranslator"],
  2405. //>>excludeEnd("ide");
  2406. messageSends: ["new"]
  2407. }),
  2408. $globals.InliningCodeGenerator);
  2409. $core.addClass('InliningError', $globals.SemanticError, [], 'Compiler-Inlining');
  2410. //>>excludeStart("ide", pragmas.excludeIdeData);
  2411. $globals.InliningError.comment="Instances of InliningError are signaled when using an `InliningCodeGenerator`in a `Compiler`.";
  2412. //>>excludeEnd("ide");
  2413. });