1
0

Helios-References.js 50 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989990991992993994995996997998999100010011002100310041005100610071008100910101011101210131014101510161017101810191020102110221023102410251026102710281029103010311032103310341035103610371038103910401041104210431044104510461047104810491050105110521053105410551056105710581059106010611062106310641065106610671068106910701071107210731074107510761077107810791080108110821083108410851086108710881089109010911092109310941095109610971098109911001101110211031104110511061107110811091110111111121113111411151116111711181119112011211122112311241125112611271128112911301131113211331134113511361137113811391140114111421143114411451146114711481149115011511152115311541155115611571158115911601161116211631164116511661167116811691170117111721173117411751176117711781179118011811182118311841185118611871188118911901191119211931194119511961197119811991200120112021203120412051206120712081209121012111212121312141215121612171218121912201221122212231224122512261227122812291230123112321233123412351236123712381239124012411242124312441245124612471248124912501251125212531254125512561257125812591260126112621263126412651266126712681269127012711272127312741275127612771278127912801281128212831284128512861287128812891290129112921293129412951296129712981299130013011302130313041305130613071308130913101311131213131314131513161317131813191320132113221323132413251326132713281329133013311332133313341335133613371338133913401341134213431344134513461347134813491350135113521353135413551356135713581359136013611362136313641365136613671368136913701371137213731374137513761377137813791380138113821383138413851386138713881389139013911392139313941395139613971398139914001401140214031404140514061407140814091410141114121413141414151416141714181419142014211422142314241425142614271428142914301431143214331434143514361437143814391440144114421443144414451446144714481449145014511452145314541455145614571458145914601461146214631464146514661467146814691470147114721473147414751476147714781479148014811482148314841485148614871488148914901491149214931494149514961497149814991500150115021503150415051506150715081509151015111512151315141515151615171518151915201521152215231524152515261527152815291530153115321533153415351536153715381539154015411542154315441545154615471548154915501551
  1. define(["amber/boot", "amber_core/Kernel-Objects", "helios/Helios-Core"], function($boot){"use strict";
  2. if(!$boot.nilAsReceiver)$boot.nilAsReceiver=$boot.nil;
  3. var $core=$boot.api,nil=$boot.nilAsReceiver,$recv=$boot.asReceiver,$globals=$boot.globals;
  4. if(!$boot.nilAsClass)$boot.nilAsClass=$boot.dnu;
  5. $core.addPackage("Helios-References");
  6. $core.packages["Helios-References"].innerEval = function (expr) { return eval(expr); };
  7. $core.packages["Helios-References"].transport = {"type":"amd","amdNamespace":"helios"};
  8. $core.addClass("HLMethodReference", $globals.Object, ["selector", "methodClass"], "Helios-References");
  9. $core.addMethod(
  10. $core.method({
  11. selector: "initializeFromMethod:",
  12. protocol: "initialization",
  13. fn: function (aCompiledMethod){
  14. var self=this;
  15. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  16. return $core.withContext(function($ctx1) {
  17. //>>excludeEnd("ctx");
  18. self._selector_($recv(aCompiledMethod)._selector());
  19. self._methodClass_($recv(aCompiledMethod)._methodClass());
  20. return self;
  21. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  22. }, function($ctx1) {$ctx1.fill(self,"initializeFromMethod:",{aCompiledMethod:aCompiledMethod},$globals.HLMethodReference)});
  23. //>>excludeEnd("ctx");
  24. },
  25. //>>excludeStart("ide", pragmas.excludeIdeData);
  26. args: ["aCompiledMethod"],
  27. source: "initializeFromMethod: aCompiledMethod\x0a\x09self\x0a\x09\x09selector: aCompiledMethod selector;\x0a\x09\x09methodClass: aCompiledMethod methodClass",
  28. referencedClasses: [],
  29. //>>excludeEnd("ide");
  30. messageSends: ["selector:", "selector", "methodClass:", "methodClass"]
  31. }),
  32. $globals.HLMethodReference);
  33. $core.addMethod(
  34. $core.method({
  35. selector: "method",
  36. protocol: "accessing",
  37. fn: function (){
  38. var self=this;
  39. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  40. return $core.withContext(function($ctx1) {
  41. //>>excludeEnd("ctx");
  42. return $recv(self._methodClass())._methodAt_(self._selector());
  43. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  44. }, function($ctx1) {$ctx1.fill(self,"method",{},$globals.HLMethodReference)});
  45. //>>excludeEnd("ctx");
  46. },
  47. //>>excludeStart("ide", pragmas.excludeIdeData);
  48. args: [],
  49. source: "method\x0a\x09^ self methodClass methodAt: self selector",
  50. referencedClasses: [],
  51. //>>excludeEnd("ide");
  52. messageSends: ["methodAt:", "methodClass", "selector"]
  53. }),
  54. $globals.HLMethodReference);
  55. $core.addMethod(
  56. $core.method({
  57. selector: "methodClass",
  58. protocol: "accessing",
  59. fn: function (){
  60. var self=this;
  61. return self["@methodClass"];
  62. },
  63. //>>excludeStart("ide", pragmas.excludeIdeData);
  64. args: [],
  65. source: "methodClass\x0a\x09^ methodClass",
  66. referencedClasses: [],
  67. //>>excludeEnd("ide");
  68. messageSends: []
  69. }),
  70. $globals.HLMethodReference);
  71. $core.addMethod(
  72. $core.method({
  73. selector: "methodClass:",
  74. protocol: "accessing",
  75. fn: function (aClass){
  76. var self=this;
  77. self["@methodClass"]=aClass;
  78. return self;
  79. },
  80. //>>excludeStart("ide", pragmas.excludeIdeData);
  81. args: ["aClass"],
  82. source: "methodClass: aClass\x0a\x09methodClass := aClass",
  83. referencedClasses: [],
  84. //>>excludeEnd("ide");
  85. messageSends: []
  86. }),
  87. $globals.HLMethodReference);
  88. $core.addMethod(
  89. $core.method({
  90. selector: "selector",
  91. protocol: "accessing",
  92. fn: function (){
  93. var self=this;
  94. return self["@selector"];
  95. },
  96. //>>excludeStart("ide", pragmas.excludeIdeData);
  97. args: [],
  98. source: "selector\x0a\x09^ selector",
  99. referencedClasses: [],
  100. //>>excludeEnd("ide");
  101. messageSends: []
  102. }),
  103. $globals.HLMethodReference);
  104. $core.addMethod(
  105. $core.method({
  106. selector: "selector:",
  107. protocol: "accessing",
  108. fn: function (aString){
  109. var self=this;
  110. self["@selector"]=aString;
  111. return self;
  112. },
  113. //>>excludeStart("ide", pragmas.excludeIdeData);
  114. args: ["aString"],
  115. source: "selector: aString\x0a\x09selector := aString",
  116. referencedClasses: [],
  117. //>>excludeEnd("ide");
  118. messageSends: []
  119. }),
  120. $globals.HLMethodReference);
  121. $core.addMethod(
  122. $core.method({
  123. selector: "source",
  124. protocol: "accessing",
  125. fn: function (){
  126. var self=this;
  127. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  128. return $core.withContext(function($ctx1) {
  129. //>>excludeEnd("ctx");
  130. return $recv(self._method())._source();
  131. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  132. }, function($ctx1) {$ctx1.fill(self,"source",{},$globals.HLMethodReference)});
  133. //>>excludeEnd("ctx");
  134. },
  135. //>>excludeStart("ide", pragmas.excludeIdeData);
  136. args: [],
  137. source: "source\x0a\x09^ self method source",
  138. referencedClasses: [],
  139. //>>excludeEnd("ide");
  140. messageSends: ["source", "method"]
  141. }),
  142. $globals.HLMethodReference);
  143. $core.addMethod(
  144. $core.method({
  145. selector: "on:",
  146. protocol: "instance creation",
  147. fn: function (aCompiledMethod){
  148. var self=this;
  149. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  150. return $core.withContext(function($ctx1) {
  151. //>>excludeEnd("ctx");
  152. var $1;
  153. $1=self._new();
  154. $recv($1)._initializeFromMethod_(aCompiledMethod);
  155. return $recv($1)._yourself();
  156. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  157. }, function($ctx1) {$ctx1.fill(self,"on:",{aCompiledMethod:aCompiledMethod},$globals.HLMethodReference.klass)});
  158. //>>excludeEnd("ctx");
  159. },
  160. //>>excludeStart("ide", pragmas.excludeIdeData);
  161. args: ["aCompiledMethod"],
  162. source: "on: aCompiledMethod\x0a\x09^ self new\x0a\x09\x09initializeFromMethod: aCompiledMethod;\x0a\x09\x09yourself",
  163. referencedClasses: [],
  164. //>>excludeEnd("ide");
  165. messageSends: ["initializeFromMethod:", "new", "yourself"]
  166. }),
  167. $globals.HLMethodReference.klass);
  168. $core.addClass("HLReferences", $globals.HLWidget, ["model", "sendersListWidget", "implementorsListWidget", "classReferencesListWidget", "regexpListWidget", "sourceCodeWidget"], "Helios-References");
  169. $core.addMethod(
  170. $core.method({
  171. selector: "classReferencesListWidget",
  172. protocol: "accessing",
  173. fn: function (){
  174. var self=this;
  175. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  176. return $core.withContext(function($ctx1) {
  177. //>>excludeEnd("ctx");
  178. var $1,$receiver;
  179. $1=self["@classReferencesListWidget"];
  180. if(($receiver = $1) == null || $receiver.isNil){
  181. self["@classReferencesListWidget"]=$recv($globals.HLClassReferencesListWidget)._on_(self._model());
  182. self["@classReferencesListWidget"];
  183. return $recv(self["@classReferencesListWidget"])._next_(self._regexpListWidget());
  184. } else {
  185. return $1;
  186. }
  187. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  188. }, function($ctx1) {$ctx1.fill(self,"classReferencesListWidget",{},$globals.HLReferences)});
  189. //>>excludeEnd("ctx");
  190. },
  191. //>>excludeStart("ide", pragmas.excludeIdeData);
  192. args: [],
  193. source: "classReferencesListWidget\x0a\x09^ classReferencesListWidget ifNil: [\x0a \x09classReferencesListWidget := HLClassReferencesListWidget on: self model.\x0a\x09\x09classReferencesListWidget next: self regexpListWidget ]",
  194. referencedClasses: ["HLClassReferencesListWidget"],
  195. //>>excludeEnd("ide");
  196. messageSends: ["ifNil:", "on:", "model", "next:", "regexpListWidget"]
  197. }),
  198. $globals.HLReferences);
  199. $core.addMethod(
  200. $core.method({
  201. selector: "implementorsListWidget",
  202. protocol: "accessing",
  203. fn: function (){
  204. var self=this;
  205. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  206. return $core.withContext(function($ctx1) {
  207. //>>excludeEnd("ctx");
  208. var $1,$receiver;
  209. $1=self["@implementorsListWidget"];
  210. if(($receiver = $1) == null || $receiver.isNil){
  211. self["@implementorsListWidget"]=$recv($globals.HLImplementorsListWidget)._on_(self._model());
  212. self["@implementorsListWidget"];
  213. return $recv(self["@implementorsListWidget"])._next_(self._classReferencesListWidget());
  214. } else {
  215. return $1;
  216. }
  217. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  218. }, function($ctx1) {$ctx1.fill(self,"implementorsListWidget",{},$globals.HLReferences)});
  219. //>>excludeEnd("ctx");
  220. },
  221. //>>excludeStart("ide", pragmas.excludeIdeData);
  222. args: [],
  223. source: "implementorsListWidget\x0a\x09^ implementorsListWidget ifNil: [\x0a \x09implementorsListWidget := HLImplementorsListWidget on: self model.\x0a\x09\x09implementorsListWidget next: self classReferencesListWidget ]",
  224. referencedClasses: ["HLImplementorsListWidget"],
  225. //>>excludeEnd("ide");
  226. messageSends: ["ifNil:", "on:", "model", "next:", "classReferencesListWidget"]
  227. }),
  228. $globals.HLReferences);
  229. $core.addMethod(
  230. $core.method({
  231. selector: "model",
  232. protocol: "accessing",
  233. fn: function (){
  234. var self=this;
  235. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  236. return $core.withContext(function($ctx1) {
  237. //>>excludeEnd("ctx");
  238. var $1,$2,$receiver;
  239. $1=self["@model"];
  240. if(($receiver = $1) == null || $receiver.isNil){
  241. $2=$recv($globals.HLReferencesModel)._new();
  242. $recv($2)._environment_($recv(self._manager())._environment());
  243. self["@model"]=$recv($2)._yourself();
  244. return self["@model"];
  245. } else {
  246. return $1;
  247. }
  248. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  249. }, function($ctx1) {$ctx1.fill(self,"model",{},$globals.HLReferences)});
  250. //>>excludeEnd("ctx");
  251. },
  252. //>>excludeStart("ide", pragmas.excludeIdeData);
  253. args: [],
  254. source: "model\x0a\x09^ model ifNil: [\x0a\x09\x09model := (HLReferencesModel new\x0a\x09\x09\x09environment: self manager environment;\x0a\x09\x09\x09yourself) ]",
  255. referencedClasses: ["HLReferencesModel"],
  256. //>>excludeEnd("ide");
  257. messageSends: ["ifNil:", "environment:", "new", "environment", "manager", "yourself"]
  258. }),
  259. $globals.HLReferences);
  260. $core.addMethod(
  261. $core.method({
  262. selector: "model:",
  263. protocol: "accessing",
  264. fn: function (aModel){
  265. var self=this;
  266. self["@model"]=aModel;
  267. return self;
  268. },
  269. //>>excludeStart("ide", pragmas.excludeIdeData);
  270. args: ["aModel"],
  271. source: "model: aModel\x0a\x09model := aModel",
  272. referencedClasses: [],
  273. //>>excludeEnd("ide");
  274. messageSends: []
  275. }),
  276. $globals.HLReferences);
  277. $core.addMethod(
  278. $core.method({
  279. selector: "regexpListWidget",
  280. protocol: "accessing",
  281. fn: function (){
  282. var self=this;
  283. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  284. return $core.withContext(function($ctx1) {
  285. //>>excludeEnd("ctx");
  286. var $1,$receiver;
  287. $1=self["@regexpListWidget"];
  288. if(($receiver = $1) == null || $receiver.isNil){
  289. self["@regexpListWidget"]=$recv($globals.HLRegexpListWidget)._on_(self._model());
  290. self["@regexpListWidget"];
  291. return $recv(self["@regexpListWidget"])._next_(self._sourceCodeWidget());
  292. } else {
  293. return $1;
  294. }
  295. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  296. }, function($ctx1) {$ctx1.fill(self,"regexpListWidget",{},$globals.HLReferences)});
  297. //>>excludeEnd("ctx");
  298. },
  299. //>>excludeStart("ide", pragmas.excludeIdeData);
  300. args: [],
  301. source: "regexpListWidget\x0a\x09^ regexpListWidget ifNil: [\x0a \x09regexpListWidget := HLRegexpListWidget on: self model.\x0a\x09\x09regexpListWidget next: self sourceCodeWidget ]",
  302. referencedClasses: ["HLRegexpListWidget"],
  303. //>>excludeEnd("ide");
  304. messageSends: ["ifNil:", "on:", "model", "next:", "sourceCodeWidget"]
  305. }),
  306. $globals.HLReferences);
  307. $core.addMethod(
  308. $core.method({
  309. selector: "registerBindingsOn:",
  310. protocol: "actions",
  311. fn: function (aBindingGroup){
  312. var self=this;
  313. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  314. return $core.withContext(function($ctx1) {
  315. //>>excludeEnd("ctx");
  316. $recv($globals.HLToolCommand)._registerConcreteClassesOn_for_(aBindingGroup,self._model());
  317. return self;
  318. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  319. }, function($ctx1) {$ctx1.fill(self,"registerBindingsOn:",{aBindingGroup:aBindingGroup},$globals.HLReferences)});
  320. //>>excludeEnd("ctx");
  321. },
  322. //>>excludeStart("ide", pragmas.excludeIdeData);
  323. args: ["aBindingGroup"],
  324. source: "registerBindingsOn: aBindingGroup\x0a\x09HLToolCommand \x0a\x09\x09registerConcreteClassesOn: aBindingGroup \x0a\x09\x09for: self model",
  325. referencedClasses: ["HLToolCommand"],
  326. //>>excludeEnd("ide");
  327. messageSends: ["registerConcreteClassesOn:for:", "model"]
  328. }),
  329. $globals.HLReferences);
  330. $core.addMethod(
  331. $core.method({
  332. selector: "renderContentOn:",
  333. protocol: "rendering",
  334. fn: function (html){
  335. var self=this;
  336. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  337. return $core.withContext(function($ctx1) {
  338. //>>excludeEnd("ctx");
  339. var $5,$4,$3,$2,$1;
  340. $5=self._sendersListWidget();
  341. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  342. $ctx1.sendIdx["sendersListWidget"]=1;
  343. //>>excludeEnd("ctx");
  344. $4=$recv($globals.HLVerticalSplitter)._with_with_($5,self._implementorsListWidget());
  345. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  346. $ctx1.sendIdx["with:with:"]=3;
  347. //>>excludeEnd("ctx");
  348. $3=$recv($globals.HLVerticalSplitter)._with_with_($4,$recv($globals.HLVerticalSplitter)._with_with_(self._classReferencesListWidget(),self._regexpListWidget()));
  349. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  350. $ctx1.sendIdx["with:with:"]=2;
  351. //>>excludeEnd("ctx");
  352. $2=$recv($globals.HLHorizontalSplitter)._with_with_($3,self._sourceCodeWidget());
  353. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  354. $ctx1.sendIdx["with:with:"]=1;
  355. //>>excludeEnd("ctx");
  356. $1=$recv($globals.HLContainer)._with_($2);
  357. $recv(html)._with_($1);
  358. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  359. $ctx1.sendIdx["with:"]=1;
  360. //>>excludeEnd("ctx");
  361. $recv(self._sendersListWidget())._focus();
  362. return self;
  363. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  364. }, function($ctx1) {$ctx1.fill(self,"renderContentOn:",{html:html},$globals.HLReferences)});
  365. //>>excludeEnd("ctx");
  366. },
  367. //>>excludeStart("ide", pragmas.excludeIdeData);
  368. args: ["html"],
  369. source: "renderContentOn: html\x0a\x09html with: (HLContainer with: (HLHorizontalSplitter \x0a \x09with: (HLVerticalSplitter\x0a \x09with: (HLVerticalSplitter\x0a \x09with: self sendersListWidget\x0a with: self implementorsListWidget)\x0a with: (HLVerticalSplitter\x0a \x09with: self classReferencesListWidget\x0a with: self regexpListWidget)) \x0a with: self sourceCodeWidget)).\x0a\x09\x0a\x09self sendersListWidget focus",
  370. referencedClasses: ["HLContainer", "HLHorizontalSplitter", "HLVerticalSplitter"],
  371. //>>excludeEnd("ide");
  372. messageSends: ["with:", "with:with:", "sendersListWidget", "implementorsListWidget", "classReferencesListWidget", "regexpListWidget", "sourceCodeWidget", "focus"]
  373. }),
  374. $globals.HLReferences);
  375. $core.addMethod(
  376. $core.method({
  377. selector: "search:",
  378. protocol: "actions",
  379. fn: function (aString){
  380. var self=this;
  381. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  382. return $core.withContext(function($ctx1) {
  383. //>>excludeEnd("ctx");
  384. $recv(self._model())._search_(aString);
  385. self._setTabLabel_(aString);
  386. return self;
  387. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  388. }, function($ctx1) {$ctx1.fill(self,"search:",{aString:aString},$globals.HLReferences)});
  389. //>>excludeEnd("ctx");
  390. },
  391. //>>excludeStart("ide", pragmas.excludeIdeData);
  392. args: ["aString"],
  393. source: "search: aString\x0a\x09self model search: aString.\x0a\x09self setTabLabel: aString",
  394. referencedClasses: [],
  395. //>>excludeEnd("ide");
  396. messageSends: ["search:", "model", "setTabLabel:"]
  397. }),
  398. $globals.HLReferences);
  399. $core.addMethod(
  400. $core.method({
  401. selector: "sendersListWidget",
  402. protocol: "accessing",
  403. fn: function (){
  404. var self=this;
  405. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  406. return $core.withContext(function($ctx1) {
  407. //>>excludeEnd("ctx");
  408. var $1,$receiver;
  409. $1=self["@sendersListWidget"];
  410. if(($receiver = $1) == null || $receiver.isNil){
  411. self["@sendersListWidget"]=$recv($globals.HLSendersListWidget)._on_(self._model());
  412. self["@sendersListWidget"];
  413. return $recv(self["@sendersListWidget"])._next_(self._implementorsListWidget());
  414. } else {
  415. return $1;
  416. }
  417. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  418. }, function($ctx1) {$ctx1.fill(self,"sendersListWidget",{},$globals.HLReferences)});
  419. //>>excludeEnd("ctx");
  420. },
  421. //>>excludeStart("ide", pragmas.excludeIdeData);
  422. args: [],
  423. source: "sendersListWidget\x0a\x09^ sendersListWidget ifNil: [\x0a \x09sendersListWidget := HLSendersListWidget on: self model.\x0a\x09\x09sendersListWidget next: self implementorsListWidget ]",
  424. referencedClasses: ["HLSendersListWidget"],
  425. //>>excludeEnd("ide");
  426. messageSends: ["ifNil:", "on:", "model", "next:", "implementorsListWidget"]
  427. }),
  428. $globals.HLReferences);
  429. $core.addMethod(
  430. $core.method({
  431. selector: "sourceCodeWidget",
  432. protocol: "accessing",
  433. fn: function (){
  434. var self=this;
  435. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  436. return $core.withContext(function($ctx1) {
  437. //>>excludeEnd("ctx");
  438. var $1,$2,$receiver;
  439. $1=self["@sourceCodeWidget"];
  440. if(($receiver = $1) == null || $receiver.isNil){
  441. $2=$recv($globals.HLBrowserCodeWidget)._new();
  442. $recv($2)._browserModel_(self._model());
  443. self["@sourceCodeWidget"]=$recv($2)._yourself();
  444. return self["@sourceCodeWidget"];
  445. } else {
  446. return $1;
  447. }
  448. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  449. }, function($ctx1) {$ctx1.fill(self,"sourceCodeWidget",{},$globals.HLReferences)});
  450. //>>excludeEnd("ctx");
  451. },
  452. //>>excludeStart("ide", pragmas.excludeIdeData);
  453. args: [],
  454. source: "sourceCodeWidget\x0a\x09^ sourceCodeWidget ifNil: [\x0a \x09sourceCodeWidget := HLBrowserCodeWidget new\x0a\x09\x09\x09browserModel: self model;\x0a\x09\x09\x09yourself ]",
  455. referencedClasses: ["HLBrowserCodeWidget"],
  456. //>>excludeEnd("ide");
  457. messageSends: ["ifNil:", "browserModel:", "new", "model", "yourself"]
  458. }),
  459. $globals.HLReferences);
  460. $core.addMethod(
  461. $core.method({
  462. selector: "canBeOpenAsTab",
  463. protocol: "testing",
  464. fn: function (){
  465. var self=this;
  466. return false;
  467. },
  468. //>>excludeStart("ide", pragmas.excludeIdeData);
  469. args: [],
  470. source: "canBeOpenAsTab\x0a\x09^ false",
  471. referencedClasses: [],
  472. //>>excludeEnd("ide");
  473. messageSends: []
  474. }),
  475. $globals.HLReferences.klass);
  476. $core.addMethod(
  477. $core.method({
  478. selector: "tabClass",
  479. protocol: "accessing",
  480. fn: function (){
  481. var self=this;
  482. return "references";
  483. },
  484. //>>excludeStart("ide", pragmas.excludeIdeData);
  485. args: [],
  486. source: "tabClass\x0a\x09^ 'references'",
  487. referencedClasses: [],
  488. //>>excludeEnd("ide");
  489. messageSends: []
  490. }),
  491. $globals.HLReferences.klass);
  492. $core.addMethod(
  493. $core.method({
  494. selector: "tabLabel",
  495. protocol: "accessing",
  496. fn: function (){
  497. var self=this;
  498. return "References";
  499. },
  500. //>>excludeStart("ide", pragmas.excludeIdeData);
  501. args: [],
  502. source: "tabLabel\x0a\x09^ 'References'",
  503. referencedClasses: [],
  504. //>>excludeEnd("ide");
  505. messageSends: []
  506. }),
  507. $globals.HLReferences.klass);
  508. $core.addMethod(
  509. $core.method({
  510. selector: "tabPriority",
  511. protocol: "accessing",
  512. fn: function (){
  513. var self=this;
  514. return (100);
  515. },
  516. //>>excludeStart("ide", pragmas.excludeIdeData);
  517. args: [],
  518. source: "tabPriority\x0a\x09^ 100",
  519. referencedClasses: [],
  520. //>>excludeEnd("ide");
  521. messageSends: []
  522. }),
  523. $globals.HLReferences.klass);
  524. $core.addClass("HLReferencesListWidget", $globals.HLToolListWidget, [], "Helios-References");
  525. $core.addMethod(
  526. $core.method({
  527. selector: "activateListItem:",
  528. protocol: "actions",
  529. fn: function (anItem){
  530. var self=this;
  531. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  532. return $core.withContext(function($ctx1) {
  533. //>>excludeEnd("ctx");
  534. $recv(self._model())._withChangesDo_((function(){
  535. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  536. return $core.withContext(function($ctx2) {
  537. //>>excludeEnd("ctx");
  538. return (
  539. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  540. $ctx2.supercall = true,
  541. //>>excludeEnd("ctx");
  542. ($globals.HLReferencesListWidget.superclass||$boot.nilAsClass).fn.prototype._activateListItem_.apply($recv(self), [anItem]));
  543. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  544. $ctx2.supercall = false;
  545. //>>excludeEnd("ctx");;
  546. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  547. }, function($ctx2) {$ctx2.fillBlock({},$ctx1,1)});
  548. //>>excludeEnd("ctx");
  549. }));
  550. return self;
  551. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  552. }, function($ctx1) {$ctx1.fill(self,"activateListItem:",{anItem:anItem},$globals.HLReferencesListWidget)});
  553. //>>excludeEnd("ctx");
  554. },
  555. //>>excludeStart("ide", pragmas.excludeIdeData);
  556. args: ["anItem"],
  557. source: "activateListItem: anItem\x0a\x09self model withChangesDo: [ super activateListItem: anItem ]",
  558. referencedClasses: [],
  559. //>>excludeEnd("ide");
  560. messageSends: ["withChangesDo:", "model", "activateListItem:"]
  561. }),
  562. $globals.HLReferencesListWidget);
  563. $core.addMethod(
  564. $core.method({
  565. selector: "commandCategory",
  566. protocol: "accessing",
  567. fn: function (){
  568. var self=this;
  569. return "Methods";
  570. },
  571. //>>excludeStart("ide", pragmas.excludeIdeData);
  572. args: [],
  573. source: "commandCategory\x0a\x09^ 'Methods'",
  574. referencedClasses: [],
  575. //>>excludeEnd("ide");
  576. messageSends: []
  577. }),
  578. $globals.HLReferencesListWidget);
  579. $core.addMethod(
  580. $core.method({
  581. selector: "label",
  582. protocol: "accessing",
  583. fn: function (){
  584. var self=this;
  585. return "List";
  586. },
  587. //>>excludeStart("ide", pragmas.excludeIdeData);
  588. args: [],
  589. source: "label\x0a\x09^ 'List'",
  590. referencedClasses: [],
  591. //>>excludeEnd("ide");
  592. messageSends: []
  593. }),
  594. $globals.HLReferencesListWidget);
  595. $core.addMethod(
  596. $core.method({
  597. selector: "observeModel",
  598. protocol: "actions",
  599. fn: function (){
  600. var self=this;
  601. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  602. return $core.withContext(function($ctx1) {
  603. //>>excludeEnd("ctx");
  604. var $1;
  605. $1=$recv(self._model())._announcer();
  606. $recv($1)._on_do_($globals.HLSearchReferences,(function(ann){
  607. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  608. return $core.withContext(function($ctx2) {
  609. //>>excludeEnd("ctx");
  610. return self._onSearchReferences_($recv(ann)._searchString());
  611. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  612. }, function($ctx2) {$ctx2.fillBlock({ann:ann},$ctx1,1)});
  613. //>>excludeEnd("ctx");
  614. }));
  615. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  616. $ctx1.sendIdx["on:do:"]=1;
  617. //>>excludeEnd("ctx");
  618. $recv($1)._on_do_($globals.HLMethodSelected,(function(ann){
  619. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  620. return $core.withContext(function($ctx2) {
  621. //>>excludeEnd("ctx");
  622. return self._onMethodSelected_($recv(ann)._item());
  623. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  624. }, function($ctx2) {$ctx2.fillBlock({ann:ann},$ctx1,2)});
  625. //>>excludeEnd("ctx");
  626. }));
  627. return self;
  628. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  629. }, function($ctx1) {$ctx1.fill(self,"observeModel",{},$globals.HLReferencesListWidget)});
  630. //>>excludeEnd("ctx");
  631. },
  632. //>>excludeStart("ide", pragmas.excludeIdeData);
  633. args: [],
  634. source: "observeModel\x0a\x09self model announcer\x0a\x09\x09on: HLSearchReferences\x0a\x09\x09do: [ :ann | self onSearchReferences: ann searchString ];\x0a\x09\x09on: HLMethodSelected\x0a\x09\x09do: [ :ann | self onMethodSelected: ann item ]",
  635. referencedClasses: ["HLSearchReferences", "HLMethodSelected"],
  636. //>>excludeEnd("ide");
  637. messageSends: ["on:do:", "announcer", "model", "onSearchReferences:", "searchString", "onMethodSelected:", "item"]
  638. }),
  639. $globals.HLReferencesListWidget);
  640. $core.addMethod(
  641. $core.method({
  642. selector: "onMethodSelected:",
  643. protocol: "reactions",
  644. fn: function (aMethod){
  645. var self=this;
  646. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  647. return $core.withContext(function($ctx1) {
  648. //>>excludeEnd("ctx");
  649. var $1,$2,$receiver;
  650. var $early={};
  651. try {
  652. if(($receiver = aMethod) == null || $receiver.isNil){
  653. return self;
  654. } else {
  655. aMethod;
  656. }
  657. $recv(self._items())._detect_ifNone_((function(each){
  658. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  659. return $core.withContext(function($ctx2) {
  660. //>>excludeEnd("ctx");
  661. $1=$recv(aMethod)._selector();
  662. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  663. $ctx2.sendIdx["selector"]=1;
  664. //>>excludeEnd("ctx");
  665. return $recv(each).__eq($1);
  666. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  667. }, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1,2)});
  668. //>>excludeEnd("ctx");
  669. }),(function(){
  670. throw $early=[self];
  671. }));
  672. $2=$recv(aMethod)._selector();
  673. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  674. $ctx1.sendIdx["selector"]=2;
  675. //>>excludeEnd("ctx");
  676. self._selectedItem_($2);
  677. self._activateItem_($recv(aMethod)._selector());
  678. return self;
  679. }
  680. catch(e) {if(e===$early)return e[0]; throw e}
  681. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  682. }, function($ctx1) {$ctx1.fill(self,"onMethodSelected:",{aMethod:aMethod},$globals.HLReferencesListWidget)});
  683. //>>excludeEnd("ctx");
  684. },
  685. //>>excludeStart("ide", pragmas.excludeIdeData);
  686. args: ["aMethod"],
  687. source: "onMethodSelected: aMethod\x0a\x09aMethod ifNil: [ ^ self ].\x0a\x09self items detect: [ :each | each = aMethod selector ] ifNone: [ ^ self ].\x0a\x09\x0a\x09self \x0a\x09\x09selectedItem: aMethod selector;\x0a\x09\x09activateItem: aMethod selector",
  688. referencedClasses: [],
  689. //>>excludeEnd("ide");
  690. messageSends: ["ifNil:", "detect:ifNone:", "items", "=", "selector", "selectedItem:", "activateItem:"]
  691. }),
  692. $globals.HLReferencesListWidget);
  693. $core.addMethod(
  694. $core.method({
  695. selector: "onSearchReferences:",
  696. protocol: "reactions",
  697. fn: function (aString){
  698. var self=this;
  699. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  700. return $core.withContext(function($ctx1) {
  701. //>>excludeEnd("ctx");
  702. self._subclassResponsibility();
  703. return self;
  704. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  705. }, function($ctx1) {$ctx1.fill(self,"onSearchReferences:",{aString:aString},$globals.HLReferencesListWidget)});
  706. //>>excludeEnd("ctx");
  707. },
  708. //>>excludeStart("ide", pragmas.excludeIdeData);
  709. args: ["aString"],
  710. source: "onSearchReferences: aString\x0a\x09self subclassResponsibility",
  711. referencedClasses: [],
  712. //>>excludeEnd("ide");
  713. messageSends: ["subclassResponsibility"]
  714. }),
  715. $globals.HLReferencesListWidget);
  716. $core.addMethod(
  717. $core.method({
  718. selector: "renderItemLabel:on:",
  719. protocol: "rendering",
  720. fn: function (aMethod,html){
  721. var self=this;
  722. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  723. return $core.withContext(function($ctx1) {
  724. //>>excludeEnd("ctx");
  725. var $1;
  726. $1=$recv($recv($recv($recv(aMethod)._methodClass())._name()).__comma(" >> #")).__comma($recv(aMethod)._selector());
  727. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  728. $ctx1.sendIdx[","]=1;
  729. //>>excludeEnd("ctx");
  730. $recv(html)._with_($1);
  731. return self;
  732. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  733. }, function($ctx1) {$ctx1.fill(self,"renderItemLabel:on:",{aMethod:aMethod,html:html},$globals.HLReferencesListWidget)});
  734. //>>excludeEnd("ctx");
  735. },
  736. //>>excludeStart("ide", pragmas.excludeIdeData);
  737. args: ["aMethod", "html"],
  738. source: "renderItemLabel: aMethod on: html\x0a\x09html with: aMethod methodClass name, ' >> #', aMethod selector",
  739. referencedClasses: [],
  740. //>>excludeEnd("ide");
  741. messageSends: ["with:", ",", "name", "methodClass", "selector"]
  742. }),
  743. $globals.HLReferencesListWidget);
  744. $core.addMethod(
  745. $core.method({
  746. selector: "selectItem:",
  747. protocol: "actions",
  748. fn: function (aMethod){
  749. var self=this;
  750. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  751. return $core.withContext(function($ctx1) {
  752. //>>excludeEnd("ctx");
  753. var $1;
  754. (
  755. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  756. $ctx1.supercall = true,
  757. //>>excludeEnd("ctx");
  758. ($globals.HLReferencesListWidget.superclass||$boot.nilAsClass).fn.prototype._selectItem_.apply($recv(self), [aMethod]));
  759. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  760. $ctx1.supercall = false;
  761. //>>excludeEnd("ctx");;
  762. $1=self._model();
  763. $recv($1)._selectedClass_(nil);
  764. $recv($1)._selectedMethod_(aMethod);
  765. return self;
  766. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  767. }, function($ctx1) {$ctx1.fill(self,"selectItem:",{aMethod:aMethod},$globals.HLReferencesListWidget)});
  768. //>>excludeEnd("ctx");
  769. },
  770. //>>excludeStart("ide", pragmas.excludeIdeData);
  771. args: ["aMethod"],
  772. source: "selectItem: aMethod\x0a\x09super selectItem: aMethod.\x0a\x09self model selectedClass: nil; selectedMethod: aMethod",
  773. referencedClasses: [],
  774. //>>excludeEnd("ide");
  775. messageSends: ["selectItem:", "selectedClass:", "model", "selectedMethod:"]
  776. }),
  777. $globals.HLReferencesListWidget);
  778. $core.addMethod(
  779. $core.method({
  780. selector: "on:",
  781. protocol: "instance creation",
  782. fn: function (aModel){
  783. var self=this;
  784. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  785. return $core.withContext(function($ctx1) {
  786. //>>excludeEnd("ctx");
  787. var $1;
  788. $1=self._new();
  789. $recv($1)._model_(aModel);
  790. return $recv($1)._yourself();
  791. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  792. }, function($ctx1) {$ctx1.fill(self,"on:",{aModel:aModel},$globals.HLReferencesListWidget.klass)});
  793. //>>excludeEnd("ctx");
  794. },
  795. //>>excludeStart("ide", pragmas.excludeIdeData);
  796. args: ["aModel"],
  797. source: "on: aModel\x0a\x09^ self new \x0a\x09\x09model: aModel; \x0a\x09\x09yourself",
  798. referencedClasses: [],
  799. //>>excludeEnd("ide");
  800. messageSends: ["model:", "new", "yourself"]
  801. }),
  802. $globals.HLReferencesListWidget.klass);
  803. $core.addClass("HLClassReferencesListWidget", $globals.HLReferencesListWidget, [], "Helios-References");
  804. $core.addMethod(
  805. $core.method({
  806. selector: "label",
  807. protocol: "accessing",
  808. fn: function (){
  809. var self=this;
  810. return "Class references";
  811. },
  812. //>>excludeStart("ide", pragmas.excludeIdeData);
  813. args: [],
  814. source: "label\x0a\x09^ 'Class references'",
  815. referencedClasses: [],
  816. //>>excludeEnd("ide");
  817. messageSends: []
  818. }),
  819. $globals.HLClassReferencesListWidget);
  820. $core.addMethod(
  821. $core.method({
  822. selector: "onSearchReferences:",
  823. protocol: "reactions",
  824. fn: function (aString){
  825. var self=this;
  826. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  827. return $core.withContext(function($ctx1) {
  828. //>>excludeEnd("ctx");
  829. self._selectItem_(nil);
  830. self._items_($recv(self._model())._classReferencesOf_(aString));
  831. self._refresh();
  832. return self;
  833. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  834. }, function($ctx1) {$ctx1.fill(self,"onSearchReferences:",{aString:aString},$globals.HLClassReferencesListWidget)});
  835. //>>excludeEnd("ctx");
  836. },
  837. //>>excludeStart("ide", pragmas.excludeIdeData);
  838. args: ["aString"],
  839. source: "onSearchReferences: aString\x0a\x09self selectItem: nil.\x0a\x09self items: (self model classReferencesOf: aString).\x0a\x09self refresh",
  840. referencedClasses: [],
  841. //>>excludeEnd("ide");
  842. messageSends: ["selectItem:", "items:", "classReferencesOf:", "model", "refresh"]
  843. }),
  844. $globals.HLClassReferencesListWidget);
  845. $core.addClass("HLImplementorsListWidget", $globals.HLReferencesListWidget, [], "Helios-References");
  846. $core.addMethod(
  847. $core.method({
  848. selector: "label",
  849. protocol: "accessing",
  850. fn: function (){
  851. var self=this;
  852. return "Implementors";
  853. },
  854. //>>excludeStart("ide", pragmas.excludeIdeData);
  855. args: [],
  856. source: "label\x0a\x09^ 'Implementors'",
  857. referencedClasses: [],
  858. //>>excludeEnd("ide");
  859. messageSends: []
  860. }),
  861. $globals.HLImplementorsListWidget);
  862. $core.addMethod(
  863. $core.method({
  864. selector: "onSearchReferences:",
  865. protocol: "reactions",
  866. fn: function (aString){
  867. var self=this;
  868. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  869. return $core.withContext(function($ctx1) {
  870. //>>excludeEnd("ctx");
  871. self._selectItem_(nil);
  872. self._items_($recv(self._model())._implementorsOf_(aString));
  873. self._refresh();
  874. return self;
  875. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  876. }, function($ctx1) {$ctx1.fill(self,"onSearchReferences:",{aString:aString},$globals.HLImplementorsListWidget)});
  877. //>>excludeEnd("ctx");
  878. },
  879. //>>excludeStart("ide", pragmas.excludeIdeData);
  880. args: ["aString"],
  881. source: "onSearchReferences: aString\x0a\x09self selectItem: nil.\x0a\x09self items: (self model implementorsOf: aString).\x0a\x09self refresh",
  882. referencedClasses: [],
  883. //>>excludeEnd("ide");
  884. messageSends: ["selectItem:", "items:", "implementorsOf:", "model", "refresh"]
  885. }),
  886. $globals.HLImplementorsListWidget);
  887. $core.addClass("HLRegexpListWidget", $globals.HLReferencesListWidget, [], "Helios-References");
  888. $core.addMethod(
  889. $core.method({
  890. selector: "label",
  891. protocol: "accessing",
  892. fn: function (){
  893. var self=this;
  894. return "Source search";
  895. },
  896. //>>excludeStart("ide", pragmas.excludeIdeData);
  897. args: [],
  898. source: "label\x0a\x09^ 'Source search'",
  899. referencedClasses: [],
  900. //>>excludeEnd("ide");
  901. messageSends: []
  902. }),
  903. $globals.HLRegexpListWidget);
  904. $core.addMethod(
  905. $core.method({
  906. selector: "onSearchReferences:",
  907. protocol: "reactions",
  908. fn: function (aString){
  909. var self=this;
  910. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  911. return $core.withContext(function($ctx1) {
  912. //>>excludeEnd("ctx");
  913. self._selectItem_(nil);
  914. self._items_($recv(self._model())._regexpReferencesOf_(aString));
  915. self._refresh();
  916. return self;
  917. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  918. }, function($ctx1) {$ctx1.fill(self,"onSearchReferences:",{aString:aString},$globals.HLRegexpListWidget)});
  919. //>>excludeEnd("ctx");
  920. },
  921. //>>excludeStart("ide", pragmas.excludeIdeData);
  922. args: ["aString"],
  923. source: "onSearchReferences: aString\x0a\x09self selectItem: nil.\x0a\x09self items: (self model regexpReferencesOf: aString).\x0a\x09self refresh",
  924. referencedClasses: [],
  925. //>>excludeEnd("ide");
  926. messageSends: ["selectItem:", "items:", "regexpReferencesOf:", "model", "refresh"]
  927. }),
  928. $globals.HLRegexpListWidget);
  929. $core.addClass("HLSendersListWidget", $globals.HLReferencesListWidget, [], "Helios-References");
  930. $core.addMethod(
  931. $core.method({
  932. selector: "label",
  933. protocol: "accessing",
  934. fn: function (){
  935. var self=this;
  936. return "Senders";
  937. },
  938. //>>excludeStart("ide", pragmas.excludeIdeData);
  939. args: [],
  940. source: "label\x0a\x09^ 'Senders'",
  941. referencedClasses: [],
  942. //>>excludeEnd("ide");
  943. messageSends: []
  944. }),
  945. $globals.HLSendersListWidget);
  946. $core.addMethod(
  947. $core.method({
  948. selector: "onSearchReferences:",
  949. protocol: "reactions",
  950. fn: function (aString){
  951. var self=this;
  952. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  953. return $core.withContext(function($ctx1) {
  954. //>>excludeEnd("ctx");
  955. self._selectItem_(nil);
  956. self._items_($recv(self._model())._sendersOf_(aString));
  957. self._refresh();
  958. return self;
  959. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  960. }, function($ctx1) {$ctx1.fill(self,"onSearchReferences:",{aString:aString},$globals.HLSendersListWidget)});
  961. //>>excludeEnd("ctx");
  962. },
  963. //>>excludeStart("ide", pragmas.excludeIdeData);
  964. args: ["aString"],
  965. source: "onSearchReferences: aString\x0a\x09self selectItem: nil.\x0a\x09self items: (self model sendersOf: aString).\x0a\x09self refresh",
  966. referencedClasses: [],
  967. //>>excludeEnd("ide");
  968. messageSends: ["selectItem:", "items:", "sendersOf:", "model", "refresh"]
  969. }),
  970. $globals.HLSendersListWidget);
  971. $core.addClass("HLReferencesModel", $globals.HLToolModel, ["methodsCache", "classesAndMetaclassesCache"], "Helios-References");
  972. $core.addMethod(
  973. $core.method({
  974. selector: "allMethods",
  975. protocol: "accessing",
  976. fn: function (){
  977. var self=this;
  978. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  979. return $core.withContext(function($ctx1) {
  980. //>>excludeEnd("ctx");
  981. return self._methodsCache();
  982. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  983. }, function($ctx1) {$ctx1.fill(self,"allMethods",{},$globals.HLReferencesModel)});
  984. //>>excludeEnd("ctx");
  985. },
  986. //>>excludeStart("ide", pragmas.excludeIdeData);
  987. args: [],
  988. source: "allMethods\x0a\x09^ self methodsCache",
  989. referencedClasses: [],
  990. //>>excludeEnd("ide");
  991. messageSends: ["methodsCache"]
  992. }),
  993. $globals.HLReferencesModel);
  994. $core.addMethod(
  995. $core.method({
  996. selector: "classReferencesOf:",
  997. protocol: "accessing",
  998. fn: function (aString){
  999. var self=this;
  1000. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1001. return $core.withContext(function($ctx1) {
  1002. //>>excludeEnd("ctx");
  1003. return $recv(self._allMethods())._select_((function(each){
  1004. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1005. return $core.withContext(function($ctx2) {
  1006. //>>excludeEnd("ctx");
  1007. return $recv($recv(each)._referencedClasses())._includes_(aString);
  1008. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1009. }, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1,1)});
  1010. //>>excludeEnd("ctx");
  1011. }));
  1012. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1013. }, function($ctx1) {$ctx1.fill(self,"classReferencesOf:",{aString:aString},$globals.HLReferencesModel)});
  1014. //>>excludeEnd("ctx");
  1015. },
  1016. //>>excludeStart("ide", pragmas.excludeIdeData);
  1017. args: ["aString"],
  1018. source: "classReferencesOf: aString\x0a\x09\x22Answer all methods referencing the class named aString\x22\x0a\x09\x0a\x09^self allMethods select: [ :each |\x0a\x09\x09\x09(each referencedClasses includes: aString) ].",
  1019. referencedClasses: [],
  1020. //>>excludeEnd("ide");
  1021. messageSends: ["select:", "allMethods", "includes:", "referencedClasses"]
  1022. }),
  1023. $globals.HLReferencesModel);
  1024. $core.addMethod(
  1025. $core.method({
  1026. selector: "classesAndMetaclasses",
  1027. protocol: "accessing",
  1028. fn: function (){
  1029. var self=this;
  1030. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1031. return $core.withContext(function($ctx1) {
  1032. //>>excludeEnd("ctx");
  1033. return self._classesAndMetaclassesCache();
  1034. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1035. }, function($ctx1) {$ctx1.fill(self,"classesAndMetaclasses",{},$globals.HLReferencesModel)});
  1036. //>>excludeEnd("ctx");
  1037. },
  1038. //>>excludeStart("ide", pragmas.excludeIdeData);
  1039. args: [],
  1040. source: "classesAndMetaclasses\x0a\x09^ self classesAndMetaclassesCache",
  1041. referencedClasses: [],
  1042. //>>excludeEnd("ide");
  1043. messageSends: ["classesAndMetaclassesCache"]
  1044. }),
  1045. $globals.HLReferencesModel);
  1046. $core.addMethod(
  1047. $core.method({
  1048. selector: "classesAndMetaclassesCache",
  1049. protocol: "cache",
  1050. fn: function (){
  1051. var self=this;
  1052. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1053. return $core.withContext(function($ctx1) {
  1054. //>>excludeEnd("ctx");
  1055. var $1,$receiver;
  1056. $1=self["@classesAndMetaclassesCache"];
  1057. if(($receiver = $1) == null || $receiver.isNil){
  1058. self._updateClassesAndMetaclassesCache();
  1059. } else {
  1060. $1;
  1061. }
  1062. return self["@classesAndMetaclassesCache"];
  1063. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1064. }, function($ctx1) {$ctx1.fill(self,"classesAndMetaclassesCache",{},$globals.HLReferencesModel)});
  1065. //>>excludeEnd("ctx");
  1066. },
  1067. //>>excludeStart("ide", pragmas.excludeIdeData);
  1068. args: [],
  1069. source: "classesAndMetaclassesCache\x0a\x09classesAndMetaclassesCache ifNil: [ self updateClassesAndMetaclassesCache ].\x0a\x09^ classesAndMetaclassesCache",
  1070. referencedClasses: [],
  1071. //>>excludeEnd("ide");
  1072. messageSends: ["ifNil:", "updateClassesAndMetaclassesCache"]
  1073. }),
  1074. $globals.HLReferencesModel);
  1075. $core.addMethod(
  1076. $core.method({
  1077. selector: "implementorsOf:",
  1078. protocol: "accessing",
  1079. fn: function (aString){
  1080. var self=this;
  1081. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1082. return $core.withContext(function($ctx1) {
  1083. //>>excludeEnd("ctx");
  1084. return $recv($recv(self._allMethods())._select_((function(each){
  1085. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1086. return $core.withContext(function($ctx2) {
  1087. //>>excludeEnd("ctx");
  1088. return $recv($recv(each)._selector()).__eq(aString);
  1089. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1090. }, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1,1)});
  1091. //>>excludeEnd("ctx");
  1092. })))._collect_((function(each){
  1093. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1094. return $core.withContext(function($ctx2) {
  1095. //>>excludeEnd("ctx");
  1096. return self._methodReferenceOn_(each);
  1097. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1098. }, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1,2)});
  1099. //>>excludeEnd("ctx");
  1100. }));
  1101. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1102. }, function($ctx1) {$ctx1.fill(self,"implementorsOf:",{aString:aString},$globals.HLReferencesModel)});
  1103. //>>excludeEnd("ctx");
  1104. },
  1105. //>>excludeStart("ide", pragmas.excludeIdeData);
  1106. args: ["aString"],
  1107. source: "implementorsOf: aString\x0a\x09^ (self allMethods select: [ :each |\x0a\x09\x09each selector = aString ])\x0a\x09\x09\x09collect: [ :each | self methodReferenceOn: each ]",
  1108. referencedClasses: [],
  1109. //>>excludeEnd("ide");
  1110. messageSends: ["collect:", "select:", "allMethods", "=", "selector", "methodReferenceOn:"]
  1111. }),
  1112. $globals.HLReferencesModel);
  1113. $core.addMethod(
  1114. $core.method({
  1115. selector: "isReferencesModel",
  1116. protocol: "testing",
  1117. fn: function (){
  1118. var self=this;
  1119. return true;
  1120. },
  1121. //>>excludeStart("ide", pragmas.excludeIdeData);
  1122. args: [],
  1123. source: "isReferencesModel\x0a\x09^ true",
  1124. referencedClasses: [],
  1125. //>>excludeEnd("ide");
  1126. messageSends: []
  1127. }),
  1128. $globals.HLReferencesModel);
  1129. $core.addMethod(
  1130. $core.method({
  1131. selector: "methodReferenceOn:",
  1132. protocol: "accessing",
  1133. fn: function (aCompiledMethod){
  1134. var self=this;
  1135. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1136. return $core.withContext(function($ctx1) {
  1137. //>>excludeEnd("ctx");
  1138. return $recv($globals.HLMethodReference)._on_(aCompiledMethod);
  1139. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1140. }, function($ctx1) {$ctx1.fill(self,"methodReferenceOn:",{aCompiledMethod:aCompiledMethod},$globals.HLReferencesModel)});
  1141. //>>excludeEnd("ctx");
  1142. },
  1143. //>>excludeStart("ide", pragmas.excludeIdeData);
  1144. args: ["aCompiledMethod"],
  1145. source: "methodReferenceOn: aCompiledMethod\x0a\x09^ HLMethodReference on: aCompiledMethod",
  1146. referencedClasses: ["HLMethodReference"],
  1147. //>>excludeEnd("ide");
  1148. messageSends: ["on:"]
  1149. }),
  1150. $globals.HLReferencesModel);
  1151. $core.addMethod(
  1152. $core.method({
  1153. selector: "methodsCache",
  1154. protocol: "cache",
  1155. fn: function (){
  1156. var self=this;
  1157. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1158. return $core.withContext(function($ctx1) {
  1159. //>>excludeEnd("ctx");
  1160. var $1,$receiver;
  1161. $1=self["@methodsCache"];
  1162. if(($receiver = $1) == null || $receiver.isNil){
  1163. self._updateMethodsCache();
  1164. } else {
  1165. $1;
  1166. }
  1167. return self["@methodsCache"];
  1168. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1169. }, function($ctx1) {$ctx1.fill(self,"methodsCache",{},$globals.HLReferencesModel)});
  1170. //>>excludeEnd("ctx");
  1171. },
  1172. //>>excludeStart("ide", pragmas.excludeIdeData);
  1173. args: [],
  1174. source: "methodsCache\x0a\x09methodsCache ifNil: [ self updateMethodsCache ].\x0a\x09^ methodsCache",
  1175. referencedClasses: [],
  1176. //>>excludeEnd("ide");
  1177. messageSends: ["ifNil:", "updateMethodsCache"]
  1178. }),
  1179. $globals.HLReferencesModel);
  1180. $core.addMethod(
  1181. $core.method({
  1182. selector: "openClassNamed:",
  1183. protocol: "actions",
  1184. fn: function (aString){
  1185. var self=this;
  1186. var browser;
  1187. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1188. return $core.withContext(function($ctx1) {
  1189. //>>excludeEnd("ctx");
  1190. self._withChangesDo_((function(){
  1191. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1192. return $core.withContext(function($ctx2) {
  1193. //>>excludeEnd("ctx");
  1194. browser=$recv($globals.HLBrowser)._openAsTab();
  1195. browser;
  1196. return $recv(browser)._openClassNamed_(aString);
  1197. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1198. }, function($ctx2) {$ctx2.fillBlock({},$ctx1,1)});
  1199. //>>excludeEnd("ctx");
  1200. }));
  1201. return self;
  1202. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1203. }, function($ctx1) {$ctx1.fill(self,"openClassNamed:",{aString:aString,browser:browser},$globals.HLReferencesModel)});
  1204. //>>excludeEnd("ctx");
  1205. },
  1206. //>>excludeStart("ide", pragmas.excludeIdeData);
  1207. args: ["aString"],
  1208. source: "openClassNamed: aString\x0a\x09| browser |\x0a\x09\x0a\x09self withChangesDo: [\x0a\x09\x09browser := HLBrowser openAsTab.\x0a\x09\x09browser openClassNamed: aString ]",
  1209. referencedClasses: ["HLBrowser"],
  1210. //>>excludeEnd("ide");
  1211. messageSends: ["withChangesDo:", "openAsTab", "openClassNamed:"]
  1212. }),
  1213. $globals.HLReferencesModel);
  1214. $core.addMethod(
  1215. $core.method({
  1216. selector: "openMethod",
  1217. protocol: "actions",
  1218. fn: function (){
  1219. var self=this;
  1220. var browser;
  1221. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1222. return $core.withContext(function($ctx1) {
  1223. //>>excludeEnd("ctx");
  1224. var $1,$receiver;
  1225. $1=self._selectedMethod();
  1226. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1227. $ctx1.sendIdx["selectedMethod"]=1;
  1228. //>>excludeEnd("ctx");
  1229. if(($receiver = $1) == null || $receiver.isNil){
  1230. return self;
  1231. } else {
  1232. $1;
  1233. }
  1234. self._withChangesDo_((function(){
  1235. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1236. return $core.withContext(function($ctx2) {
  1237. //>>excludeEnd("ctx");
  1238. browser=$recv($globals.HLBrowser)._openAsTab();
  1239. browser;
  1240. return $recv(browser)._openMethod_(self._selectedMethod());
  1241. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1242. }, function($ctx2) {$ctx2.fillBlock({},$ctx1,2)});
  1243. //>>excludeEnd("ctx");
  1244. }));
  1245. return self;
  1246. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1247. }, function($ctx1) {$ctx1.fill(self,"openMethod",{browser:browser},$globals.HLReferencesModel)});
  1248. //>>excludeEnd("ctx");
  1249. },
  1250. //>>excludeStart("ide", pragmas.excludeIdeData);
  1251. args: [],
  1252. source: "openMethod\x0a\x09| browser |\x0a\x09\x0a\x09self selectedMethod ifNil: [ ^ self ].\x0a\x09\x0a\x09self withChangesDo: [\x0a\x09\x09browser := HLBrowser openAsTab.\x0a\x09\x09browser openMethod: self selectedMethod ]",
  1253. referencedClasses: ["HLBrowser"],
  1254. //>>excludeEnd("ide");
  1255. messageSends: ["ifNil:", "selectedMethod", "withChangesDo:", "openAsTab", "openMethod:"]
  1256. }),
  1257. $globals.HLReferencesModel);
  1258. $core.addMethod(
  1259. $core.method({
  1260. selector: "regexpReferencesOf:",
  1261. protocol: "accessing",
  1262. fn: function (aString){
  1263. var self=this;
  1264. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1265. return $core.withContext(function($ctx1) {
  1266. //>>excludeEnd("ctx");
  1267. return $recv($recv(self._allMethods())._select_((function(each){
  1268. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1269. return $core.withContext(function($ctx2) {
  1270. //>>excludeEnd("ctx");
  1271. return $recv($recv(each)._source())._match_(aString);
  1272. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1273. }, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1,1)});
  1274. //>>excludeEnd("ctx");
  1275. })))._collect_((function(each){
  1276. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1277. return $core.withContext(function($ctx2) {
  1278. //>>excludeEnd("ctx");
  1279. return self._methodReferenceOn_(each);
  1280. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1281. }, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1,2)});
  1282. //>>excludeEnd("ctx");
  1283. }));
  1284. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1285. }, function($ctx1) {$ctx1.fill(self,"regexpReferencesOf:",{aString:aString},$globals.HLReferencesModel)});
  1286. //>>excludeEnd("ctx");
  1287. },
  1288. //>>excludeStart("ide", pragmas.excludeIdeData);
  1289. args: ["aString"],
  1290. source: "regexpReferencesOf: aString\x0a\x09^ (self allMethods select: [ :each |\x0a\x09\x09each source match: aString ])\x0a\x09\x09\x09collect: [ :each | self methodReferenceOn: each ]",
  1291. referencedClasses: [],
  1292. //>>excludeEnd("ide");
  1293. messageSends: ["collect:", "select:", "allMethods", "match:", "source", "methodReferenceOn:"]
  1294. }),
  1295. $globals.HLReferencesModel);
  1296. $core.addMethod(
  1297. $core.method({
  1298. selector: "search:",
  1299. protocol: "actions",
  1300. fn: function (aString){
  1301. var self=this;
  1302. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1303. return $core.withContext(function($ctx1) {
  1304. //>>excludeEnd("ctx");
  1305. var $1,$3,$2;
  1306. self._updateCaches();
  1307. $1=self._announcer();
  1308. $3=$recv($globals.HLSearchReferences)._new();
  1309. $recv($3)._searchString_(aString);
  1310. $2=$recv($3)._yourself();
  1311. $recv($1)._announce_($2);
  1312. return self;
  1313. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1314. }, function($ctx1) {$ctx1.fill(self,"search:",{aString:aString},$globals.HLReferencesModel)});
  1315. //>>excludeEnd("ctx");
  1316. },
  1317. //>>excludeStart("ide", pragmas.excludeIdeData);
  1318. args: ["aString"],
  1319. source: "search: aString\x0a\x09self updateCaches.\x0a\x09\x0a\x09self announcer announce: (HLSearchReferences new\x0a\x09\x09searchString: aString;\x0a\x09\x09yourself)",
  1320. referencedClasses: ["HLSearchReferences"],
  1321. //>>excludeEnd("ide");
  1322. messageSends: ["updateCaches", "announce:", "announcer", "searchString:", "new", "yourself"]
  1323. }),
  1324. $globals.HLReferencesModel);
  1325. $core.addMethod(
  1326. $core.method({
  1327. selector: "sendersOf:",
  1328. protocol: "accessing",
  1329. fn: function (aString){
  1330. var self=this;
  1331. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1332. return $core.withContext(function($ctx1) {
  1333. //>>excludeEnd("ctx");
  1334. return $recv($recv(self._allMethods())._select_((function(each){
  1335. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1336. return $core.withContext(function($ctx2) {
  1337. //>>excludeEnd("ctx");
  1338. return $recv($recv(each)._messageSends())._includes_(aString);
  1339. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1340. }, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1,1)});
  1341. //>>excludeEnd("ctx");
  1342. })))._collect_((function(each){
  1343. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1344. return $core.withContext(function($ctx2) {
  1345. //>>excludeEnd("ctx");
  1346. return self._methodReferenceOn_(each);
  1347. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1348. }, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1,2)});
  1349. //>>excludeEnd("ctx");
  1350. }));
  1351. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1352. }, function($ctx1) {$ctx1.fill(self,"sendersOf:",{aString:aString},$globals.HLReferencesModel)});
  1353. //>>excludeEnd("ctx");
  1354. },
  1355. //>>excludeStart("ide", pragmas.excludeIdeData);
  1356. args: ["aString"],
  1357. source: "sendersOf: aString\x0a\x09^ (self allMethods select: [ :each |\x0a\x09\x09each messageSends includes: aString ])\x0a\x09\x09\x09collect: [ :each | self methodReferenceOn: each ]",
  1358. referencedClasses: [],
  1359. //>>excludeEnd("ide");
  1360. messageSends: ["collect:", "select:", "allMethods", "includes:", "messageSends", "methodReferenceOn:"]
  1361. }),
  1362. $globals.HLReferencesModel);
  1363. $core.addMethod(
  1364. $core.method({
  1365. selector: "updateCaches",
  1366. protocol: "cache",
  1367. fn: function (){
  1368. var self=this;
  1369. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1370. return $core.withContext(function($ctx1) {
  1371. //>>excludeEnd("ctx");
  1372. self._updateClassesAndMetaclassesCache();
  1373. self._updateMethodsCache();
  1374. return self;
  1375. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1376. }, function($ctx1) {$ctx1.fill(self,"updateCaches",{},$globals.HLReferencesModel)});
  1377. //>>excludeEnd("ctx");
  1378. },
  1379. //>>excludeStart("ide", pragmas.excludeIdeData);
  1380. args: [],
  1381. source: "updateCaches\x0a\x09self \x0a\x09\x09updateClassesAndMetaclassesCache;\x0a\x09\x09updateMethodsCache",
  1382. referencedClasses: [],
  1383. //>>excludeEnd("ide");
  1384. messageSends: ["updateClassesAndMetaclassesCache", "updateMethodsCache"]
  1385. }),
  1386. $globals.HLReferencesModel);
  1387. $core.addMethod(
  1388. $core.method({
  1389. selector: "updateClassesAndMetaclassesCache",
  1390. protocol: "cache",
  1391. fn: function (){
  1392. var self=this;
  1393. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1394. return $core.withContext(function($ctx1) {
  1395. //>>excludeEnd("ctx");
  1396. var $1,$receiver;
  1397. self["@classesAndMetaclassesCache"]=$recv($globals.OrderedCollection)._new();
  1398. $recv($recv(self._environment())._classes())._do_((function(each){
  1399. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1400. return $core.withContext(function($ctx2) {
  1401. //>>excludeEnd("ctx");
  1402. $recv(self["@classesAndMetaclassesCache"])._add_(each);
  1403. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1404. $ctx2.sendIdx["add:"]=1;
  1405. //>>excludeEnd("ctx");
  1406. $1=$recv(each)._theMetaClass();
  1407. if(($receiver = $1) == null || $receiver.isNil){
  1408. return $1;
  1409. } else {
  1410. var meta;
  1411. meta=$receiver;
  1412. return $recv(self["@classesAndMetaclassesCache"])._add_(meta);
  1413. }
  1414. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1415. }, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1,1)});
  1416. //>>excludeEnd("ctx");
  1417. }));
  1418. return self;
  1419. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1420. }, function($ctx1) {$ctx1.fill(self,"updateClassesAndMetaclassesCache",{},$globals.HLReferencesModel)});
  1421. //>>excludeEnd("ctx");
  1422. },
  1423. //>>excludeStart("ide", pragmas.excludeIdeData);
  1424. args: [],
  1425. source: "updateClassesAndMetaclassesCache\x0a\x09classesAndMetaclassesCache := OrderedCollection new.\x0a\x09\x0a\x09self environment classes do: [ :each |\x0a\x09\x09classesAndMetaclassesCache add: each.\x0a\x09\x09each theMetaClass ifNotNil: [ :meta | classesAndMetaclassesCache add: meta ] ]",
  1426. referencedClasses: ["OrderedCollection"],
  1427. //>>excludeEnd("ide");
  1428. messageSends: ["new", "do:", "classes", "environment", "add:", "ifNotNil:", "theMetaClass"]
  1429. }),
  1430. $globals.HLReferencesModel);
  1431. $core.addMethod(
  1432. $core.method({
  1433. selector: "updateMethodsCache",
  1434. protocol: "cache",
  1435. fn: function (){
  1436. var self=this;
  1437. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1438. return $core.withContext(function($ctx1) {
  1439. //>>excludeEnd("ctx");
  1440. self["@methodsCache"]=$recv($globals.OrderedCollection)._new();
  1441. $recv(self._classesAndMetaclasses())._do_((function(each){
  1442. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1443. return $core.withContext(function($ctx2) {
  1444. //>>excludeEnd("ctx");
  1445. return $recv(self["@methodsCache"])._addAll_($recv(each)._methods());
  1446. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1447. }, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1,1)});
  1448. //>>excludeEnd("ctx");
  1449. }));
  1450. return self;
  1451. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1452. }, function($ctx1) {$ctx1.fill(self,"updateMethodsCache",{},$globals.HLReferencesModel)});
  1453. //>>excludeEnd("ctx");
  1454. },
  1455. //>>excludeStart("ide", pragmas.excludeIdeData);
  1456. args: [],
  1457. source: "updateMethodsCache\x0a\x09methodsCache := OrderedCollection new.\x0a\x09\x0a\x09self classesAndMetaclasses\x0a\x09\x09do: [ :each | methodsCache addAll: each methods ]",
  1458. referencedClasses: ["OrderedCollection"],
  1459. //>>excludeEnd("ide");
  1460. messageSends: ["new", "do:", "classesAndMetaclasses", "addAll:", "methods"]
  1461. }),
  1462. $globals.HLReferencesModel);
  1463. });