Helios-References.js 52 KB

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