Helios-Inspector.deploy.js 36 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091929394959697989910010110210310410510610710810911011111211311411511611711811912012112212312412512612712812913013113213313413513613713813914014114214314414514614714814915015115215315415515615715815916016116216316416516616716816917017117217317417517617717817918018118218318418518618718818919019119219319419519619719819920020120220320420520620720820921021121221321421521621721821922022122222322422522622722822923023123223323423523623723823924024124224324424524624724824925025125225325425525625725825926026126226326426526626726826927027127227327427527627727827928028128228328428528628728828929029129229329429529629729829930030130230330430530630730830931031131231331431531631731831932032132232332432532632732832933033133233333433533633733833934034134234334434534634734834935035135235335435535635735835936036136236336436536636736836937037137237337437537637737837938038138238338438538638738838939039139239339439539639739839940040140240340440540640740840941041141241341441541641741841942042142242342442542642742842943043143243343443543643743843944044144244344444544644744844945045145245345445545645745845946046146246346446546646746846947047147247347447547647747847948048148248348448548648748848949049149249349449549649749849950050150250350450550650750850951051151251351451551651751851952052152252352452552652752852953053153253353453553653753853954054154254354454554654754854955055155255355455555655755855956056156256356456556656756856957057157257357457557657757857958058158258358458558658758858959059159259359459559659759859960060160260360460560660760860961061161261361461561661761861962062162262362462562662762862963063163263363463563663763863964064164264364464564664764864965065165265365465565665765865966066166266366466566666766866967067167267367467567667767867968068168268368468568668768868969069169269369469569669769869970070170270370470570670770870971071171271371471571671771871972072172272372472572672772872973073173273373473573673773873974074174274374474574674774874975075175275375475575675775875976076176276376476576676776876977077177277377477577677777877978078178278378478578678778878979079179279379479579679779879980080180280380480580680780880981081181281381481581681781881982082182282382482582682782882983083183283383483583683783883984084184284384484584684784884985085185285385485585685785885986086186286386486586686786886987087187287387487587687787887988088188288388488588688788888989089189289389489589689789889990090190290390490590690790890991091191291391491591691791891992092192292392492592692792892993093193293393493593693793893994094194294394494594694794894995095195295395495595695795895996096196296396496596696796896997097197297397497597697797897998098198298398498598698798898999099199299399499599699799899910001001100210031004100510061007100810091010101110121013101410151016101710181019102010211022102310241025102610271028102910301031103210331034103510361037103810391040104110421043104410451046104710481049105010511052105310541055105610571058105910601061106210631064106510661067106810691070107110721073107410751076
  1. smalltalk.addPackage('Helios-Inspector');
  2. smalltalk.addClass('HLInspectorDisplayWidget', smalltalk.HLNavigationListWidget, ['model'], 'Helios-Inspector');
  3. smalltalk.addMethod(
  4. smalltalk.method({
  5. selector: "model",
  6. fn: function (){
  7. var self=this;
  8. return smalltalk.withContext(function($ctx1) {
  9. var $1;
  10. $1=self["@model"];
  11. return $1;
  12. }, function($ctx1) {$ctx1.fill(self,"model",{},smalltalk.HLInspectorDisplayWidget)})},
  13. messageSends: []}),
  14. smalltalk.HLInspectorDisplayWidget);
  15. smalltalk.addMethod(
  16. smalltalk.method({
  17. selector: "model:",
  18. fn: function (aModel){
  19. var self=this;
  20. return smalltalk.withContext(function($ctx1) {
  21. self["@model"]=aModel;
  22. return self}, function($ctx1) {$ctx1.fill(self,"model:",{aModel:aModel},smalltalk.HLInspectorDisplayWidget)})},
  23. messageSends: []}),
  24. smalltalk.HLInspectorDisplayWidget);
  25. smalltalk.addMethod(
  26. smalltalk.method({
  27. selector: "renderContentOn:",
  28. fn: function (html){
  29. var self=this;
  30. return smalltalk.withContext(function($ctx1) {
  31. _st(_st(html)._div())._with_(_st(self)._selectionDisplayString());
  32. return self}, function($ctx1) {$ctx1.fill(self,"renderContentOn:",{html:html},smalltalk.HLInspectorDisplayWidget)})},
  33. messageSends: ["with:", "selectionDisplayString", "div"]}),
  34. smalltalk.HLInspectorDisplayWidget);
  35. smalltalk.addMethod(
  36. smalltalk.method({
  37. selector: "selectionDisplayString",
  38. fn: function (){
  39. var self=this;
  40. var selection;
  41. return smalltalk.withContext(function($ctx1) {
  42. var $2,$1;
  43. selection=_st(self["@model"])._selection();
  44. $2=_st(_st(_st(self["@model"])._variables())._keys())._includes_(selection);
  45. if(smalltalk.assert($2)){
  46. $1=_st(_st(self["@model"])._instVarObjectAt_(selection))._printString();
  47. } else {
  48. $1="";
  49. };
  50. return $1;
  51. }, function($ctx1) {$ctx1.fill(self,"selectionDisplayString",{selection:selection},smalltalk.HLInspectorDisplayWidget)})},
  52. messageSends: ["selection", "ifTrue:ifFalse:", "printString", "instVarObjectAt:", "includes:", "keys", "variables"]}),
  53. smalltalk.HLInspectorDisplayWidget);
  54. smalltalk.addClass('HLInspectorModel', smalltalk.Object, ['announcer', 'environment', 'inspectee', 'code', 'variables', 'label', 'selection'], 'Helios-Inspector');
  55. smalltalk.addMethod(
  56. smalltalk.method({
  57. selector: "announcer",
  58. fn: function (){
  59. var self=this;
  60. function $Announcer(){return smalltalk.Announcer||(typeof Announcer=="undefined"?nil:Announcer)}
  61. return smalltalk.withContext(function($ctx1) {
  62. var $2,$1;
  63. $2=self["@announcer"];
  64. if(($receiver = $2) == nil || $receiver == undefined){
  65. self["@announcer"]=_st($Announcer())._new();
  66. $1=self["@announcer"];
  67. } else {
  68. $1=$2;
  69. };
  70. return $1;
  71. }, function($ctx1) {$ctx1.fill(self,"announcer",{},smalltalk.HLInspectorModel)})},
  72. messageSends: ["ifNil:", "new"]}),
  73. smalltalk.HLInspectorModel);
  74. smalltalk.addMethod(
  75. smalltalk.method({
  76. selector: "code",
  77. fn: function (){
  78. var self=this;
  79. function $HLCodeModel(){return smalltalk.HLCodeModel||(typeof HLCodeModel=="undefined"?nil:HLCodeModel)}
  80. return smalltalk.withContext(function($ctx1) {
  81. var $2,$1;
  82. $2=self["@code"];
  83. if(($receiver = $2) == nil || $receiver == undefined){
  84. self["@code"]=_st($HLCodeModel())._on_(_st(self)._environment());
  85. $1=self["@code"];
  86. } else {
  87. $1=$2;
  88. };
  89. return $1;
  90. }, function($ctx1) {$ctx1.fill(self,"code",{},smalltalk.HLInspectorModel)})},
  91. messageSends: ["ifNil:", "on:", "environment"]}),
  92. smalltalk.HLInspectorModel);
  93. smalltalk.addMethod(
  94. smalltalk.method({
  95. selector: "environment",
  96. fn: function (){
  97. var self=this;
  98. function $HLManager(){return smalltalk.HLManager||(typeof HLManager=="undefined"?nil:HLManager)}
  99. return smalltalk.withContext(function($ctx1) {
  100. var $2,$1;
  101. $2=self["@environment"];
  102. if(($receiver = $2) == nil || $receiver == undefined){
  103. $1=_st(_st($HLManager())._current())._environment();
  104. } else {
  105. $1=$2;
  106. };
  107. return $1;
  108. }, function($ctx1) {$ctx1.fill(self,"environment",{},smalltalk.HLInspectorModel)})},
  109. messageSends: ["ifNil:", "environment", "current"]}),
  110. smalltalk.HLInspectorModel);
  111. smalltalk.addMethod(
  112. smalltalk.method({
  113. selector: "environment:",
  114. fn: function (anEnvironment){
  115. var self=this;
  116. return smalltalk.withContext(function($ctx1) {
  117. self["@environment"]=anEnvironment;
  118. return self}, function($ctx1) {$ctx1.fill(self,"environment:",{anEnvironment:anEnvironment},smalltalk.HLInspectorModel)})},
  119. messageSends: []}),
  120. smalltalk.HLInspectorModel);
  121. smalltalk.addMethod(
  122. smalltalk.method({
  123. selector: "inspect:on:",
  124. fn: function (anObject,anInspector){
  125. var self=this;
  126. return smalltalk.withContext(function($ctx1) {
  127. self["@inspectee"]=anObject;
  128. self["@variables"]=[];
  129. _st(self["@inspectee"])._inspectOn_(anInspector);
  130. return self}, function($ctx1) {$ctx1.fill(self,"inspect:on:",{anObject:anObject,anInspector:anInspector},smalltalk.HLInspectorModel)})},
  131. messageSends: ["inspectOn:"]}),
  132. smalltalk.HLInspectorModel);
  133. smalltalk.addMethod(
  134. smalltalk.method({
  135. selector: "inspectee",
  136. fn: function (){
  137. var self=this;
  138. return smalltalk.withContext(function($ctx1) {
  139. var $1;
  140. $1=self["@inspectee"];
  141. return $1;
  142. }, function($ctx1) {$ctx1.fill(self,"inspectee",{},smalltalk.HLInspectorModel)})},
  143. messageSends: []}),
  144. smalltalk.HLInspectorModel);
  145. smalltalk.addMethod(
  146. smalltalk.method({
  147. selector: "inspectee:",
  148. fn: function (anObject){
  149. var self=this;
  150. return smalltalk.withContext(function($ctx1) {
  151. self["@inspectee"]=anObject;
  152. return self}, function($ctx1) {$ctx1.fill(self,"inspectee:",{anObject:anObject},smalltalk.HLInspectorModel)})},
  153. messageSends: []}),
  154. smalltalk.HLInspectorModel);
  155. smalltalk.addMethod(
  156. smalltalk.method({
  157. selector: "instVarObjectAt:",
  158. fn: function (anInstVarName){
  159. var self=this;
  160. return smalltalk.withContext(function($ctx1) {
  161. var $1;
  162. $1=_st(_st(self)._variables())._at_(anInstVarName);
  163. return $1;
  164. }, function($ctx1) {$ctx1.fill(self,"instVarObjectAt:",{anInstVarName:anInstVarName},smalltalk.HLInspectorModel)})},
  165. messageSends: ["at:", "variables"]}),
  166. smalltalk.HLInspectorModel);
  167. smalltalk.addMethod(
  168. smalltalk.method({
  169. selector: "label",
  170. fn: function (){
  171. var self=this;
  172. return smalltalk.withContext(function($ctx1) {
  173. var $2,$1;
  174. $2=self["@label"];
  175. if(($receiver = $2) == nil || $receiver == undefined){
  176. $1=_st(_st(self)._inspectee())._printString();
  177. } else {
  178. $1=$2;
  179. };
  180. return $1;
  181. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLInspectorModel)})},
  182. messageSends: ["ifNil:", "printString", "inspectee"]}),
  183. smalltalk.HLInspectorModel);
  184. smalltalk.addMethod(
  185. smalltalk.method({
  186. selector: "label:",
  187. fn: function (aString){
  188. var self=this;
  189. return smalltalk.withContext(function($ctx1) {
  190. self["@label"]=aString;
  191. return self}, function($ctx1) {$ctx1.fill(self,"label:",{aString:aString},smalltalk.HLInspectorModel)})},
  192. messageSends: []}),
  193. smalltalk.HLInspectorModel);
  194. smalltalk.addMethod(
  195. smalltalk.method({
  196. selector: "onKeyDown:",
  197. fn: function (anEvent){
  198. var self=this;
  199. return smalltalk.withContext(function($ctx1) {
  200. if(anEvent.ctrlKey) {
  201. if(anEvent.keyCode === 80) { //ctrl+p
  202. self._printIt();
  203. anEvent.preventDefault();
  204. return false;
  205. }
  206. if(anEvent.keyCode === 68) { //ctrl+d
  207. self._doIt();
  208. anEvent.preventDefault();
  209. return false;
  210. }
  211. if(anEvent.keyCode === 73) { //ctrl+i
  212. self._inspectIt();
  213. anEvent.preventDefault();
  214. return false;
  215. }
  216. };
  217. return self}, function($ctx1) {$ctx1.fill(self,"onKeyDown:",{anEvent:anEvent},smalltalk.HLInspectorModel)})},
  218. messageSends: []}),
  219. smalltalk.HLInspectorModel);
  220. smalltalk.addMethod(
  221. smalltalk.method({
  222. selector: "selectedInstVar:",
  223. fn: function (anInstVarName){
  224. var self=this;
  225. return smalltalk.withContext(function($ctx1) {
  226. _st(self)._selection_(anInstVarName);
  227. return self}, function($ctx1) {$ctx1.fill(self,"selectedInstVar:",{anInstVarName:anInstVarName},smalltalk.HLInspectorModel)})},
  228. messageSends: ["selection:"]}),
  229. smalltalk.HLInspectorModel);
  230. smalltalk.addMethod(
  231. smalltalk.method({
  232. selector: "selectedInstVarObject",
  233. fn: function (){
  234. var self=this;
  235. return smalltalk.withContext(function($ctx1) {
  236. var $1;
  237. $1=_st(self)._instVarObjectAt_(_st(self)._selection());
  238. return $1;
  239. }, function($ctx1) {$ctx1.fill(self,"selectedInstVarObject",{},smalltalk.HLInspectorModel)})},
  240. messageSends: ["instVarObjectAt:", "selection"]}),
  241. smalltalk.HLInspectorModel);
  242. smalltalk.addMethod(
  243. smalltalk.method({
  244. selector: "selection",
  245. fn: function (){
  246. var self=this;
  247. return smalltalk.withContext(function($ctx1) {
  248. var $2,$1;
  249. $2=self["@selection"];
  250. if(($receiver = $2) == nil || $receiver == undefined){
  251. $1="";
  252. } else {
  253. $1=$2;
  254. };
  255. return $1;
  256. }, function($ctx1) {$ctx1.fill(self,"selection",{},smalltalk.HLInspectorModel)})},
  257. messageSends: ["ifNil:"]}),
  258. smalltalk.HLInspectorModel);
  259. smalltalk.addMethod(
  260. smalltalk.method({
  261. selector: "selection:",
  262. fn: function (anObject){
  263. var self=this;
  264. function $HLInstanceVariableSelected(){return smalltalk.HLInstanceVariableSelected||(typeof HLInstanceVariableSelected=="undefined"?nil:HLInstanceVariableSelected)}
  265. return smalltalk.withContext(function($ctx1) {
  266. self["@selection"]=anObject;
  267. _st(_st(self)._announcer())._announce_(_st($HLInstanceVariableSelected())._on_(self["@selection"]));
  268. return self}, function($ctx1) {$ctx1.fill(self,"selection:",{anObject:anObject},smalltalk.HLInspectorModel)})},
  269. messageSends: ["announce:", "on:", "announcer"]}),
  270. smalltalk.HLInspectorModel);
  271. smalltalk.addMethod(
  272. smalltalk.method({
  273. selector: "subscribe:",
  274. fn: function (aWidget){
  275. var self=this;
  276. return smalltalk.withContext(function($ctx1) {
  277. _st(aWidget)._subscribeTo_(_st(self)._announcer());
  278. return self}, function($ctx1) {$ctx1.fill(self,"subscribe:",{aWidget:aWidget},smalltalk.HLInspectorModel)})},
  279. messageSends: ["subscribeTo:", "announcer"]}),
  280. smalltalk.HLInspectorModel);
  281. smalltalk.addMethod(
  282. smalltalk.method({
  283. selector: "variables",
  284. fn: function (){
  285. var self=this;
  286. function $Dictionary(){return smalltalk.Dictionary||(typeof Dictionary=="undefined"?nil:Dictionary)}
  287. return smalltalk.withContext(function($ctx1) {
  288. var $2,$1;
  289. $2=self["@variables"];
  290. if(($receiver = $2) == nil || $receiver == undefined){
  291. $1=_st($Dictionary())._new();
  292. } else {
  293. $1=$2;
  294. };
  295. return $1;
  296. }, function($ctx1) {$ctx1.fill(self,"variables",{},smalltalk.HLInspectorModel)})},
  297. messageSends: ["ifNil:", "new"]}),
  298. smalltalk.HLInspectorModel);
  299. smalltalk.addMethod(
  300. smalltalk.method({
  301. selector: "variables:",
  302. fn: function (aCollection){
  303. var self=this;
  304. return smalltalk.withContext(function($ctx1) {
  305. self["@variables"]=aCollection;
  306. return self}, function($ctx1) {$ctx1.fill(self,"variables:",{aCollection:aCollection},smalltalk.HLInspectorModel)})},
  307. messageSends: []}),
  308. smalltalk.HLInspectorModel);
  309. smalltalk.addMethod(
  310. smalltalk.method({
  311. selector: "on:",
  312. fn: function (anEnvironment){
  313. var self=this;
  314. return smalltalk.withContext(function($ctx1) {
  315. var $2,$3,$1;
  316. $2=_st(self)._new();
  317. _st($2)._environment_(anEnvironment);
  318. $3=_st($2)._yourself();
  319. $1=$3;
  320. return $1;
  321. }, function($ctx1) {$ctx1.fill(self,"on:",{anEnvironment:anEnvironment},smalltalk.HLInspectorModel.klass)})},
  322. messageSends: ["environment:", "new", "yourself"]}),
  323. smalltalk.HLInspectorModel.klass);
  324. smalltalk.addClass('HLInspectorVariablesWidget', smalltalk.HLNavigationListWidget, ['announcer', 'model', 'list', 'diveButton'], 'Helios-Inspector');
  325. smalltalk.addMethod(
  326. smalltalk.method({
  327. selector: "announcer",
  328. fn: function (){
  329. var self=this;
  330. function $Announcer(){return smalltalk.Announcer||(typeof Announcer=="undefined"?nil:Announcer)}
  331. return smalltalk.withContext(function($ctx1) {
  332. var $2,$1;
  333. $2=self["@announcer"];
  334. if(($receiver = $2) == nil || $receiver == undefined){
  335. self["@announcer"]=_st($Announcer())._new();
  336. $1=self["@announcer"];
  337. } else {
  338. $1=$2;
  339. };
  340. return $1;
  341. }, function($ctx1) {$ctx1.fill(self,"announcer",{},smalltalk.HLInspectorVariablesWidget)})},
  342. messageSends: ["ifNil:", "new"]}),
  343. smalltalk.HLInspectorVariablesWidget);
  344. smalltalk.addMethod(
  345. smalltalk.method({
  346. selector: "defaultItems",
  347. fn: function (){
  348. var self=this;
  349. return smalltalk.withContext(function($ctx1) {
  350. var $1;
  351. $1=_st(self)._variables();
  352. return $1;
  353. }, function($ctx1) {$ctx1.fill(self,"defaultItems",{},smalltalk.HLInspectorVariablesWidget)})},
  354. messageSends: ["variables"]}),
  355. smalltalk.HLInspectorVariablesWidget);
  356. smalltalk.addMethod(
  357. smalltalk.method({
  358. selector: "label",
  359. fn: function (){
  360. var self=this;
  361. return smalltalk.withContext(function($ctx1) {
  362. var $1;
  363. $1=_st(_st(self)._model())._label();
  364. return $1;
  365. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLInspectorVariablesWidget)})},
  366. messageSends: ["label", "model"]}),
  367. smalltalk.HLInspectorVariablesWidget);
  368. smalltalk.addMethod(
  369. smalltalk.method({
  370. selector: "model",
  371. fn: function (){
  372. var self=this;
  373. return smalltalk.withContext(function($ctx1) {
  374. var $1;
  375. $1=self["@model"];
  376. return $1;
  377. }, function($ctx1) {$ctx1.fill(self,"model",{},smalltalk.HLInspectorVariablesWidget)})},
  378. messageSends: []}),
  379. smalltalk.HLInspectorVariablesWidget);
  380. smalltalk.addMethod(
  381. smalltalk.method({
  382. selector: "model:",
  383. fn: function (aModel){
  384. var self=this;
  385. return smalltalk.withContext(function($ctx1) {
  386. self["@model"]=aModel;
  387. return self}, function($ctx1) {$ctx1.fill(self,"model:",{aModel:aModel},smalltalk.HLInspectorVariablesWidget)})},
  388. messageSends: []}),
  389. smalltalk.HLInspectorVariablesWidget);
  390. smalltalk.addMethod(
  391. smalltalk.method({
  392. selector: "refresh",
  393. fn: function (){
  394. var self=this;
  395. return smalltalk.withContext(function($ctx1) {
  396. var $1;
  397. $1=_st(_st(self)._variables()).__eq(_st(self)._items());
  398. if(! smalltalk.assert($1)){
  399. _st(self)._resetItems();
  400. smalltalk.HLNavigationListWidget.fn.prototype._refresh.apply(_st(self), []);
  401. };
  402. return self}, function($ctx1) {$ctx1.fill(self,"refresh",{},smalltalk.HLInspectorVariablesWidget)})},
  403. messageSends: ["ifFalse:", "resetItems", "refresh", "=", "items", "variables"]}),
  404. smalltalk.HLInspectorVariablesWidget);
  405. smalltalk.addMethod(
  406. smalltalk.method({
  407. selector: "renderButtonsOn:",
  408. fn: function (html){
  409. var self=this;
  410. function $HLDiveRequested(){return smalltalk.HLDiveRequested||(typeof HLDiveRequested=="undefined"?nil:HLDiveRequested)}
  411. return smalltalk.withContext(function($ctx1) {
  412. var $1,$2;
  413. $1=_st(html)._button();
  414. _st($1)._class_("btn");
  415. _st($1)._with_("Dive");
  416. $2=_st($1)._onClick_((function(){
  417. return smalltalk.withContext(function($ctx2) {
  418. return _st(_st(self)._announcer())._announce_(_st($HLDiveRequested())._new());
  419. }, function($ctx2) {$ctx2.fillBlock({},$ctx1)})}));
  420. self["@diveButton"]=$2;
  421. return self}, function($ctx1) {$ctx1.fill(self,"renderButtonsOn:",{html:html},smalltalk.HLInspectorVariablesWidget)})},
  422. messageSends: ["class:", "button", "with:", "onClick:", "announce:", "new", "announcer"]}),
  423. smalltalk.HLInspectorVariablesWidget);
  424. smalltalk.addMethod(
  425. smalltalk.method({
  426. selector: "renderContentOn:",
  427. fn: function (html){
  428. var self=this;
  429. return smalltalk.withContext(function($ctx1) {
  430. _st(self)._renderHeadOn_(html);
  431. smalltalk.HLNavigationListWidget.fn.prototype._renderContentOn_.apply(_st(self), [html]);
  432. return self}, function($ctx1) {$ctx1.fill(self,"renderContentOn:",{html:html},smalltalk.HLInspectorVariablesWidget)})},
  433. messageSends: ["renderHeadOn:", "renderContentOn:"]}),
  434. smalltalk.HLInspectorVariablesWidget);
  435. smalltalk.addMethod(
  436. smalltalk.method({
  437. selector: "renderHeadOn:",
  438. fn: function (html){
  439. var self=this;
  440. return smalltalk.withContext(function($ctx1) {
  441. var $1,$2;
  442. $1=_st(html)._div();
  443. _st($1)._class_("list-label");
  444. $2=_st($1)._with_(_st(self)._label());
  445. return self}, function($ctx1) {$ctx1.fill(self,"renderHeadOn:",{html:html},smalltalk.HLInspectorVariablesWidget)})},
  446. messageSends: ["class:", "div", "with:", "label"]}),
  447. smalltalk.HLInspectorVariablesWidget);
  448. smalltalk.addMethod(
  449. smalltalk.method({
  450. selector: "resetItems",
  451. fn: function (){
  452. var self=this;
  453. return smalltalk.withContext(function($ctx1) {
  454. self["@items"]=nil;
  455. return self}, function($ctx1) {$ctx1.fill(self,"resetItems",{},smalltalk.HLInspectorVariablesWidget)})},
  456. messageSends: []}),
  457. smalltalk.HLInspectorVariablesWidget);
  458. smalltalk.addMethod(
  459. smalltalk.method({
  460. selector: "selectItem:",
  461. fn: function (anObject){
  462. var self=this;
  463. return smalltalk.withContext(function($ctx1) {
  464. smalltalk.HLNavigationListWidget.fn.prototype._selectItem_.apply(_st(self), [anObject]);
  465. _st(_st(self)._model())._selectedInstVar_(anObject);
  466. return self}, function($ctx1) {$ctx1.fill(self,"selectItem:",{anObject:anObject},smalltalk.HLInspectorVariablesWidget)})},
  467. messageSends: ["selectItem:", "selectedInstVar:", "model"]}),
  468. smalltalk.HLInspectorVariablesWidget);
  469. smalltalk.addMethod(
  470. smalltalk.method({
  471. selector: "selection",
  472. fn: function (){
  473. var self=this;
  474. return smalltalk.withContext(function($ctx1) {
  475. var $1;
  476. $1=_st(self["@model"])._selection();
  477. return $1;
  478. }, function($ctx1) {$ctx1.fill(self,"selection",{},smalltalk.HLInspectorVariablesWidget)})},
  479. messageSends: ["selection"]}),
  480. smalltalk.HLInspectorVariablesWidget);
  481. smalltalk.addMethod(
  482. smalltalk.method({
  483. selector: "variables",
  484. fn: function (){
  485. var self=this;
  486. return smalltalk.withContext(function($ctx1) {
  487. var $1;
  488. $1=_st(_st(_st(self)._model())._variables())._keys();
  489. return $1;
  490. }, function($ctx1) {$ctx1.fill(self,"variables",{},smalltalk.HLInspectorVariablesWidget)})},
  491. messageSends: ["keys", "variables", "model"]}),
  492. smalltalk.HLInspectorVariablesWidget);
  493. smalltalk.addClass('HLInspectorWidget', smalltalk.HLWidget, ['model', 'variablesWidget', 'displayWidget', 'codeWidget'], 'Helios-Inspector');
  494. smalltalk.addMethod(
  495. smalltalk.method({
  496. selector: "codeWidget",
  497. fn: function (){
  498. var self=this;
  499. function $HLCodeWidget(){return smalltalk.HLCodeWidget||(typeof HLCodeWidget=="undefined"?nil:HLCodeWidget)}
  500. return smalltalk.withContext(function($ctx1) {
  501. var $2,$3,$4,$1;
  502. $2=self["@codeWidget"];
  503. if(($receiver = $2) == nil || $receiver == undefined){
  504. $3=_st($HLCodeWidget())._new();
  505. _st($3)._model_(_st(self["@model"])._code());
  506. _st($3)._receiver_(_st(self["@model"])._inspectee());
  507. $4=_st($3)._yourself();
  508. self["@codeWidget"]=$4;
  509. $1=self["@codeWidget"];
  510. } else {
  511. $1=$2;
  512. };
  513. return $1;
  514. }, function($ctx1) {$ctx1.fill(self,"codeWidget",{},smalltalk.HLInspectorWidget)})},
  515. messageSends: ["ifNil:", "model:", "code", "new", "receiver:", "inspectee", "yourself"]}),
  516. smalltalk.HLInspectorWidget);
  517. smalltalk.addMethod(
  518. smalltalk.method({
  519. selector: "displayWidget",
  520. fn: function (){
  521. var self=this;
  522. function $HLInspectorDisplayWidget(){return smalltalk.HLInspectorDisplayWidget||(typeof HLInspectorDisplayWidget=="undefined"?nil:HLInspectorDisplayWidget)}
  523. return smalltalk.withContext(function($ctx1) {
  524. var $2,$3,$4,$1;
  525. $2=self["@displayWidget"];
  526. if(($receiver = $2) == nil || $receiver == undefined){
  527. $3=_st($HLInspectorDisplayWidget())._new();
  528. _st($3)._model_(_st(self)._model());
  529. $4=_st($3)._yourself();
  530. self["@displayWidget"]=$4;
  531. $1=self["@displayWidget"];
  532. } else {
  533. $1=$2;
  534. };
  535. return $1;
  536. }, function($ctx1) {$ctx1.fill(self,"displayWidget",{},smalltalk.HLInspectorWidget)})},
  537. messageSends: ["ifNil:", "model:", "model", "new", "yourself"]}),
  538. smalltalk.HLInspectorWidget);
  539. smalltalk.addMethod(
  540. smalltalk.method({
  541. selector: "initialize",
  542. fn: function (){
  543. var self=this;
  544. return smalltalk.withContext(function($ctx1) {
  545. smalltalk.HLWidget.fn.prototype._initialize.apply(_st(self), []);
  546. _st(self)._register();
  547. return self}, function($ctx1) {$ctx1.fill(self,"initialize",{},smalltalk.HLInspectorWidget)})},
  548. messageSends: ["initialize", "register"]}),
  549. smalltalk.HLInspectorWidget);
  550. smalltalk.addMethod(
  551. smalltalk.method({
  552. selector: "inspect:",
  553. fn: function (anObject){
  554. var self=this;
  555. return smalltalk.withContext(function($ctx1) {
  556. var $1,$2;
  557. _st(_st(self)._model())._inspect_on_(anObject,self);
  558. $1=self;
  559. _st($1)._refreshVariablesWidget();
  560. $2=_st($1)._refreshDisplayWidget();
  561. return self}, function($ctx1) {$ctx1.fill(self,"inspect:",{anObject:anObject},smalltalk.HLInspectorWidget)})},
  562. messageSends: ["inspect:on:", "model", "refreshVariablesWidget", "refreshDisplayWidget"]}),
  563. smalltalk.HLInspectorWidget);
  564. smalltalk.addMethod(
  565. smalltalk.method({
  566. selector: "inspectee",
  567. fn: function (){
  568. var self=this;
  569. return smalltalk.withContext(function($ctx1) {
  570. var $1;
  571. $1=_st(_st(self)._model())._inspectee();
  572. return $1;
  573. }, function($ctx1) {$ctx1.fill(self,"inspectee",{},smalltalk.HLInspectorWidget)})},
  574. messageSends: ["inspectee", "model"]}),
  575. smalltalk.HLInspectorWidget);
  576. smalltalk.addMethod(
  577. smalltalk.method({
  578. selector: "inspectee:",
  579. fn: function (anObject){
  580. var self=this;
  581. return smalltalk.withContext(function($ctx1) {
  582. _st(_st(self)._model())._inspectee_(anObject);
  583. return self}, function($ctx1) {$ctx1.fill(self,"inspectee:",{anObject:anObject},smalltalk.HLInspectorWidget)})},
  584. messageSends: ["inspectee:", "model"]}),
  585. smalltalk.HLInspectorWidget);
  586. smalltalk.addMethod(
  587. smalltalk.method({
  588. selector: "label",
  589. fn: function (){
  590. var self=this;
  591. return smalltalk.withContext(function($ctx1) {
  592. var $1;
  593. $1=_st(_st(self)._model())._label();
  594. return $1;
  595. }, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLInspectorWidget)})},
  596. messageSends: ["label", "model"]}),
  597. smalltalk.HLInspectorWidget);
  598. smalltalk.addMethod(
  599. smalltalk.method({
  600. selector: "model",
  601. fn: function (){
  602. var self=this;
  603. function $HLInspectorModel(){return smalltalk.HLInspectorModel||(typeof HLInspectorModel=="undefined"?nil:HLInspectorModel)}
  604. return smalltalk.withContext(function($ctx1) {
  605. var $2,$1;
  606. $2=self["@model"];
  607. if(($receiver = $2) == nil || $receiver == undefined){
  608. _st(self)._model_(_st($HLInspectorModel())._new());
  609. $1=self["@model"];
  610. } else {
  611. $1=$2;
  612. };
  613. return $1;
  614. }, function($ctx1) {$ctx1.fill(self,"model",{},smalltalk.HLInspectorWidget)})},
  615. messageSends: ["ifNil:", "model:", "new"]}),
  616. smalltalk.HLInspectorWidget);
  617. smalltalk.addMethod(
  618. smalltalk.method({
  619. selector: "model:",
  620. fn: function (aModel){
  621. var self=this;
  622. return smalltalk.withContext(function($ctx1) {
  623. var $1,$2;
  624. self["@model"]=aModel;
  625. _st(_st(self)._codeWidget())._model_(_st(aModel)._code());
  626. $1=self;
  627. _st($1)._observeCodeWidget();
  628. _st($1)._observeVariablesWidget();
  629. $2=_st($1)._observeModel();
  630. return self}, function($ctx1) {$ctx1.fill(self,"model:",{aModel:aModel},smalltalk.HLInspectorWidget)})},
  631. messageSends: ["model:", "code", "codeWidget", "observeCodeWidget", "observeVariablesWidget", "observeModel"]}),
  632. smalltalk.HLInspectorWidget);
  633. smalltalk.addMethod(
  634. smalltalk.method({
  635. selector: "observeCodeWidget",
  636. fn: function (){
  637. var self=this;
  638. function $HLDoItExecuted(){return smalltalk.HLDoItExecuted||(typeof HLDoItExecuted=="undefined"?nil:HLDoItExecuted)}
  639. return smalltalk.withContext(function($ctx1) {
  640. _st(_st(_st(self)._codeWidget())._announcer())._on_do_($HLDoItExecuted(),(function(){
  641. return smalltalk.withContext(function($ctx2) {
  642. return _st(self)._onDoneIt();
  643. }, function($ctx2) {$ctx2.fillBlock({},$ctx1)})}));
  644. return self}, function($ctx1) {$ctx1.fill(self,"observeCodeWidget",{},smalltalk.HLInspectorWidget)})},
  645. messageSends: ["on:do:", "onDoneIt", "announcer", "codeWidget"]}),
  646. smalltalk.HLInspectorWidget);
  647. smalltalk.addMethod(
  648. smalltalk.method({
  649. selector: "observeModel",
  650. fn: function (){
  651. var self=this;
  652. function $HLInstanceVariableSelected(){return smalltalk.HLInstanceVariableSelected||(typeof HLInstanceVariableSelected=="undefined"?nil:HLInstanceVariableSelected)}
  653. return smalltalk.withContext(function($ctx1) {
  654. _st(_st(_st(self)._model())._announcer())._on_send_to_($HLInstanceVariableSelected(),"onInstanceVariableSelected",self);
  655. return self}, function($ctx1) {$ctx1.fill(self,"observeModel",{},smalltalk.HLInspectorWidget)})},
  656. messageSends: ["on:send:to:", "announcer", "model"]}),
  657. smalltalk.HLInspectorWidget);
  658. smalltalk.addMethod(
  659. smalltalk.method({
  660. selector: "observeVariablesWidget",
  661. fn: function (){
  662. var self=this;
  663. function $HLDiveRequested(){return smalltalk.HLDiveRequested||(typeof HLDiveRequested=="undefined"?nil:HLDiveRequested)}
  664. return smalltalk.withContext(function($ctx1) {
  665. _st(_st(_st(self)._variablesWidget())._announcer())._on_do_($HLDiveRequested(),(function(){
  666. return smalltalk.withContext(function($ctx2) {
  667. return _st(self)._onDive();
  668. }, function($ctx2) {$ctx2.fillBlock({},$ctx1)})}));
  669. return self}, function($ctx1) {$ctx1.fill(self,"observeVariablesWidget",{},smalltalk.HLInspectorWidget)})},
  670. messageSends: ["on:do:", "onDive", "announcer", "variablesWidget"]}),
  671. smalltalk.HLInspectorWidget);
  672. smalltalk.addMethod(
  673. smalltalk.method({
  674. selector: "onDive",
  675. fn: function (){
  676. var self=this;
  677. function $HLInspector(){return smalltalk.HLInspector||(typeof HLInspector=="undefined"?nil:HLInspector)}
  678. return smalltalk.withContext(function($ctx1) {
  679. var $1,$2;
  680. $1=_st($HLInspector())._new();
  681. _st($1)._inspect_(_st(_st(self)._model())._selectedInstVarObject());
  682. $2=_st($1)._open();
  683. return self}, function($ctx1) {$ctx1.fill(self,"onDive",{},smalltalk.HLInspectorWidget)})},
  684. messageSends: ["inspect:", "selectedInstVarObject", "model", "new", "open"]}),
  685. smalltalk.HLInspectorWidget);
  686. smalltalk.addMethod(
  687. smalltalk.method({
  688. selector: "onDoneIt",
  689. fn: function (){
  690. var self=this;
  691. return smalltalk.withContext(function($ctx1) {
  692. _st(self)._refresh();
  693. return self}, function($ctx1) {$ctx1.fill(self,"onDoneIt",{},smalltalk.HLInspectorWidget)})},
  694. messageSends: ["refresh"]}),
  695. smalltalk.HLInspectorWidget);
  696. smalltalk.addMethod(
  697. smalltalk.method({
  698. selector: "onInspectIt",
  699. fn: function (){
  700. var self=this;
  701. return smalltalk.withContext(function($ctx1) {
  702. return self}, function($ctx1) {$ctx1.fill(self,"onInspectIt",{},smalltalk.HLInspectorWidget)})},
  703. messageSends: []}),
  704. smalltalk.HLInspectorWidget);
  705. smalltalk.addMethod(
  706. smalltalk.method({
  707. selector: "onInstanceVariableSelected",
  708. fn: function (){
  709. var self=this;
  710. return smalltalk.withContext(function($ctx1) {
  711. _st(_st(self)._codeWidget())._receiver_(_st(_st(self)._model())._selectedInstVarObject());
  712. _st(self)._refreshDisplayWidget();
  713. return self}, function($ctx1) {$ctx1.fill(self,"onInstanceVariableSelected",{},smalltalk.HLInspectorWidget)})},
  714. messageSends: ["receiver:", "selectedInstVarObject", "model", "codeWidget", "refreshDisplayWidget"]}),
  715. smalltalk.HLInspectorWidget);
  716. smalltalk.addMethod(
  717. smalltalk.method({
  718. selector: "onPrintIt",
  719. fn: function (){
  720. var self=this;
  721. return smalltalk.withContext(function($ctx1) {
  722. return self}, function($ctx1) {$ctx1.fill(self,"onPrintIt",{},smalltalk.HLInspectorWidget)})},
  723. messageSends: []}),
  724. smalltalk.HLInspectorWidget);
  725. smalltalk.addMethod(
  726. smalltalk.method({
  727. selector: "open",
  728. fn: function (){
  729. var self=this;
  730. function $HLTab(){return smalltalk.HLTab||(typeof HLTab=="undefined"?nil:HLTab)}
  731. function $HLManager(){return smalltalk.HLManager||(typeof HLManager=="undefined"?nil:HLManager)}
  732. return smalltalk.withContext(function($ctx1) {
  733. _st(_st($HLManager())._current())._addTab_(_st($HLTab())._on_labelled_(self,_st(self)._tabLabel()));
  734. return self}, function($ctx1) {$ctx1.fill(self,"open",{},smalltalk.HLInspectorWidget)})},
  735. messageSends: ["addTab:", "on:labelled:", "tabLabel", "current"]}),
  736. smalltalk.HLInspectorWidget);
  737. smalltalk.addMethod(
  738. smalltalk.method({
  739. selector: "refresh",
  740. fn: function (){
  741. var self=this;
  742. return smalltalk.withContext(function($ctx1) {
  743. var $1,$2;
  744. $1=self;
  745. _st($1)._refreshVariablesWidget();
  746. $2=_st($1)._refreshDisplayWidget();
  747. return self}, function($ctx1) {$ctx1.fill(self,"refresh",{},smalltalk.HLInspectorWidget)})},
  748. messageSends: ["refreshVariablesWidget", "refreshDisplayWidget"]}),
  749. smalltalk.HLInspectorWidget);
  750. smalltalk.addMethod(
  751. smalltalk.method({
  752. selector: "refreshDisplayWidget",
  753. fn: function (){
  754. var self=this;
  755. return smalltalk.withContext(function($ctx1) {
  756. _st(_st(self)._displayWidget())._refresh();
  757. return self}, function($ctx1) {$ctx1.fill(self,"refreshDisplayWidget",{},smalltalk.HLInspectorWidget)})},
  758. messageSends: ["refresh", "displayWidget"]}),
  759. smalltalk.HLInspectorWidget);
  760. smalltalk.addMethod(
  761. smalltalk.method({
  762. selector: "refreshVariablesWidget",
  763. fn: function (){
  764. var self=this;
  765. return smalltalk.withContext(function($ctx1) {
  766. _st(_st(self)._variablesWidget())._refresh();
  767. return self}, function($ctx1) {$ctx1.fill(self,"refreshVariablesWidget",{},smalltalk.HLInspectorWidget)})},
  768. messageSends: ["refresh", "variablesWidget"]}),
  769. smalltalk.HLInspectorWidget);
  770. smalltalk.addMethod(
  771. smalltalk.method({
  772. selector: "register",
  773. fn: function (){
  774. var self=this;
  775. function $HLInspector(){return smalltalk.HLInspector||(typeof HLInspector=="undefined"?nil:HLInspector)}
  776. return smalltalk.withContext(function($ctx1) {
  777. _st($HLInspector())._register_(self);
  778. return self}, function($ctx1) {$ctx1.fill(self,"register",{},smalltalk.HLInspectorWidget)})},
  779. messageSends: ["register:"]}),
  780. smalltalk.HLInspectorWidget);
  781. smalltalk.addMethod(
  782. smalltalk.method({
  783. selector: "renderContentOn:",
  784. fn: function (html){
  785. var self=this;
  786. function $HLVerticalSplitter(){return smalltalk.HLVerticalSplitter||(typeof HLVerticalSplitter=="undefined"?nil:HLVerticalSplitter)}
  787. function $HLHorizontalSplitter(){return smalltalk.HLHorizontalSplitter||(typeof HLHorizontalSplitter=="undefined"?nil:HLHorizontalSplitter)}
  788. return smalltalk.withContext(function($ctx1) {
  789. _st(html)._with_(_st($HLHorizontalSplitter())._with_with_(_st($HLVerticalSplitter())._with_with_(_st(self)._variablesWidget(),_st(self)._displayWidget()),_st(self)._codeWidget()));
  790. return self}, function($ctx1) {$ctx1.fill(self,"renderContentOn:",{html:html},smalltalk.HLInspectorWidget)})},
  791. messageSends: ["with:", "with:with:", "variablesWidget", "displayWidget", "codeWidget"]}),
  792. smalltalk.HLInspectorWidget);
  793. smalltalk.addMethod(
  794. smalltalk.method({
  795. selector: "setLabel:",
  796. fn: function (aString){
  797. var self=this;
  798. return smalltalk.withContext(function($ctx1) {
  799. _st(_st(self)._model())._label_(aString);
  800. return self}, function($ctx1) {$ctx1.fill(self,"setLabel:",{aString:aString},smalltalk.HLInspectorWidget)})},
  801. messageSends: ["label:", "model"]}),
  802. smalltalk.HLInspectorWidget);
  803. smalltalk.addMethod(
  804. smalltalk.method({
  805. selector: "setVariables:",
  806. fn: function (aDictionary){
  807. var self=this;
  808. return smalltalk.withContext(function($ctx1) {
  809. _st(_st(self)._model())._variables_(aDictionary);
  810. return self}, function($ctx1) {$ctx1.fill(self,"setVariables:",{aDictionary:aDictionary},smalltalk.HLInspectorWidget)})},
  811. messageSends: ["variables:", "model"]}),
  812. smalltalk.HLInspectorWidget);
  813. smalltalk.addMethod(
  814. smalltalk.method({
  815. selector: "tabLabel",
  816. fn: function (){
  817. var self=this;
  818. return smalltalk.withContext(function($ctx1) {
  819. return "Inspector";
  820. }, function($ctx1) {$ctx1.fill(self,"tabLabel",{},smalltalk.HLInspectorWidget)})},
  821. messageSends: []}),
  822. smalltalk.HLInspectorWidget);
  823. smalltalk.addMethod(
  824. smalltalk.method({
  825. selector: "unregister",
  826. fn: function (){
  827. var self=this;
  828. function $HLInspector(){return smalltalk.HLInspector||(typeof HLInspector=="undefined"?nil:HLInspector)}
  829. return smalltalk.withContext(function($ctx1) {
  830. smalltalk.HLWidget.fn.prototype._unregister.apply(_st(self), []);
  831. _st($HLInspector())._unregister_(self);
  832. return self}, function($ctx1) {$ctx1.fill(self,"unregister",{},smalltalk.HLInspectorWidget)})},
  833. messageSends: ["unregister", "unregister:"]}),
  834. smalltalk.HLInspectorWidget);
  835. smalltalk.addMethod(
  836. smalltalk.method({
  837. selector: "variablesWidget",
  838. fn: function (){
  839. var self=this;
  840. function $HLInspectorVariablesWidget(){return smalltalk.HLInspectorVariablesWidget||(typeof HLInspectorVariablesWidget=="undefined"?nil:HLInspectorVariablesWidget)}
  841. return smalltalk.withContext(function($ctx1) {
  842. var $2,$3,$4,$1;
  843. $2=self["@variablesWidget"];
  844. if(($receiver = $2) == nil || $receiver == undefined){
  845. $3=_st($HLInspectorVariablesWidget())._new();
  846. _st($3)._model_(_st(self)._model());
  847. $4=_st($3)._yourself();
  848. self["@variablesWidget"]=$4;
  849. $1=self["@variablesWidget"];
  850. } else {
  851. $1=$2;
  852. };
  853. return $1;
  854. }, function($ctx1) {$ctx1.fill(self,"variablesWidget",{},smalltalk.HLInspectorWidget)})},
  855. messageSends: ["ifNil:", "model:", "model", "new", "yourself"]}),
  856. smalltalk.HLInspectorWidget);
  857. smalltalk.addClass('HLInspector', smalltalk.HLInspectorWidget, [], 'Helios-Inspector');
  858. smalltalk.addMethod(
  859. smalltalk.method({
  860. selector: "renderContentOn:",
  861. fn: function (html){
  862. var self=this;
  863. function $HLVerticalSplitter(){return smalltalk.HLVerticalSplitter||(typeof HLVerticalSplitter=="undefined"?nil:HLVerticalSplitter)}
  864. function $HLHorizontalSplitter(){return smalltalk.HLHorizontalSplitter||(typeof HLHorizontalSplitter=="undefined"?nil:HLHorizontalSplitter)}
  865. function $HLContainer(){return smalltalk.HLContainer||(typeof HLContainer=="undefined"?nil:HLContainer)}
  866. return smalltalk.withContext(function($ctx1) {
  867. _st(html)._with_(_st($HLContainer())._with_(_st($HLHorizontalSplitter())._with_with_(_st($HLVerticalSplitter())._with_with_(_st(self)._variablesWidget(),_st(self)._displayWidget()),_st(self)._codeWidget())));
  868. _st(_st(self)._variablesWidget())._focus();
  869. return self}, function($ctx1) {$ctx1.fill(self,"renderContentOn:",{html:html},smalltalk.HLInspector)})},
  870. messageSends: ["with:", "with:with:", "variablesWidget", "displayWidget", "codeWidget", "focus"]}),
  871. smalltalk.HLInspector);
  872. smalltalk.HLInspector.klass.iVarNames = ['inspectors'];
  873. smalltalk.addMethod(
  874. smalltalk.method({
  875. selector: "canBeOpenAsTab",
  876. fn: function (){
  877. var self=this;
  878. return smalltalk.withContext(function($ctx1) {
  879. return false;
  880. }, function($ctx1) {$ctx1.fill(self,"canBeOpenAsTab",{},smalltalk.HLInspector.klass)})},
  881. messageSends: []}),
  882. smalltalk.HLInspector.klass);
  883. smalltalk.addMethod(
  884. smalltalk.method({
  885. selector: "initialize",
  886. fn: function (){
  887. var self=this;
  888. return smalltalk.withContext(function($ctx1) {
  889. smalltalk.HLInspectorWidget.klass.fn.prototype._initialize.apply(_st(self), []);
  890. _st(self)._watchChanges();
  891. return self}, function($ctx1) {$ctx1.fill(self,"initialize",{},smalltalk.HLInspector.klass)})},
  892. messageSends: ["initialize", "watchChanges"]}),
  893. smalltalk.HLInspector.klass);
  894. smalltalk.addMethod(
  895. smalltalk.method({
  896. selector: "inspect:",
  897. fn: function (anObject){
  898. var self=this;
  899. return smalltalk.withContext(function($ctx1) {
  900. var $1,$2;
  901. $1=_st(self)._new();
  902. _st($1)._inspect_(anObject);
  903. $2=_st($1)._open();
  904. return self}, function($ctx1) {$ctx1.fill(self,"inspect:",{anObject:anObject},smalltalk.HLInspector.klass)})},
  905. messageSends: ["inspect:", "new", "open"]}),
  906. smalltalk.HLInspector.klass);
  907. smalltalk.addMethod(
  908. smalltalk.method({
  909. selector: "inspectors",
  910. fn: function (){
  911. var self=this;
  912. function $OrderedCollection(){return smalltalk.OrderedCollection||(typeof OrderedCollection=="undefined"?nil:OrderedCollection)}
  913. return smalltalk.withContext(function($ctx1) {
  914. var $2,$1;
  915. $2=self["@inspectors"];
  916. if(($receiver = $2) == nil || $receiver == undefined){
  917. self["@inspectors"]=_st($OrderedCollection())._new();
  918. $1=self["@inspectors"];
  919. } else {
  920. $1=$2;
  921. };
  922. return $1;
  923. }, function($ctx1) {$ctx1.fill(self,"inspectors",{},smalltalk.HLInspector.klass)})},
  924. messageSends: ["ifNil:", "new"]}),
  925. smalltalk.HLInspector.klass);
  926. smalltalk.addMethod(
  927. smalltalk.method({
  928. selector: "register:",
  929. fn: function (anInspector){
  930. var self=this;
  931. return smalltalk.withContext(function($ctx1) {
  932. _st(_st(self)._inspectors())._add_(anInspector);
  933. return self}, function($ctx1) {$ctx1.fill(self,"register:",{anInspector:anInspector},smalltalk.HLInspector.klass)})},
  934. messageSends: ["add:", "inspectors"]}),
  935. smalltalk.HLInspector.klass);
  936. smalltalk.addMethod(
  937. smalltalk.method({
  938. selector: "tabClass",
  939. fn: function (){
  940. var self=this;
  941. return smalltalk.withContext(function($ctx1) {
  942. return "inspector";
  943. }, function($ctx1) {$ctx1.fill(self,"tabClass",{},smalltalk.HLInspector.klass)})},
  944. messageSends: []}),
  945. smalltalk.HLInspector.klass);
  946. smalltalk.addMethod(
  947. smalltalk.method({
  948. selector: "tabLabel",
  949. fn: function (){
  950. var self=this;
  951. return smalltalk.withContext(function($ctx1) {
  952. return "Inspector";
  953. }, function($ctx1) {$ctx1.fill(self,"tabLabel",{},smalltalk.HLInspector.klass)})},
  954. messageSends: []}),
  955. smalltalk.HLInspector.klass);
  956. smalltalk.addMethod(
  957. smalltalk.method({
  958. selector: "tabPriority",
  959. fn: function (){
  960. var self=this;
  961. return smalltalk.withContext(function($ctx1) {
  962. return (10);
  963. }, function($ctx1) {$ctx1.fill(self,"tabPriority",{},smalltalk.HLInspector.klass)})},
  964. messageSends: []}),
  965. smalltalk.HLInspector.klass);
  966. smalltalk.addMethod(
  967. smalltalk.method({
  968. selector: "unregister:",
  969. fn: function (anInspector){
  970. var self=this;
  971. return smalltalk.withContext(function($ctx1) {
  972. _st(_st(self)._inspectors())._remove_(anInspector);
  973. return self}, function($ctx1) {$ctx1.fill(self,"unregister:",{anInspector:anInspector},smalltalk.HLInspector.klass)})},
  974. messageSends: ["remove:", "inspectors"]}),
  975. smalltalk.HLInspector.klass);
  976. smalltalk.addMethod(
  977. smalltalk.method({
  978. selector: "watchChanges",
  979. fn: function (){
  980. var self=this;
  981. return smalltalk.withContext(function($ctx1) {
  982. _st((function(){
  983. return smalltalk.withContext(function($ctx2) {
  984. return _st(_st(self)._inspectors())._do_((function(each){
  985. return smalltalk.withContext(function($ctx3) {
  986. return _st(each)._refresh();
  987. }, function($ctx3) {$ctx3.fillBlock({each:each},$ctx1)})}));
  988. }, function($ctx2) {$ctx2.fillBlock({},$ctx1)})}))._valueWithInterval_((500));
  989. return self}, function($ctx1) {$ctx1.fill(self,"watchChanges",{},smalltalk.HLInspector.klass)})},
  990. messageSends: ["valueWithInterval:", "do:", "refresh", "inspectors"]}),
  991. smalltalk.HLInspector.klass);