Helios-References.js 52 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091929394959697989910010110210310410510610710810911011111211311411511611711811912012112212312412512612712812913013113213313413513613713813914014114214314414514614714814915015115215315415515615715815916016116216316416516616716816917017117217317417517617717817918018118218318418518618718818919019119219319419519619719819920020120220320420520620720820921021121221321421521621721821922022122222322422522622722822923023123223323423523623723823924024124224324424524624724824925025125225325425525625725825926026126226326426526626726826927027127227327427527627727827928028128228328428528628728828929029129229329429529629729829930030130230330430530630730830931031131231331431531631731831932032132232332432532632732832933033133233333433533633733833934034134234334434534634734834935035135235335435535635735835936036136236336436536636736836937037137237337437537637737837938038138238338438538638738838939039139239339439539639739839940040140240340440540640740840941041141241341441541641741841942042142242342442542642742842943043143243343443543643743843944044144244344444544644744844945045145245345445545645745845946046146246346446546646746846947047147247347447547647747847948048148248348448548648748848949049149249349449549649749849950050150250350450550650750850951051151251351451551651751851952052152252352452552652752852953053153253353453553653753853954054154254354454554654754854955055155255355455555655755855956056156256356456556656756856957057157257357457557657757857958058158258358458558658758858959059159259359459559659759859960060160260360460560660760860961061161261361461561661761861962062162262362462562662762862963063163263363463563663763863964064164264364464564664764864965065165265365465565665765865966066166266366466566666766866967067167267367467567667767867968068168268368468568668768868969069169269369469569669769869970070170270370470570670770870971071171271371471571671771871972072172272372472572672772872973073173273373473573673773873974074174274374474574674774874975075175275375475575675775875976076176276376476576676776876977077177277377477577677777877978078178278378478578678778878979079179279379479579679779879980080180280380480580680780880981081181281381481581681781881982082182282382482582682782882983083183283383483583683783883984084184284384484584684784884985085185285385485585685785885986086186286386486586686786886987087187287387487587687787887988088188288388488588688788888989089189289389489589689789889990090190290390490590690790890991091191291391491591691791891992092192292392492592692792892993093193293393493593693793893994094194294394494594694794894995095195295395495595695795895996096196296396496596696796896997097197297397497597697797897998098198298398498598698798898999099199299399499599699799899910001001100210031004100510061007100810091010101110121013101410151016101710181019102010211022102310241025102610271028102910301031103210331034103510361037103810391040104110421043104410451046104710481049105010511052105310541055105610571058105910601061106210631064106510661067106810691070107110721073107410751076107710781079108010811082108310841085108610871088108910901091109210931094109510961097109810991100110111021103110411051106110711081109111011111112111311141115111611171118111911201121112211231124112511261127112811291130113111321133113411351136113711381139114011411142114311441145114611471148114911501151115211531154115511561157115811591160116111621163116411651166116711681169117011711172117311741175117611771178117911801181118211831184118511861187118811891190119111921193119411951196119711981199120012011202120312041205120612071208120912101211121212131214121512161217121812191220122112221223122412251226122712281229123012311232123312341235123612371238123912401241124212431244124512461247124812491250125112521253125412551256125712581259126012611262126312641265126612671268126912701271127212731274127512761277127812791280128112821283128412851286128712881289129012911292129312941295129612971298129913001301130213031304130513061307130813091310131113121313131413151316131713181319132013211322132313241325132613271328132913301331133213331334133513361337133813391340134113421343134413451346134713481349135013511352135313541355135613571358135913601361136213631364136513661367136813691370137113721373137413751376137713781379138013811382138313841385138613871388138913901391139213931394139513961397139813991400140114021403140414051406140714081409141014111412141314141415141614171418141914201421142214231424142514261427142814291430143114321433143414351436143714381439144014411442144314441445144614471448144914501451145214531454145514561457145814591460146114621463146414651466146714681469147014711472147314741475147614771478147914801481148214831484148514861487148814891490149114921493149414951496149714981499150015011502150315041505150615071508150915101511151215131514151515161517151815191520152115221523152415251526152715281529153015311532153315341535153615371538153915401541154215431544154515461547154815491550155115521553155415551556
  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;
  1317. self._updateCaches();
  1318. $1=$recv($HLSearchReferences())._new();
  1319. $recv($1)._searchString_(aString);
  1320. $recv(self._announcer())._announce_($recv($1)._yourself());
  1321. return self;
  1322. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1323. }, function($ctx1) {$ctx1.fill(self,"search:",{aString:aString},$globals.HLReferencesModel)});
  1324. //>>excludeEnd("ctx");
  1325. },
  1326. //>>excludeStart("ide", pragmas.excludeIdeData);
  1327. args: ["aString"],
  1328. source: "search: aString\x0a\x09self updateCaches.\x0a\x09\x0a\x09self announcer announce: (HLSearchReferences new\x0a\x09\x09searchString: aString;\x0a\x09\x09yourself)",
  1329. referencedClasses: ["HLSearchReferences"],
  1330. //>>excludeEnd("ide");
  1331. messageSends: ["updateCaches", "announce:", "announcer", "searchString:", "new", "yourself"]
  1332. }),
  1333. $globals.HLReferencesModel);
  1334. $core.addMethod(
  1335. $core.method({
  1336. selector: "sendersOf:",
  1337. protocol: 'accessing',
  1338. fn: function (aString){
  1339. var self=this;
  1340. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1341. return $core.withContext(function($ctx1) {
  1342. //>>excludeEnd("ctx");
  1343. return $recv($recv(self._allMethods())._select_((function(each){
  1344. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1345. return $core.withContext(function($ctx2) {
  1346. //>>excludeEnd("ctx");
  1347. return $recv($recv(each)._messageSends())._includes_(aString);
  1348. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1349. }, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1,1)});
  1350. //>>excludeEnd("ctx");
  1351. })))._collect_((function(each){
  1352. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1353. return $core.withContext(function($ctx2) {
  1354. //>>excludeEnd("ctx");
  1355. return self._methodReferenceOn_(each);
  1356. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1357. }, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1,2)});
  1358. //>>excludeEnd("ctx");
  1359. }));
  1360. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1361. }, function($ctx1) {$ctx1.fill(self,"sendersOf:",{aString:aString},$globals.HLReferencesModel)});
  1362. //>>excludeEnd("ctx");
  1363. },
  1364. //>>excludeStart("ide", pragmas.excludeIdeData);
  1365. args: ["aString"],
  1366. source: "sendersOf: aString\x0a\x09^ (self allMethods select: [ :each |\x0a\x09\x09each messageSends includes: aString ])\x0a\x09\x09\x09collect: [ :each | self methodReferenceOn: each ]",
  1367. referencedClasses: [],
  1368. //>>excludeEnd("ide");
  1369. messageSends: ["collect:", "select:", "allMethods", "includes:", "messageSends", "methodReferenceOn:"]
  1370. }),
  1371. $globals.HLReferencesModel);
  1372. $core.addMethod(
  1373. $core.method({
  1374. selector: "updateCaches",
  1375. protocol: 'cache',
  1376. fn: function (){
  1377. var self=this;
  1378. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1379. return $core.withContext(function($ctx1) {
  1380. //>>excludeEnd("ctx");
  1381. self._updateClassesAndMetaclassesCache();
  1382. self._updateMethodsCache();
  1383. return self;
  1384. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1385. }, function($ctx1) {$ctx1.fill(self,"updateCaches",{},$globals.HLReferencesModel)});
  1386. //>>excludeEnd("ctx");
  1387. },
  1388. //>>excludeStart("ide", pragmas.excludeIdeData);
  1389. args: [],
  1390. source: "updateCaches\x0a\x09self \x0a\x09\x09updateClassesAndMetaclassesCache;\x0a\x09\x09updateMethodsCache",
  1391. referencedClasses: [],
  1392. //>>excludeEnd("ide");
  1393. messageSends: ["updateClassesAndMetaclassesCache", "updateMethodsCache"]
  1394. }),
  1395. $globals.HLReferencesModel);
  1396. $core.addMethod(
  1397. $core.method({
  1398. selector: "updateClassesAndMetaclassesCache",
  1399. protocol: 'cache',
  1400. fn: function (){
  1401. var self=this;
  1402. function $OrderedCollection(){return $globals.OrderedCollection||(typeof OrderedCollection=="undefined"?nil:OrderedCollection)}
  1403. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1404. return $core.withContext(function($ctx1) {
  1405. //>>excludeEnd("ctx");
  1406. var $1;
  1407. self["@classesAndMetaclassesCache"]=$recv($OrderedCollection())._new();
  1408. $recv($recv(self._environment())._classes())._do_((function(each){
  1409. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1410. return $core.withContext(function($ctx2) {
  1411. //>>excludeEnd("ctx");
  1412. $1=self["@classesAndMetaclassesCache"];
  1413. $recv($1)._add_(each);
  1414. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1415. $ctx2.sendIdx["add:"]=1;
  1416. //>>excludeEnd("ctx");
  1417. return $recv($1)._add_($recv(each)._class());
  1418. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1419. }, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1,1)});
  1420. //>>excludeEnd("ctx");
  1421. }));
  1422. return self;
  1423. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1424. }, function($ctx1) {$ctx1.fill(self,"updateClassesAndMetaclassesCache",{},$globals.HLReferencesModel)});
  1425. //>>excludeEnd("ctx");
  1426. },
  1427. //>>excludeStart("ide", pragmas.excludeIdeData);
  1428. args: [],
  1429. 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 ]",
  1430. referencedClasses: ["OrderedCollection"],
  1431. //>>excludeEnd("ide");
  1432. messageSends: ["new", "do:", "classes", "environment", "add:", "class"]
  1433. }),
  1434. $globals.HLReferencesModel);
  1435. $core.addMethod(
  1436. $core.method({
  1437. selector: "updateMethodsCache",
  1438. protocol: 'cache',
  1439. fn: function (){
  1440. var self=this;
  1441. function $OrderedCollection(){return $globals.OrderedCollection||(typeof OrderedCollection=="undefined"?nil:OrderedCollection)}
  1442. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1443. return $core.withContext(function($ctx1) {
  1444. //>>excludeEnd("ctx");
  1445. self["@methodsCache"]=$recv($OrderedCollection())._new();
  1446. $recv(self._classesAndMetaclasses())._do_((function(each){
  1447. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1448. return $core.withContext(function($ctx2) {
  1449. //>>excludeEnd("ctx");
  1450. return $recv(self["@methodsCache"])._addAll_($recv(each)._methods());
  1451. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1452. }, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1,1)});
  1453. //>>excludeEnd("ctx");
  1454. }));
  1455. return self;
  1456. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1457. }, function($ctx1) {$ctx1.fill(self,"updateMethodsCache",{},$globals.HLReferencesModel)});
  1458. //>>excludeEnd("ctx");
  1459. },
  1460. //>>excludeStart("ide", pragmas.excludeIdeData);
  1461. args: [],
  1462. source: "updateMethodsCache\x0a\x09methodsCache := OrderedCollection new.\x0a\x09\x0a\x09self classesAndMetaclasses\x0a\x09\x09do: [ :each | methodsCache addAll: each methods ]",
  1463. referencedClasses: ["OrderedCollection"],
  1464. //>>excludeEnd("ide");
  1465. messageSends: ["new", "do:", "classesAndMetaclasses", "addAll:", "methods"]
  1466. }),
  1467. $globals.HLReferencesModel);
  1468. });