1
0

Helios-Inspector.deploy.js 22 KB

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