Compiler-Inlining.js 94 KB

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