2
0

Helios-References.js 35 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941
  1. smalltalk.addPackage('Helios-References');
  2. smalltalk.addClass('HLReferences', smalltalk.HLWidget, ['model', 'sendersListWidget', 'implementorsListWidget', 'classReferencesListWidget', 'regexpListWidget', 'sourceCodeWidget'], 'Helios-References');
  3. smalltalk.addMethod(
  4. smalltalk.method({
  5. selector: "classReferencesListWidget",
  6. category: 'accessing',
  7. fn: function (){
  8. var self=this;
  9. function $HLClassReferencesListWidget(){return smalltalk.HLClassReferencesListWidget||(typeof HLClassReferencesListWidget=="undefined"?nil:HLClassReferencesListWidget)}
  10. return smalltalk.withContext(function($ctx1) {
  11. var $2,$1;
  12. $2=self["@classReferencesListWidget"];
  13. if(($receiver = $2) == nil || $receiver == undefined){
  14. self["@classReferencesListWidget"]=_st($HLClassReferencesListWidget())._on_(_st(self)._model());
  15. self["@classReferencesListWidget"];
  16. $1=_st(self["@classReferencesListWidget"])._next_(_st(self)._regexpListWidget());
  17. } else {
  18. $1=$2;
  19. };
  20. return $1;
  21. }, function($ctx1) {$ctx1.fill(self,"classReferencesListWidget",{},smalltalk.HLReferences)})},
  22. args: [],
  23. source: "classReferencesListWidget\x0a\x09^ classReferencesListWidget ifNil: [\x0a \x09classReferencesListWidget := HLClassReferencesListWidget on: self model.\x0a\x09\x09classReferencesListWidget next: self regexpListWidget ]",
  24. messageSends: ["ifNil:", "on:", "model", "next:", "regexpListWidget"],
  25. referencedClasses: ["HLClassReferencesListWidget"]
  26. }),
  27. smalltalk.HLReferences);
  28. smalltalk.addMethod(
  29. smalltalk.method({
  30. selector: "implementorsListWidget",
  31. category: 'accessing',
  32. fn: function (){
  33. var self=this;
  34. function $HLImplementorsListWidget(){return smalltalk.HLImplementorsListWidget||(typeof HLImplementorsListWidget=="undefined"?nil:HLImplementorsListWidget)}
  35. return smalltalk.withContext(function($ctx1) {
  36. var $2,$1;
  37. $2=self["@implementorsListWidget"];
  38. if(($receiver = $2) == nil || $receiver == undefined){
  39. self["@implementorsListWidget"]=_st($HLImplementorsListWidget())._on_(_st(self)._model());
  40. self["@implementorsListWidget"];
  41. $1=_st(self["@implementorsListWidget"])._next_(_st(self)._classReferencesListWidget());
  42. } else {
  43. $1=$2;
  44. };
  45. return $1;
  46. }, function($ctx1) {$ctx1.fill(self,"implementorsListWidget",{},smalltalk.HLReferences)})},
  47. args: [],
  48. source: "implementorsListWidget\x0a\x09^ implementorsListWidget ifNil: [\x0a \x09implementorsListWidget := HLImplementorsListWidget on: self model.\x0a\x09\x09implementorsListWidget next: self classReferencesListWidget ]",
  49. messageSends: ["ifNil:", "on:", "model", "next:", "classReferencesListWidget"],
  50. referencedClasses: ["HLImplementorsListWidget"]
  51. }),
  52. smalltalk.HLReferences);
  53. smalltalk.addMethod(
  54. smalltalk.method({
  55. selector: "model",
  56. category: 'accessing',
  57. fn: function (){
  58. var self=this;
  59. function $HLReferencesModel(){return smalltalk.HLReferencesModel||(typeof HLReferencesModel=="undefined"?nil:HLReferencesModel)}
  60. return smalltalk.withContext(function($ctx1) {
  61. var $2,$3,$4,$1;
  62. $2=self["@model"];
  63. if(($receiver = $2) == nil || $receiver == undefined){
  64. $3=_st($HLReferencesModel())._new();
  65. _st($3)._environment_(_st(_st(self)._manager())._environment());
  66. $4=_st($3)._yourself();
  67. self["@model"]=$4;
  68. $1=self["@model"];
  69. } else {
  70. $1=$2;
  71. };
  72. return $1;
  73. }, function($ctx1) {$ctx1.fill(self,"model",{},smalltalk.HLReferences)})},
  74. args: [],
  75. source: "model\x0a\x09^ model ifNil: [\x0a\x09\x09model := (HLReferencesModel new\x0a\x09\x09\x09environment: self manager environment;\x0a\x09\x09\x09yourself) ]",
  76. messageSends: ["ifNil:", "environment:", "environment", "manager", "new", "yourself"],
  77. referencedClasses: ["HLReferencesModel"]
  78. }),
  79. smalltalk.HLReferences);
  80. smalltalk.addMethod(
  81. smalltalk.method({
  82. selector: "model:",
  83. category: 'accessing',
  84. fn: function (aModel){
  85. var self=this;
  86. return smalltalk.withContext(function($ctx1) {
  87. self["@model"]=aModel;
  88. return self}, function($ctx1) {$ctx1.fill(self,"model:",{aModel:aModel},smalltalk.HLReferences)})},
  89. args: ["aModel"],
  90. source: "model: aModel\x0a\x09model := aModel",
  91. messageSends: [],
  92. referencedClasses: []
  93. }),
  94. smalltalk.HLReferences);
  95. smalltalk.addMethod(
  96. smalltalk.method({
  97. selector: "open",
  98. category: 'actions',
  99. fn: function (){
  100. var self=this;
  101. function $HLTab(){return smalltalk.HLTab||(typeof HLTab=="undefined"?nil:HLTab)}
  102. function $HLManager(){return smalltalk.HLManager||(typeof HLManager=="undefined"?nil:HLManager)}
  103. return smalltalk.withContext(function($ctx1) {
  104. _st(_st($HLManager())._current())._addTab_(_st($HLTab())._on_labelled_(self,_st(_st(self)._class())._tabLabel()));
  105. return self}, function($ctx1) {$ctx1.fill(self,"open",{},smalltalk.HLReferences)})},
  106. args: [],
  107. source: "open\x0a\x09HLManager current addTab: (HLTab on: self labelled: self class tabLabel)",
  108. messageSends: ["addTab:", "on:labelled:", "tabLabel", "class", "current"],
  109. referencedClasses: ["HLTab", "HLManager"]
  110. }),
  111. smalltalk.HLReferences);
  112. smalltalk.addMethod(
  113. smalltalk.method({
  114. selector: "regexpListWidget",
  115. category: 'accessing',
  116. fn: function (){
  117. var self=this;
  118. function $HLRegexpListWidget(){return smalltalk.HLRegexpListWidget||(typeof HLRegexpListWidget=="undefined"?nil:HLRegexpListWidget)}
  119. return smalltalk.withContext(function($ctx1) {
  120. var $2,$1;
  121. $2=self["@regexpListWidget"];
  122. if(($receiver = $2) == nil || $receiver == undefined){
  123. self["@regexpListWidget"]=_st($HLRegexpListWidget())._on_(_st(self)._model());
  124. self["@regexpListWidget"];
  125. $1=_st(self["@regexpListWidget"])._next_(_st(self)._sourceCodeWidget());
  126. } else {
  127. $1=$2;
  128. };
  129. return $1;
  130. }, function($ctx1) {$ctx1.fill(self,"regexpListWidget",{},smalltalk.HLReferences)})},
  131. args: [],
  132. source: "regexpListWidget\x0a\x09^ regexpListWidget ifNil: [\x0a \x09regexpListWidget := HLRegexpListWidget on: self model.\x0a\x09\x09regexpListWidget next: self sourceCodeWidget ]",
  133. messageSends: ["ifNil:", "on:", "model", "next:", "sourceCodeWidget"],
  134. referencedClasses: ["HLRegexpListWidget"]
  135. }),
  136. smalltalk.HLReferences);
  137. smalltalk.addMethod(
  138. smalltalk.method({
  139. selector: "registerBindingsOn:",
  140. category: 'actions',
  141. fn: function (aBindingGroup){
  142. var self=this;
  143. function $HLToolCommand(){return smalltalk.HLToolCommand||(typeof HLToolCommand=="undefined"?nil:HLToolCommand)}
  144. return smalltalk.withContext(function($ctx1) {
  145. _st($HLToolCommand())._registerConcreteClassesOn_for_(aBindingGroup,_st(self)._model());
  146. return self}, function($ctx1) {$ctx1.fill(self,"registerBindingsOn:",{aBindingGroup:aBindingGroup},smalltalk.HLReferences)})},
  147. args: ["aBindingGroup"],
  148. source: "registerBindingsOn: aBindingGroup\x0a\x09HLToolCommand \x0a\x09\x09registerConcreteClassesOn: aBindingGroup \x0a\x09\x09for: self model",
  149. messageSends: ["registerConcreteClassesOn:for:", "model"],
  150. referencedClasses: ["HLToolCommand"]
  151. }),
  152. smalltalk.HLReferences);
  153. smalltalk.addMethod(
  154. smalltalk.method({
  155. selector: "renderContentOn:",
  156. category: 'rendering',
  157. fn: function (html){
  158. var self=this;
  159. function $HLVerticalSplitter(){return smalltalk.HLVerticalSplitter||(typeof HLVerticalSplitter=="undefined"?nil:HLVerticalSplitter)}
  160. function $HLHorizontalSplitter(){return smalltalk.HLHorizontalSplitter||(typeof HLHorizontalSplitter=="undefined"?nil:HLHorizontalSplitter)}
  161. function $HLContainer(){return smalltalk.HLContainer||(typeof HLContainer=="undefined"?nil:HLContainer)}
  162. return smalltalk.withContext(function($ctx1) {
  163. _st(html)._with_(_st($HLContainer())._with_(_st($HLHorizontalSplitter())._with_with_(_st($HLVerticalSplitter())._with_with_(_st($HLVerticalSplitter())._with_with_(_st(self)._sendersListWidget(),_st(self)._implementorsListWidget()),_st($HLVerticalSplitter())._with_with_(_st(self)._classReferencesListWidget(),_st(self)._regexpListWidget())),_st(self)._sourceCodeWidget())));
  164. _st(_st(self)._sendersListWidget())._focus();
  165. return self}, function($ctx1) {$ctx1.fill(self,"renderContentOn:",{html:html},smalltalk.HLReferences)})},
  166. args: ["html"],
  167. 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",
  168. messageSends: ["with:", "with:with:", "sendersListWidget", "implementorsListWidget", "classReferencesListWidget", "regexpListWidget", "sourceCodeWidget", "focus"],
  169. referencedClasses: ["HLVerticalSplitter", "HLHorizontalSplitter", "HLContainer"]
  170. }),
  171. smalltalk.HLReferences);
  172. smalltalk.addMethod(
  173. smalltalk.method({
  174. selector: "search:",
  175. category: 'actions',
  176. fn: function (aString){
  177. var self=this;
  178. return smalltalk.withContext(function($ctx1) {
  179. _st(_st(self)._model())._search_(aString);
  180. return self}, function($ctx1) {$ctx1.fill(self,"search:",{aString:aString},smalltalk.HLReferences)})},
  181. args: ["aString"],
  182. source: "search: aString\x0a\x09self model search: aString",
  183. messageSends: ["search:", "model"],
  184. referencedClasses: []
  185. }),
  186. smalltalk.HLReferences);
  187. smalltalk.addMethod(
  188. smalltalk.method({
  189. selector: "sendersListWidget",
  190. category: 'accessing',
  191. fn: function (){
  192. var self=this;
  193. function $HLSendersListWidget(){return smalltalk.HLSendersListWidget||(typeof HLSendersListWidget=="undefined"?nil:HLSendersListWidget)}
  194. return smalltalk.withContext(function($ctx1) {
  195. var $2,$1;
  196. $2=self["@sendersListWidget"];
  197. if(($receiver = $2) == nil || $receiver == undefined){
  198. self["@sendersListWidget"]=_st($HLSendersListWidget())._on_(_st(self)._model());
  199. self["@sendersListWidget"];
  200. $1=_st(self["@sendersListWidget"])._next_(_st(self)._implementorsListWidget());
  201. } else {
  202. $1=$2;
  203. };
  204. return $1;
  205. }, function($ctx1) {$ctx1.fill(self,"sendersListWidget",{},smalltalk.HLReferences)})},
  206. args: [],
  207. source: "sendersListWidget\x0a\x09^ sendersListWidget ifNil: [\x0a \x09sendersListWidget := HLSendersListWidget on: self model.\x0a\x09\x09sendersListWidget next: self implementorsListWidget ]",
  208. messageSends: ["ifNil:", "on:", "model", "next:", "implementorsListWidget"],
  209. referencedClasses: ["HLSendersListWidget"]
  210. }),
  211. smalltalk.HLReferences);
  212. smalltalk.addMethod(
  213. smalltalk.method({
  214. selector: "sourceCodeWidget",
  215. category: 'accessing',
  216. fn: function (){
  217. var self=this;
  218. function $HLBrowserCodeWidget(){return smalltalk.HLBrowserCodeWidget||(typeof HLBrowserCodeWidget=="undefined"?nil:HLBrowserCodeWidget)}
  219. return smalltalk.withContext(function($ctx1) {
  220. var $2,$3,$4,$1;
  221. $2=self["@sourceCodeWidget"];
  222. if(($receiver = $2) == nil || $receiver == undefined){
  223. $3=_st($HLBrowserCodeWidget())._new();
  224. _st($3)._browserModel_(_st(self)._model());
  225. $4=_st($3)._yourself();
  226. self["@sourceCodeWidget"]=$4;
  227. $1=self["@sourceCodeWidget"];
  228. } else {
  229. $1=$2;
  230. };
  231. return $1;
  232. }, function($ctx1) {$ctx1.fill(self,"sourceCodeWidget",{},smalltalk.HLReferences)})},
  233. args: [],
  234. source: "sourceCodeWidget\x0a\x09^ sourceCodeWidget ifNil: [\x0a \x09sourceCodeWidget := HLBrowserCodeWidget new\x0a\x09\x09\x09browserModel: self model;\x0a\x09\x09\x09yourself ]",
  235. messageSends: ["ifNil:", "browserModel:", "model", "new", "yourself"],
  236. referencedClasses: ["HLBrowserCodeWidget"]
  237. }),
  238. smalltalk.HLReferences);
  239. smalltalk.addMethod(
  240. smalltalk.method({
  241. selector: "canBeOpenAsTab",
  242. category: 'testing',
  243. fn: function (){
  244. var self=this;
  245. return smalltalk.withContext(function($ctx1) {
  246. return false;
  247. }, function($ctx1) {$ctx1.fill(self,"canBeOpenAsTab",{},smalltalk.HLReferences.klass)})},
  248. args: [],
  249. source: "canBeOpenAsTab\x0a\x09^ false",
  250. messageSends: [],
  251. referencedClasses: []
  252. }),
  253. smalltalk.HLReferences.klass);
  254. smalltalk.addMethod(
  255. smalltalk.method({
  256. selector: "tabLabel",
  257. category: 'accessing',
  258. fn: function (){
  259. var self=this;
  260. return smalltalk.withContext(function($ctx1) {
  261. return "References";
  262. }, function($ctx1) {$ctx1.fill(self,"tabLabel",{},smalltalk.HLReferences.klass)})},
  263. args: [],
  264. source: "tabLabel\x0a\x09^ 'References'",
  265. messageSends: [],
  266. referencedClasses: []
  267. }),
  268. smalltalk.HLReferences.klass);
  269. smalltalk.addMethod(
  270. smalltalk.method({
  271. selector: "tabPriority",
  272. category: 'accessing',
  273. fn: function (){
  274. var self=this;
  275. return smalltalk.withContext(function($ctx1) {
  276. var $1;
  277. $1=(100);
  278. return $1;
  279. }, function($ctx1) {$ctx1.fill(self,"tabPriority",{},smalltalk.HLReferences.klass)})},
  280. args: [],
  281. source: "tabPriority\x0a\x09^ 100",
  282. messageSends: [],
  283. referencedClasses: []
  284. }),
  285. smalltalk.HLReferences.klass);
  286. smalltalk.addClass('HLReferencesListWidget', smalltalk.HLToolListWidget, [], 'Helios-References');
  287. smalltalk.addMethod(
  288. smalltalk.method({
  289. selector: "activateListItem:",
  290. category: 'actions',
  291. fn: function (anItem){
  292. var self=this;
  293. return smalltalk.withContext(function($ctx1) {
  294. _st(_st(self)._model())._withChangesDo_((function(){
  295. return smalltalk.withContext(function($ctx2) {
  296. return smalltalk.HLToolListWidget.fn.prototype._activateListItem_.apply(_st(self), [anItem]);
  297. }, function($ctx2) {$ctx2.fillBlock({},$ctx1)})}));
  298. return self}, function($ctx1) {$ctx1.fill(self,"activateListItem:",{anItem:anItem},smalltalk.HLReferencesListWidget)})},
  299. args: ["anItem"],
  300. source: "activateListItem: anItem\x0a\x09self model withChangesDo: [ super activateListItem: anItem ]",
  301. messageSends: ["withChangesDo:", "activateListItem:", "model"],
  302. referencedClasses: []
  303. }),
  304. smalltalk.HLReferencesListWidget);
  305. smalltalk.addMethod(
  306. smalltalk.method({
  307. selector: "commandCategory",
  308. category: 'accessing',
  309. fn: function (){
  310. var self=this;
  311. return smalltalk.withContext(function($ctx1) {
  312. return "Methods";
  313. }, function($ctx1) {$ctx1.fill(self,"commandCategory",{},smalltalk.HLReferencesListWidget)})},
  314. args: [],
  315. source: "commandCategory\x0a\x09^ 'Methods'",
  316. messageSends: [],
  317. referencedClasses: []
  318. }),
  319. smalltalk.HLReferencesListWidget);
  320. smalltalk.addMethod(
  321. smalltalk.method({
  322. selector: "label",
  323. category: 'accessing',
  324. fn: function (){
  325. var self=this;
  326. return smalltalk.withContext(function($ctx1) {
  327. return "List";
  328. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLReferencesListWidget)})},
  329. args: [],
  330. source: "label\x0a\x09^ 'List'",
  331. messageSends: [],
  332. referencedClasses: []
  333. }),
  334. smalltalk.HLReferencesListWidget);
  335. smalltalk.addMethod(
  336. smalltalk.method({
  337. selector: "observeModel",
  338. category: 'actions',
  339. fn: function (){
  340. var self=this;
  341. function $HLSearchReferences(){return smalltalk.HLSearchReferences||(typeof HLSearchReferences=="undefined"?nil:HLSearchReferences)}
  342. function $HLMethodSelected(){return smalltalk.HLMethodSelected||(typeof HLMethodSelected=="undefined"?nil:HLMethodSelected)}
  343. return smalltalk.withContext(function($ctx1) {
  344. var $1,$2;
  345. $1=_st(_st(self)._model())._announcer();
  346. _st($1)._on_do_($HLSearchReferences(),(function(ann){
  347. return smalltalk.withContext(function($ctx2) {
  348. return _st(self)._onSearchReferences_(_st(ann)._searchString());
  349. }, function($ctx2) {$ctx2.fillBlock({ann:ann},$ctx1)})}));
  350. $2=_st($1)._on_do_($HLMethodSelected(),(function(ann){
  351. return smalltalk.withContext(function($ctx2) {
  352. return _st(self)._onMethodSelected_(_st(ann)._item());
  353. }, function($ctx2) {$ctx2.fillBlock({ann:ann},$ctx1)})}));
  354. return self}, function($ctx1) {$ctx1.fill(self,"observeModel",{},smalltalk.HLReferencesListWidget)})},
  355. args: [],
  356. 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 ]",
  357. messageSends: ["on:do:", "onSearchReferences:", "searchString", "announcer", "model", "onMethodSelected:", "item"],
  358. referencedClasses: ["HLSearchReferences", "HLMethodSelected"]
  359. }),
  360. smalltalk.HLReferencesListWidget);
  361. smalltalk.addMethod(
  362. smalltalk.method({
  363. selector: "onMethodSelected:",
  364. category: 'reactions',
  365. fn: function (aMethod){
  366. var self=this;
  367. return smalltalk.withContext(function($ctx1) {
  368. var $1,$2,$3,$4,$5;
  369. var $early={};
  370. try {
  371. $1=aMethod;
  372. if(($receiver = $1) == nil || $receiver == undefined){
  373. $2=self;
  374. return $2;
  375. } else {
  376. $1;
  377. };
  378. _st(_st(self)._items())._detect_ifNone_((function(each){
  379. return smalltalk.withContext(function($ctx2) {
  380. return _st(each).__eq(_st(aMethod)._selector());
  381. }, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1)})}),(function(){
  382. return smalltalk.withContext(function($ctx2) {
  383. $3=self;
  384. throw $early=[$3];
  385. }, function($ctx2) {$ctx2.fillBlock({},$ctx1)})}));
  386. $4=self;
  387. _st($4)._selectedItem_(_st(aMethod)._selector());
  388. $5=_st($4)._activateItem_(_st(aMethod)._selector());
  389. return self}
  390. catch(e) {if(e===$early)return e[0]; throw e}
  391. }, function($ctx1) {$ctx1.fill(self,"onMethodSelected:",{aMethod:aMethod},smalltalk.HLReferencesListWidget)})},
  392. args: ["aMethod"],
  393. 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\x09",
  394. messageSends: ["ifNil:", "detect:ifNone:", "=", "selector", "items", "selectedItem:", "activateItem:"],
  395. referencedClasses: []
  396. }),
  397. smalltalk.HLReferencesListWidget);
  398. smalltalk.addMethod(
  399. smalltalk.method({
  400. selector: "onSearchReferences:",
  401. category: 'reactions',
  402. fn: function (aString){
  403. var self=this;
  404. return smalltalk.withContext(function($ctx1) {
  405. _st(self)._subclassResponsibility();
  406. return self}, function($ctx1) {$ctx1.fill(self,"onSearchReferences:",{aString:aString},smalltalk.HLReferencesListWidget)})},
  407. args: ["aString"],
  408. source: "onSearchReferences: aString\x0a\x09self subclassResponsibility",
  409. messageSends: ["subclassResponsibility"],
  410. referencedClasses: []
  411. }),
  412. smalltalk.HLReferencesListWidget);
  413. smalltalk.addMethod(
  414. smalltalk.method({
  415. selector: "renderItemLabel:on:",
  416. category: 'rendering',
  417. fn: function (aMethod,html){
  418. var self=this;
  419. return smalltalk.withContext(function($ctx1) {
  420. _st(html)._with_(_st(_st(_st(_st(aMethod)._methodClass())._name()).__comma(" >> #")).__comma(_st(aMethod)._selector()));
  421. return self}, function($ctx1) {$ctx1.fill(self,"renderItemLabel:on:",{aMethod:aMethod,html:html},smalltalk.HLReferencesListWidget)})},
  422. args: ["aMethod", "html"],
  423. source: "renderItemLabel: aMethod on: html\x0a\x09html with: aMethod methodClass name, ' >> #', aMethod selector",
  424. messageSends: ["with:", ",", "selector", "name", "methodClass"],
  425. referencedClasses: []
  426. }),
  427. smalltalk.HLReferencesListWidget);
  428. smalltalk.addMethod(
  429. smalltalk.method({
  430. selector: "selectItem:",
  431. category: 'actions',
  432. fn: function (aMethod){
  433. var self=this;
  434. return smalltalk.withContext(function($ctx1) {
  435. _st(_st(self)._model())._selectedMethod_(aMethod);
  436. return self}, function($ctx1) {$ctx1.fill(self,"selectItem:",{aMethod:aMethod},smalltalk.HLReferencesListWidget)})},
  437. args: ["aMethod"],
  438. source: "selectItem: aMethod\x0a\x09self model selectedMethod: aMethod",
  439. messageSends: ["selectedMethod:", "model"],
  440. referencedClasses: []
  441. }),
  442. smalltalk.HLReferencesListWidget);
  443. smalltalk.addMethod(
  444. smalltalk.method({
  445. selector: "on:",
  446. category: 'instance creation',
  447. fn: function (aModel){
  448. var self=this;
  449. return smalltalk.withContext(function($ctx1) {
  450. var $2,$3,$1;
  451. $2=_st(self)._new();
  452. _st($2)._model_(aModel);
  453. $3=_st($2)._yourself();
  454. $1=$3;
  455. return $1;
  456. }, function($ctx1) {$ctx1.fill(self,"on:",{aModel:aModel},smalltalk.HLReferencesListWidget.klass)})},
  457. args: ["aModel"],
  458. source: "on: aModel\x0a\x09^ self new \x0a\x09\x09model: aModel; \x0a\x09\x09yourself",
  459. messageSends: ["model:", "new", "yourself"],
  460. referencedClasses: []
  461. }),
  462. smalltalk.HLReferencesListWidget.klass);
  463. smalltalk.addClass('HLClassReferencesListWidget', smalltalk.HLReferencesListWidget, [], 'Helios-References');
  464. smalltalk.addMethod(
  465. smalltalk.method({
  466. selector: "label",
  467. category: 'accessing',
  468. fn: function (){
  469. var self=this;
  470. return smalltalk.withContext(function($ctx1) {
  471. return "Class references";
  472. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLClassReferencesListWidget)})},
  473. args: [],
  474. source: "label\x0a\x09^ 'Class references'",
  475. messageSends: [],
  476. referencedClasses: []
  477. }),
  478. smalltalk.HLClassReferencesListWidget);
  479. smalltalk.addMethod(
  480. smalltalk.method({
  481. selector: "onSearchReferences:",
  482. category: 'reactions',
  483. fn: function (aString){
  484. var self=this;
  485. return smalltalk.withContext(function($ctx1) {
  486. _st(self)._selectItem_(nil);
  487. _st(self)._items_(_st(_st(self)._model())._classReferencesOf_(aString));
  488. _st(self)._refresh();
  489. return self}, function($ctx1) {$ctx1.fill(self,"onSearchReferences:",{aString:aString},smalltalk.HLClassReferencesListWidget)})},
  490. args: ["aString"],
  491. source: "onSearchReferences: aString\x0a\x09self selectItem: nil.\x0a\x09self items: (self model classReferencesOf: aString).\x0a\x09self refresh",
  492. messageSends: ["selectItem:", "items:", "classReferencesOf:", "model", "refresh"],
  493. referencedClasses: []
  494. }),
  495. smalltalk.HLClassReferencesListWidget);
  496. smalltalk.addClass('HLImplementorsListWidget', smalltalk.HLReferencesListWidget, [], 'Helios-References');
  497. smalltalk.addMethod(
  498. smalltalk.method({
  499. selector: "label",
  500. category: 'accessing',
  501. fn: function (){
  502. var self=this;
  503. return smalltalk.withContext(function($ctx1) {
  504. return "Implementors";
  505. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLImplementorsListWidget)})},
  506. args: [],
  507. source: "label\x0a\x09^ 'Implementors'",
  508. messageSends: [],
  509. referencedClasses: []
  510. }),
  511. smalltalk.HLImplementorsListWidget);
  512. smalltalk.addMethod(
  513. smalltalk.method({
  514. selector: "onSearchReferences:",
  515. category: 'reactions',
  516. fn: function (aString){
  517. var self=this;
  518. return smalltalk.withContext(function($ctx1) {
  519. _st(self)._selectItem_(nil);
  520. _st(self)._items_(_st(_st(self)._model())._implementorsOf_(aString));
  521. _st(self)._refresh();
  522. return self}, function($ctx1) {$ctx1.fill(self,"onSearchReferences:",{aString:aString},smalltalk.HLImplementorsListWidget)})},
  523. args: ["aString"],
  524. source: "onSearchReferences: aString\x0a\x09self selectItem: nil.\x0a\x09self items: (self model implementorsOf: aString).\x0a\x09self refresh",
  525. messageSends: ["selectItem:", "items:", "implementorsOf:", "model", "refresh"],
  526. referencedClasses: []
  527. }),
  528. smalltalk.HLImplementorsListWidget);
  529. smalltalk.addClass('HLRegexpListWidget', smalltalk.HLReferencesListWidget, [], 'Helios-References');
  530. smalltalk.addMethod(
  531. smalltalk.method({
  532. selector: "label",
  533. category: 'accessing',
  534. fn: function (){
  535. var self=this;
  536. return smalltalk.withContext(function($ctx1) {
  537. return "Source search";
  538. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLRegexpListWidget)})},
  539. args: [],
  540. source: "label\x0a\x09^ 'Source search'",
  541. messageSends: [],
  542. referencedClasses: []
  543. }),
  544. smalltalk.HLRegexpListWidget);
  545. smalltalk.addMethod(
  546. smalltalk.method({
  547. selector: "onSearchReferences:",
  548. category: 'reactions',
  549. fn: function (aString){
  550. var self=this;
  551. return smalltalk.withContext(function($ctx1) {
  552. _st(self)._selectItem_(nil);
  553. _st(self)._items_(_st(_st(self)._model())._regexpReferencesOf_(aString));
  554. _st(self)._refresh();
  555. return self}, function($ctx1) {$ctx1.fill(self,"onSearchReferences:",{aString:aString},smalltalk.HLRegexpListWidget)})},
  556. args: ["aString"],
  557. source: "onSearchReferences: aString\x0a\x09self selectItem: nil.\x0a\x09self items: (self model regexpReferencesOf: aString).\x0a\x09self refresh",
  558. messageSends: ["selectItem:", "items:", "regexpReferencesOf:", "model", "refresh"],
  559. referencedClasses: []
  560. }),
  561. smalltalk.HLRegexpListWidget);
  562. smalltalk.addClass('HLSendersListWidget', smalltalk.HLReferencesListWidget, [], 'Helios-References');
  563. smalltalk.addMethod(
  564. smalltalk.method({
  565. selector: "label",
  566. category: 'accessing',
  567. fn: function (){
  568. var self=this;
  569. return smalltalk.withContext(function($ctx1) {
  570. return "Senders";
  571. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLSendersListWidget)})},
  572. args: [],
  573. source: "label\x0a\x09^ 'Senders'",
  574. messageSends: [],
  575. referencedClasses: []
  576. }),
  577. smalltalk.HLSendersListWidget);
  578. smalltalk.addMethod(
  579. smalltalk.method({
  580. selector: "onSearchReferences:",
  581. category: 'reactions',
  582. fn: function (aString){
  583. var self=this;
  584. return smalltalk.withContext(function($ctx1) {
  585. _st(self)._selectItem_(nil);
  586. _st(self)._items_(_st(_st(self)._model())._sendersOf_(aString));
  587. _st(self)._refresh();
  588. return self}, function($ctx1) {$ctx1.fill(self,"onSearchReferences:",{aString:aString},smalltalk.HLSendersListWidget)})},
  589. args: ["aString"],
  590. source: "onSearchReferences: aString\x0a\x09self selectItem: nil.\x0a\x09self items: (self model sendersOf: aString).\x0a\x09self refresh",
  591. messageSends: ["selectItem:", "items:", "sendersOf:", "model", "refresh"],
  592. referencedClasses: []
  593. }),
  594. smalltalk.HLSendersListWidget);
  595. smalltalk.addClass('HLReferencesModel', smalltalk.HLToolModel, ['methodsCache', 'classesAndMetaclassesCache'], 'Helios-References');
  596. smalltalk.addMethod(
  597. smalltalk.method({
  598. selector: "allMethods",
  599. category: 'accessing',
  600. fn: function (){
  601. var self=this;
  602. return smalltalk.withContext(function($ctx1) {
  603. var $1;
  604. $1=_st(self)._methodsCache();
  605. return $1;
  606. }, function($ctx1) {$ctx1.fill(self,"allMethods",{},smalltalk.HLReferencesModel)})},
  607. args: [],
  608. source: "allMethods\x0a\x09^ self methodsCache",
  609. messageSends: ["methodsCache"],
  610. referencedClasses: []
  611. }),
  612. smalltalk.HLReferencesModel);
  613. smalltalk.addMethod(
  614. smalltalk.method({
  615. selector: "allSelectors",
  616. category: 'accessing',
  617. fn: function (){
  618. var self=this;
  619. return smalltalk.withContext(function($ctx1) {
  620. var $1;
  621. $1=_st(_st(_st(self)._allMethods())._collect_((function(each){
  622. return smalltalk.withContext(function($ctx2) {
  623. return _st(each)._selector();
  624. }, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1)})})))._asSet();
  625. return $1;
  626. }, function($ctx1) {$ctx1.fill(self,"allSelectors",{},smalltalk.HLReferencesModel)})},
  627. args: [],
  628. source: "allSelectors\x0a\x09^ (self allMethods \x0a\x09\x09collect: [ :each | each selector ])\x0a\x09\x09asSet",
  629. messageSends: ["asSet", "collect:", "selector", "allMethods"],
  630. referencedClasses: []
  631. }),
  632. smalltalk.HLReferencesModel);
  633. smalltalk.addMethod(
  634. smalltalk.method({
  635. selector: "classReferencesOf:",
  636. category: 'accessing',
  637. fn: function (aString){
  638. var self=this;
  639. var references;
  640. function $OrderedCollection(){return smalltalk.OrderedCollection||(typeof OrderedCollection=="undefined"?nil:OrderedCollection)}
  641. return smalltalk.withContext(function($ctx1) {
  642. var $1,$2;
  643. references=_st($OrderedCollection())._new();
  644. _st(_st(self)._classesAndMetaclasses())._do_((function(each){
  645. return smalltalk.withContext(function($ctx2) {
  646. return _st(_st(_st(each)._methodDictionary())._values())._do_((function(method){
  647. return smalltalk.withContext(function($ctx3) {
  648. $1=_st(_st(method)._referencedClasses())._includes_(aString);
  649. if(smalltalk.assert($1)){
  650. return _st(references)._add_(method);
  651. };
  652. }, function($ctx3) {$ctx3.fillBlock({method:method},$ctx1)})}));
  653. }, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1)})}));
  654. $2=references;
  655. return $2;
  656. }, function($ctx1) {$ctx1.fill(self,"classReferencesOf:",{aString:aString,references:references},smalltalk.HLReferencesModel)})},
  657. args: ["aString"],
  658. source: "classReferencesOf: aString\x0a\x09\x22Answer all methods referencing the class named aString\x22\x0a\x09\x0a\x09| references |\x0a\x09\x0a\x09references := OrderedCollection new.\x0a\x09\x0a\x09self classesAndMetaclasses do: [ :each |\x0a\x09\x09each methodDictionary values do: [ :method |\x0a\x09\x09\x09(method referencedClasses includes: aString) ifTrue: [\x0a\x09\x09\x09\x09references add: method ] ] ].\x0a\x09\x09\x09\x09\x0a\x09^ references",
  659. messageSends: ["new", "do:", "ifTrue:", "add:", "includes:", "referencedClasses", "values", "methodDictionary", "classesAndMetaclasses"],
  660. referencedClasses: ["OrderedCollection"]
  661. }),
  662. smalltalk.HLReferencesModel);
  663. smalltalk.addMethod(
  664. smalltalk.method({
  665. selector: "classesAndMetaclasses",
  666. category: 'accessing',
  667. fn: function (){
  668. var self=this;
  669. return smalltalk.withContext(function($ctx1) {
  670. var $1;
  671. $1=_st(self)._classesAndMetaclassesCache();
  672. return $1;
  673. }, function($ctx1) {$ctx1.fill(self,"classesAndMetaclasses",{},smalltalk.HLReferencesModel)})},
  674. args: [],
  675. source: "classesAndMetaclasses\x0a\x09^ self classesAndMetaclassesCache",
  676. messageSends: ["classesAndMetaclassesCache"],
  677. referencedClasses: []
  678. }),
  679. smalltalk.HLReferencesModel);
  680. smalltalk.addMethod(
  681. smalltalk.method({
  682. selector: "classesAndMetaclassesCache",
  683. category: 'cache',
  684. fn: function (){
  685. var self=this;
  686. return smalltalk.withContext(function($ctx1) {
  687. var $1,$2;
  688. $1=self["@classesAndMetaclassesCache"];
  689. if(($receiver = $1) == nil || $receiver == undefined){
  690. _st(self)._updateClassesAndMetaclassesCache();
  691. } else {
  692. $1;
  693. };
  694. $2=self["@classesAndMetaclassesCache"];
  695. return $2;
  696. }, function($ctx1) {$ctx1.fill(self,"classesAndMetaclassesCache",{},smalltalk.HLReferencesModel)})},
  697. args: [],
  698. source: "classesAndMetaclassesCache\x0a\x09classesAndMetaclassesCache ifNil: [ self updateClassesAndMetaclassesCache ].\x0a\x09\x0a\x09^ classesAndMetaclassesCache",
  699. messageSends: ["ifNil:", "updateClassesAndMetaclassesCache"],
  700. referencedClasses: []
  701. }),
  702. smalltalk.HLReferencesModel);
  703. smalltalk.addMethod(
  704. smalltalk.method({
  705. selector: "implementorsOf:",
  706. category: 'accessing',
  707. fn: function (aString){
  708. var self=this;
  709. return smalltalk.withContext(function($ctx1) {
  710. var $1;
  711. $1=_st(_st(self)._allMethods())._select_((function(each){
  712. return smalltalk.withContext(function($ctx2) {
  713. return _st(_st(each)._selector()).__eq(aString);
  714. }, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1)})}));
  715. return $1;
  716. }, function($ctx1) {$ctx1.fill(self,"implementorsOf:",{aString:aString},smalltalk.HLReferencesModel)})},
  717. args: ["aString"],
  718. source: "implementorsOf: aString\x0a\x09^ self allMethods select: [ :each |\x0a\x09\x09each selector = aString ]",
  719. messageSends: ["select:", "=", "selector", "allMethods"],
  720. referencedClasses: []
  721. }),
  722. smalltalk.HLReferencesModel);
  723. smalltalk.addMethod(
  724. smalltalk.method({
  725. selector: "isReferencesModel",
  726. category: 'testing',
  727. fn: function (){
  728. var self=this;
  729. return smalltalk.withContext(function($ctx1) {
  730. return true;
  731. }, function($ctx1) {$ctx1.fill(self,"isReferencesModel",{},smalltalk.HLReferencesModel)})},
  732. args: [],
  733. source: "isReferencesModel\x0a\x09^ true",
  734. messageSends: [],
  735. referencedClasses: []
  736. }),
  737. smalltalk.HLReferencesModel);
  738. smalltalk.addMethod(
  739. smalltalk.method({
  740. selector: "methodsCache",
  741. category: 'cache',
  742. fn: function (){
  743. var self=this;
  744. return smalltalk.withContext(function($ctx1) {
  745. var $1,$2;
  746. $1=self["@methodsCache"];
  747. if(($receiver = $1) == nil || $receiver == undefined){
  748. _st(self)._updateMethodsCache();
  749. } else {
  750. $1;
  751. };
  752. $2=self["@methodsCache"];
  753. return $2;
  754. }, function($ctx1) {$ctx1.fill(self,"methodsCache",{},smalltalk.HLReferencesModel)})},
  755. args: [],
  756. source: "methodsCache\x0a\x09methodsCache ifNil: [ self updateMethodsCache ].\x0a\x09\x0a\x09^ methodsCache",
  757. messageSends: ["ifNil:", "updateMethodsCache"],
  758. referencedClasses: []
  759. }),
  760. smalltalk.HLReferencesModel);
  761. smalltalk.addMethod(
  762. smalltalk.method({
  763. selector: "regexpReferencesOf:",
  764. category: 'accessing',
  765. fn: function (aString){
  766. var self=this;
  767. return smalltalk.withContext(function($ctx1) {
  768. var $1;
  769. $1=_st(_st(self)._allMethods())._select_((function(each){
  770. return smalltalk.withContext(function($ctx2) {
  771. return _st(_st(each)._source())._match_(aString);
  772. }, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1)})}));
  773. return $1;
  774. }, function($ctx1) {$ctx1.fill(self,"regexpReferencesOf:",{aString:aString},smalltalk.HLReferencesModel)})},
  775. args: ["aString"],
  776. source: "regexpReferencesOf: aString\x0a\x09^ self allMethods select: [ :each |\x0a\x09\x09each source match: aString ]",
  777. messageSends: ["select:", "match:", "source", "allMethods"],
  778. referencedClasses: []
  779. }),
  780. smalltalk.HLReferencesModel);
  781. smalltalk.addMethod(
  782. smalltalk.method({
  783. selector: "search:",
  784. category: 'actions',
  785. fn: function (aString){
  786. var self=this;
  787. function $HLSearchReferences(){return smalltalk.HLSearchReferences||(typeof HLSearchReferences=="undefined"?nil:HLSearchReferences)}
  788. return smalltalk.withContext(function($ctx1) {
  789. var $1,$2;
  790. _st(self)._updateCaches();
  791. $1=_st($HLSearchReferences())._new();
  792. _st($1)._searchString_(aString);
  793. $2=_st($1)._yourself();
  794. _st(_st(self)._announcer())._announce_($2);
  795. return self}, function($ctx1) {$ctx1.fill(self,"search:",{aString:aString},smalltalk.HLReferencesModel)})},
  796. args: ["aString"],
  797. source: "search: aString\x0a\x09self updateCaches.\x0a\x09\x0a\x09self announcer announce: (HLSearchReferences new\x0a\x09\x09searchString: aString;\x0a\x09\x09yourself)",
  798. messageSends: ["updateCaches", "announce:", "searchString:", "new", "yourself", "announcer"],
  799. referencedClasses: ["HLSearchReferences"]
  800. }),
  801. smalltalk.HLReferencesModel);
  802. smalltalk.addMethod(
  803. smalltalk.method({
  804. selector: "sendersOf:",
  805. category: 'accessing',
  806. fn: function (aString){
  807. var self=this;
  808. return smalltalk.withContext(function($ctx1) {
  809. var $1;
  810. $1=_st(_st(self)._allMethods())._select_((function(each){
  811. return smalltalk.withContext(function($ctx2) {
  812. return _st(_st(each)._messageSends())._includes_(aString);
  813. }, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1)})}));
  814. return $1;
  815. }, function($ctx1) {$ctx1.fill(self,"sendersOf:",{aString:aString},smalltalk.HLReferencesModel)})},
  816. args: ["aString"],
  817. source: "sendersOf: aString\x0a\x09^ self allMethods select: [ :each |\x0a\x09\x09each messageSends includes: aString ]",
  818. messageSends: ["select:", "includes:", "messageSends", "allMethods"],
  819. referencedClasses: []
  820. }),
  821. smalltalk.HLReferencesModel);
  822. smalltalk.addMethod(
  823. smalltalk.method({
  824. selector: "updateCaches",
  825. category: 'cache',
  826. fn: function (){
  827. var self=this;
  828. return smalltalk.withContext(function($ctx1) {
  829. var $1,$2;
  830. $1=self;
  831. _st($1)._updateClassesAndMetaclassesCache();
  832. $2=_st($1)._updateMethodsCache();
  833. return self}, function($ctx1) {$ctx1.fill(self,"updateCaches",{},smalltalk.HLReferencesModel)})},
  834. args: [],
  835. source: "updateCaches\x0a\x09self \x0a\x09\x09updateClassesAndMetaclassesCache;\x0a\x09\x09updateMethodsCache",
  836. messageSends: ["updateClassesAndMetaclassesCache", "updateMethodsCache"],
  837. referencedClasses: []
  838. }),
  839. smalltalk.HLReferencesModel);
  840. smalltalk.addMethod(
  841. smalltalk.method({
  842. selector: "updateClassesAndMetaclassesCache",
  843. category: 'cache',
  844. fn: function (){
  845. var self=this;
  846. function $OrderedCollection(){return smalltalk.OrderedCollection||(typeof OrderedCollection=="undefined"?nil:OrderedCollection)}
  847. return smalltalk.withContext(function($ctx1) {
  848. var $1,$2;
  849. self["@classesAndMetaclassesCache"]=_st(_st(_st(self)._environment())._classes())._inject_into_(_st($OrderedCollection())._new(),(function(acc,each){
  850. return smalltalk.withContext(function($ctx2) {
  851. $1=acc;
  852. _st($1)._add_(each);
  853. _st($1)._add_(_st(each)._class());
  854. $2=_st($1)._yourself();
  855. return $2;
  856. }, function($ctx2) {$ctx2.fillBlock({acc:acc,each:each},$ctx1)})}));
  857. return self}, function($ctx1) {$ctx1.fill(self,"updateClassesAndMetaclassesCache",{},smalltalk.HLReferencesModel)})},
  858. args: [],
  859. source: "updateClassesAndMetaclassesCache\x0a\x09classesAndMetaclassesCache := self environment classes \x0a\x09\x09inject: OrderedCollection new \x0a\x09\x09into: [ :acc :each |\x0a\x09\x09\x09acc \x0a\x09\x09\x09\x09add: each; \x0a\x09\x09\x09\x09add: each class;\x0a\x09\x09\x09\x09yourself ]",
  860. messageSends: ["inject:into:", "new", "add:", "class", "yourself", "classes", "environment"],
  861. referencedClasses: ["OrderedCollection"]
  862. }),
  863. smalltalk.HLReferencesModel);
  864. smalltalk.addMethod(
  865. smalltalk.method({
  866. selector: "updateMethodsCache",
  867. category: 'cache',
  868. fn: function (){
  869. var self=this;
  870. function $OrderedCollection(){return smalltalk.OrderedCollection||(typeof OrderedCollection=="undefined"?nil:OrderedCollection)}
  871. return smalltalk.withContext(function($ctx1) {
  872. self["@methodsCache"]=_st(_st(self)._classesAndMetaclasses())._inject_into_(_st($OrderedCollection())._new(),(function(acc,each){
  873. return smalltalk.withContext(function($ctx2) {
  874. return _st(acc).__comma(_st(each)._methods());
  875. }, function($ctx2) {$ctx2.fillBlock({acc:acc,each:each},$ctx1)})}));
  876. return self}, function($ctx1) {$ctx1.fill(self,"updateMethodsCache",{},smalltalk.HLReferencesModel)})},
  877. args: [],
  878. source: "updateMethodsCache\x0a\x09methodsCache := self classesAndMetaclasses\x0a\x09\x09inject: OrderedCollection new\x0a\x09\x09into: [ :acc :each |\x0a\x09\x09\x09acc, each methods ]",
  879. messageSends: ["inject:into:", "new", ",", "methods", "classesAndMetaclasses"],
  880. referencedClasses: ["OrderedCollection"]
  881. }),
  882. smalltalk.HLReferencesModel);