Helios-Inspector.deploy.js 21 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091929394959697989910010110210310410510610710810911011111211311411511611711811912012112212312412512612712812913013113213313413513613713813914014114214314414514614714814915015115215315415515615715815916016116216316416516616716816917017117217317417517617717817918018118218318418518618718818919019119219319419519619719819920020120220320420520620720820921021121221321421521621721821922022122222322422522622722822923023123223323423523623723823924024124224324424524624724824925025125225325425525625725825926026126226326426526626726826927027127227327427527627727827928028128228328428528628728828929029129229329429529629729829930030130230330430530630730830931031131231331431531631731831932032132232332432532632732832933033133233333433533633733833934034134234334434534634734834935035135235335435535635735835936036136236336436536636736836937037137237337437537637737837938038138238338438538638738838939039139239339439539639739839940040140240340440540640740840941041141241341441541641741841942042142242342442542642742842943043143243343443543643743843944044144244344444544644744844945045145245345445545645745845946046146246346446546646746846947047147247347447547647747847948048148248348448548648748848949049149249349449549649749849950050150250350450550650750850951051151251351451551651751851952052152252352452552652752852953053153253353453553653753853954054154254354454554654754854955055155255355455555655755855956056156256356456556656756856957057157257357457557657757857958058158258358458558658758858959059159259359459559659759859960060160260360460560660760860961061161261361461561661761861962062162262362462562662762862963063163263363463563663763863964064164264364464564664764864965065165265365465565665765865966066166266366466566666766866967067167267367467567667767867968068168268368468568668768868969069169269369469569669769869970070170270370470570670770870971071171271371471571671771871972072172272372472572672772872973073173273373473573673773873974074174274374474574674774874975075175275375475575675775875976076176276376476576676776876977077177277377477577677777877978078178278378478578678778878979079179279379479579679779879980080180280380480580680780880981081181281381481581681781881982082182282382482582682782882983083183283383483583683783883984084184284384484584684784884985085185285385485585685785885986086186286386486586686786886987087187287387487587687787887988088188288388488588688788888989089189289389489589689789889990090190290390490590690790890991091191291391491591691791891992092192292392492592692792892993093193293393493593693793893994094194294394494594694794894995095195295395495595695795895996096196296396496596696796896997097197297397497597697797897998098198298398498598698798898999099199299399499599699799899910001001100210031004100510061007100810091010101110121013101410151016101710181019102010211022102310241025102610271028
  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. $2=smalltalk.send($1,"_yourself",[]);
  265. $3=smalltalk.send(smalltalk.send(self,"_model",[]),"_announcer",[]);
  266. smalltalk.send($3,"_on_do_",[(smalltalk.HLInstanceVariableSelected || HLInstanceVariableSelected),(function(ann){
  267. return smalltalk.send(self,"_onInstanceVariableSelected",[]);
  268. })]);
  269. $4=smalltalk.send($3,"_yourself",[]);
  270. return self}
  271. }),
  272. smalltalk.HLInspector);
  273. smalltalk.addMethod(
  274. "_onDoIt",
  275. smalltalk.method({
  276. selector: "onDoIt",
  277. fn: function (){
  278. var self=this;
  279. return self}
  280. }),
  281. smalltalk.HLInspector);
  282. smalltalk.addMethod(
  283. "_onDoneIt",
  284. smalltalk.method({
  285. selector: "onDoneIt",
  286. fn: function (){
  287. var self=this;
  288. smalltalk.send(self,"_refresh",[]);
  289. return self}
  290. }),
  291. smalltalk.HLInspector);
  292. smalltalk.addMethod(
  293. "_onInspectIt",
  294. smalltalk.method({
  295. selector: "onInspectIt",
  296. fn: function (){
  297. var self=this;
  298. return self}
  299. }),
  300. smalltalk.HLInspector);
  301. smalltalk.addMethod(
  302. "_onInstanceVariableSelected",
  303. smalltalk.method({
  304. selector: "onInstanceVariableSelected",
  305. fn: function (){
  306. var self=this;
  307. smalltalk.send(self,"_refreshDisplay",[]);
  308. return self}
  309. }),
  310. smalltalk.HLInspector);
  311. smalltalk.addMethod(
  312. "_onPrintIt",
  313. smalltalk.method({
  314. selector: "onPrintIt",
  315. fn: function (){
  316. var self=this;
  317. return self}
  318. }),
  319. smalltalk.HLInspector);
  320. smalltalk.addMethod(
  321. "_onRefresh",
  322. smalltalk.method({
  323. selector: "onRefresh",
  324. fn: function (){
  325. var self=this;
  326. smalltalk.send(self,"_refresh",[]);
  327. return self}
  328. }),
  329. smalltalk.HLInspector);
  330. smalltalk.addMethod(
  331. "_open",
  332. smalltalk.method({
  333. selector: "open",
  334. fn: function (){
  335. var self=this;
  336. smalltalk.send(smalltalk.send((smalltalk.HLManager || HLManager),"_current",[]),"_addTab_",[smalltalk.send((smalltalk.HLTab || HLTab),"_on_labelled_",[self,smalltalk.send(self,"_tabLabel",[])])]);
  337. return self}
  338. }),
  339. smalltalk.HLInspector);
  340. smalltalk.addMethod(
  341. "_refresh",
  342. smalltalk.method({
  343. selector: "refresh",
  344. fn: function (){
  345. var self=this;
  346. smalltalk.send(self,"_inspect_",[smalltalk.send(self,"_inspectee",[])]);
  347. return self}
  348. }),
  349. smalltalk.HLInspector);
  350. smalltalk.addMethod(
  351. "_refreshDisplay",
  352. smalltalk.method({
  353. selector: "refreshDisplay",
  354. fn: function (){
  355. var self=this;
  356. smalltalk.send(smalltalk.send(self,"_display",[]),"_refresh",[]);
  357. return self}
  358. }),
  359. smalltalk.HLInspector);
  360. smalltalk.addMethod(
  361. "_refreshVariables",
  362. smalltalk.method({
  363. selector: "refreshVariables",
  364. fn: function (){
  365. var self=this;
  366. smalltalk.send(smalltalk.send(self,"_variables",[]),"_refresh",[]);
  367. return self}
  368. }),
  369. smalltalk.HLInspector);
  370. smalltalk.addMethod(
  371. "_renderContentOn_",
  372. smalltalk.method({
  373. selector: "renderContentOn:",
  374. fn: function (html){
  375. var self=this;
  376. smalltalk.send(self,"_ensureModel",[]);
  377. 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",[])])])]);
  378. return self}
  379. }),
  380. smalltalk.HLInspector);
  381. smalltalk.addMethod(
  382. "_setLabel_",
  383. smalltalk.method({
  384. selector: "setLabel:",
  385. fn: function (aString){
  386. var self=this;
  387. self["@label"]=aString;
  388. return self}
  389. }),
  390. smalltalk.HLInspector);
  391. smalltalk.addMethod(
  392. "_setVariables_",
  393. smalltalk.method({
  394. selector: "setVariables:",
  395. fn: function (aDictionary){
  396. var self=this;
  397. smalltalk.send(smalltalk.send(self,"_model",[]),"_variables_",[aDictionary]);
  398. return self}
  399. }),
  400. smalltalk.HLInspector);
  401. smalltalk.addMethod(
  402. "_tabLabel",
  403. smalltalk.method({
  404. selector: "tabLabel",
  405. fn: function (){
  406. var self=this;
  407. var $1;
  408. $1=smalltalk.send(self,"_label",[]);
  409. return $1;
  410. }
  411. }),
  412. smalltalk.HLInspector);
  413. smalltalk.addMethod(
  414. "_variables",
  415. smalltalk.method({
  416. selector: "variables",
  417. fn: function (){
  418. var self=this;
  419. var $1;
  420. if(($receiver = self["@variables"]) == nil || $receiver == undefined){
  421. $1=smalltalk.send(self,"_initializeVariables",[]);
  422. } else {
  423. $1=self["@variables"];
  424. };
  425. return $1;
  426. }
  427. }),
  428. smalltalk.HLInspector);
  429. smalltalk.addMethod(
  430. "_canBeOpenAsTab",
  431. smalltalk.method({
  432. selector: "canBeOpenAsTab",
  433. fn: function (){
  434. var self=this;
  435. return false;
  436. }
  437. }),
  438. smalltalk.HLInspector.klass);
  439. smalltalk.addMethod(
  440. "_tabLabel",
  441. smalltalk.method({
  442. selector: "tabLabel",
  443. fn: function (){
  444. var self=this;
  445. return "Inspector";
  446. }
  447. }),
  448. smalltalk.HLInspector.klass);
  449. smalltalk.addMethod(
  450. "_tabPriority",
  451. smalltalk.method({
  452. selector: "tabPriority",
  453. fn: function (){
  454. var self=this;
  455. return (10);
  456. }
  457. }),
  458. smalltalk.HLInspector.klass);
  459. smalltalk.addClass('HLInspectorDisplay', smalltalk.HLNavigationListWidget, ['model'], 'Helios-Inspector');
  460. smalltalk.addMethod(
  461. "_model",
  462. smalltalk.method({
  463. selector: "model",
  464. fn: function (){
  465. var self=this;
  466. return self["@model"];
  467. }
  468. }),
  469. smalltalk.HLInspectorDisplay);
  470. smalltalk.addMethod(
  471. "_model_",
  472. smalltalk.method({
  473. selector: "model:",
  474. fn: function (aModel){
  475. var self=this;
  476. self["@model"]=aModel;
  477. return self}
  478. }),
  479. smalltalk.HLInspectorDisplay);
  480. smalltalk.addMethod(
  481. "_renderContentOn_",
  482. smalltalk.method({
  483. selector: "renderContentOn:",
  484. fn: function (html){
  485. var self=this;
  486. smalltalk.send(smalltalk.send(html,"_div",[]),"_with_",[smalltalk.send(self,"_selectionDisplayString",[])]);
  487. return self}
  488. }),
  489. smalltalk.HLInspectorDisplay);
  490. smalltalk.addMethod(
  491. "_selectionDisplayString",
  492. smalltalk.method({
  493. selector: "selectionDisplayString",
  494. fn: function (){
  495. var self=this;
  496. var $2,$1;
  497. var selection;
  498. selection=smalltalk.send(self["@model"],"_selection",[]);
  499. $2=smalltalk.send(smalltalk.send(smalltalk.send(self["@model"],"_variables",[]),"_keys",[]),"_includes_",[selection]);
  500. if(smalltalk.assert($2)){
  501. $1=smalltalk.send(smalltalk.send(self["@model"],"_instVarObjectAt_",[selection]),"_printString",[]);
  502. } else {
  503. $1="";
  504. };
  505. return $1;
  506. }
  507. }),
  508. smalltalk.HLInspectorDisplay);
  509. smalltalk.addClass('HLInspectorModel', smalltalk.Object, ['announcer', 'environment', 'inspectee', 'code', 'variables', 'selection'], 'Helios-Inspector');
  510. smalltalk.addMethod(
  511. "_announcer",
  512. smalltalk.method({
  513. selector: "announcer",
  514. fn: function (){
  515. var self=this;
  516. var $1;
  517. if(($receiver = self["@announcer"]) == nil || $receiver == undefined){
  518. $1=smalltalk.send(self,"_initializeAnnouncer",[]);
  519. } else {
  520. $1=self["@announcer"];
  521. };
  522. return $1;
  523. }
  524. }),
  525. smalltalk.HLInspectorModel);
  526. smalltalk.addMethod(
  527. "_beLocal",
  528. smalltalk.method({
  529. selector: "beLocal",
  530. fn: function (){
  531. var self=this;
  532. smalltalk.send(self,"_initializeEnvironment",[]);
  533. return self}
  534. }),
  535. smalltalk.HLInspectorModel);
  536. smalltalk.addMethod(
  537. "_beRemoteOn_port_",
  538. smalltalk.method({
  539. selector: "beRemoteOn:port:",
  540. fn: function (anIPAddress,aPort){
  541. var self=this;
  542. return self}
  543. }),
  544. smalltalk.HLInspectorModel);
  545. smalltalk.addMethod(
  546. "_code",
  547. smalltalk.method({
  548. selector: "code",
  549. fn: function (){
  550. var self=this;
  551. var $1;
  552. if(($receiver = self["@code"]) == nil || $receiver == undefined){
  553. $1=smalltalk.send(self,"_initializeCode",[]);
  554. } else {
  555. $1=self["@code"];
  556. };
  557. return $1;
  558. }
  559. }),
  560. smalltalk.HLInspectorModel);
  561. smalltalk.addMethod(
  562. "_environment",
  563. smalltalk.method({
  564. selector: "environment",
  565. fn: function (){
  566. var self=this;
  567. var $1;
  568. if(($receiver = self["@environment"]) == nil || $receiver == undefined){
  569. $1=smalltalk.send(self,"_initializeEnvironment",[]);
  570. } else {
  571. $1=self["@environment"];
  572. };
  573. return $1;
  574. }
  575. }),
  576. smalltalk.HLInspectorModel);
  577. smalltalk.addMethod(
  578. "_environment_",
  579. smalltalk.method({
  580. selector: "environment:",
  581. fn: function (anEnvironment){
  582. var self=this;
  583. self["@environment"]=anEnvironment;
  584. return self}
  585. }),
  586. smalltalk.HLInspectorModel);
  587. smalltalk.addMethod(
  588. "_initializeAnnouncer",
  589. smalltalk.method({
  590. selector: "initializeAnnouncer",
  591. fn: function (){
  592. var self=this;
  593. var $1;
  594. self["@announcer"]=smalltalk.send((smalltalk.Announcer || Announcer),"_new",[]);
  595. $1=self["@announcer"];
  596. return $1;
  597. }
  598. }),
  599. smalltalk.HLInspectorModel);
  600. smalltalk.addMethod(
  601. "_initializeCode",
  602. smalltalk.method({
  603. selector: "initializeCode",
  604. fn: function (){
  605. var self=this;
  606. var $1;
  607. self["@code"]=smalltalk.send((smalltalk.HLCodeModel || HLCodeModel),"_on_",[smalltalk.send(self,"_environment",[])]);
  608. $1=self["@code"];
  609. return $1;
  610. }
  611. }),
  612. smalltalk.HLInspectorModel);
  613. smalltalk.addMethod(
  614. "_initializeEnvironment",
  615. smalltalk.method({
  616. selector: "initializeEnvironment",
  617. fn: function (){
  618. var self=this;
  619. var $1;
  620. self["@environment"]=smalltalk.send((smalltalk.HLLocalEnvironment || HLLocalEnvironment),"_new",[]);
  621. $1=self["@environment"];
  622. return $1;
  623. }
  624. }),
  625. smalltalk.HLInspectorModel);
  626. smalltalk.addMethod(
  627. "_initializeSelection",
  628. smalltalk.method({
  629. selector: "initializeSelection",
  630. fn: function (){
  631. var self=this;
  632. var $1;
  633. self["@selection"]="";
  634. $1=self["@selection"];
  635. return $1;
  636. }
  637. }),
  638. smalltalk.HLInspectorModel);
  639. smalltalk.addMethod(
  640. "_inspect_on_",
  641. smalltalk.method({
  642. selector: "inspect:on:",
  643. fn: function (anObject,anInspector){
  644. var self=this;
  645. self["@inspectee"]=anObject;
  646. self["@variables"]=[];
  647. smalltalk.send(self["@inspectee"],"_inspectOn_",[anInspector]);
  648. return self}
  649. }),
  650. smalltalk.HLInspectorModel);
  651. smalltalk.addMethod(
  652. "_inspectee",
  653. smalltalk.method({
  654. selector: "inspectee",
  655. fn: function (){
  656. var self=this;
  657. return self["@inspectee"];
  658. }
  659. }),
  660. smalltalk.HLInspectorModel);
  661. smalltalk.addMethod(
  662. "_inspectee_",
  663. smalltalk.method({
  664. selector: "inspectee:",
  665. fn: function (anObject){
  666. var self=this;
  667. self["@inspectee"]=anObject;
  668. return self}
  669. }),
  670. smalltalk.HLInspectorModel);
  671. smalltalk.addMethod(
  672. "_instVarObjectAt_",
  673. smalltalk.method({
  674. selector: "instVarObjectAt:",
  675. fn: function (anInstVarName){
  676. var self=this;
  677. var $1;
  678. $1=smalltalk.send(smalltalk.send(self,"_variables",[]),"_at_",[anInstVarName]);
  679. return $1;
  680. }
  681. }),
  682. smalltalk.HLInspectorModel);
  683. smalltalk.addMethod(
  684. "_onKeyDown_",
  685. smalltalk.method({
  686. selector: "onKeyDown:",
  687. fn: function (anEvent){
  688. var self=this;
  689. if(anEvent.ctrlKey) {
  690. if(anEvent.keyCode === 80) { //ctrl+p
  691. self._printIt();
  692. anEvent.preventDefault();
  693. return false;
  694. }
  695. if(anEvent.keyCode === 68) { //ctrl+d
  696. self._doIt();
  697. anEvent.preventDefault();
  698. return false;
  699. }
  700. if(anEvent.keyCode === 73) { //ctrl+i
  701. self._inspectIt();
  702. anEvent.preventDefault();
  703. return false;
  704. }
  705. };
  706. ;
  707. return self}
  708. }),
  709. smalltalk.HLInspectorModel);
  710. smalltalk.addMethod(
  711. "_selectedInstVar_",
  712. smalltalk.method({
  713. selector: "selectedInstVar:",
  714. fn: function (anInstVarName){
  715. var self=this;
  716. smalltalk.send(self,"_selection_",[anInstVarName]);
  717. return self}
  718. }),
  719. smalltalk.HLInspectorModel);
  720. smalltalk.addMethod(
  721. "_selectedInstVarObject",
  722. smalltalk.method({
  723. selector: "selectedInstVarObject",
  724. fn: function (){
  725. var self=this;
  726. var $1;
  727. $1=smalltalk.send(self,"_instVarObjectAt_",[smalltalk.send(self,"_selection",[])]);
  728. return $1;
  729. }
  730. }),
  731. smalltalk.HLInspectorModel);
  732. smalltalk.addMethod(
  733. "_selection",
  734. smalltalk.method({
  735. selector: "selection",
  736. fn: function (){
  737. var self=this;
  738. var $1;
  739. if(($receiver = self["@selection"]) == nil || $receiver == undefined){
  740. $1=smalltalk.send(self,"_initializeSelection",[]);
  741. } else {
  742. $1=self["@selection"];
  743. };
  744. return $1;
  745. }
  746. }),
  747. smalltalk.HLInspectorModel);
  748. smalltalk.addMethod(
  749. "_selection_",
  750. smalltalk.method({
  751. selector: "selection:",
  752. fn: function (anObject){
  753. var self=this;
  754. self["@selection"]=anObject;
  755. smalltalk.send(smalltalk.send(self,"_announcer",[]),"_announce_",[smalltalk.send((smalltalk.HLInstanceVariableSelected || HLInstanceVariableSelected),"_on_",[self["@selection"]])]);
  756. return self}
  757. }),
  758. smalltalk.HLInspectorModel);
  759. smalltalk.addMethod(
  760. "_subscribe_",
  761. smalltalk.method({
  762. selector: "subscribe:",
  763. fn: function (aWidget){
  764. var self=this;
  765. smalltalk.send(aWidget,"_subscribeTo_",[smalltalk.send(self,"_announcer",[])]);
  766. return self}
  767. }),
  768. smalltalk.HLInspectorModel);
  769. smalltalk.addMethod(
  770. "_variables",
  771. smalltalk.method({
  772. selector: "variables",
  773. fn: function (){
  774. var self=this;
  775. return self["@variables"];
  776. }
  777. }),
  778. smalltalk.HLInspectorModel);
  779. smalltalk.addMethod(
  780. "_variables_",
  781. smalltalk.method({
  782. selector: "variables:",
  783. fn: function (aCollection){
  784. var self=this;
  785. self["@variables"]=aCollection;
  786. return self}
  787. }),
  788. smalltalk.HLInspectorModel);
  789. smalltalk.addMethod(
  790. "_on_",
  791. smalltalk.method({
  792. selector: "on:",
  793. fn: function (anEnvironment){
  794. var self=this;
  795. var $2,$3,$1;
  796. $2=smalltalk.send(self,"_new",[]);
  797. smalltalk.send($2,"_environment_",[anEnvironment]);
  798. $3=smalltalk.send($2,"_yourself",[]);
  799. $1=$3;
  800. return $1;
  801. }
  802. }),
  803. smalltalk.HLInspectorModel.klass);
  804. smalltalk.addClass('HLInspectorVariables', smalltalk.HLNavigationListWidget, ['announcer', 'model', 'list', 'diveButton'], 'Helios-Inspector');
  805. smalltalk.addMethod(
  806. "_announcer",
  807. smalltalk.method({
  808. selector: "announcer",
  809. fn: function (){
  810. var self=this;
  811. var $1;
  812. if(($receiver = self["@announcer"]) == nil || $receiver == undefined){
  813. $1=smalltalk.send(self,"_initializeAnnouncer",[]);
  814. } else {
  815. $1=self["@announcer"];
  816. };
  817. return $1;
  818. }
  819. }),
  820. smalltalk.HLInspectorVariables);
  821. smalltalk.addMethod(
  822. "_initializeAnnouncer",
  823. smalltalk.method({
  824. selector: "initializeAnnouncer",
  825. fn: function (){
  826. var self=this;
  827. var $1;
  828. self["@announcer"]=smalltalk.send((smalltalk.Announcer || Announcer),"_new",[]);
  829. $1=self["@announcer"];
  830. return $1;
  831. }
  832. }),
  833. smalltalk.HLInspectorVariables);
  834. smalltalk.addMethod(
  835. "_initializeItems",
  836. smalltalk.method({
  837. selector: "initializeItems",
  838. fn: function (){
  839. var self=this;
  840. var $1;
  841. self["@items"]=smalltalk.send(smalltalk.send(smalltalk.send(self,"_model",[]),"_variables",[]),"_keys",[]);
  842. $1=self["@items"];
  843. return $1;
  844. }
  845. }),
  846. smalltalk.HLInspectorVariables);
  847. smalltalk.addMethod(
  848. "_model",
  849. smalltalk.method({
  850. selector: "model",
  851. fn: function (){
  852. var self=this;
  853. return self["@model"];
  854. }
  855. }),
  856. smalltalk.HLInspectorVariables);
  857. smalltalk.addMethod(
  858. "_model_",
  859. smalltalk.method({
  860. selector: "model:",
  861. fn: function (aModel){
  862. var self=this;
  863. self["@model"]=aModel;
  864. return self}
  865. }),
  866. smalltalk.HLInspectorVariables);
  867. smalltalk.addMethod(
  868. "_refresh",
  869. smalltalk.method({
  870. selector: "refresh",
  871. fn: function (){
  872. var self=this;
  873. smalltalk.send(self,"_resetItems",[]);
  874. smalltalk.send(self,"_refresh",[],smalltalk.HLNavigationListWidget);
  875. return self}
  876. }),
  877. smalltalk.HLInspectorVariables);
  878. smalltalk.addMethod(
  879. "_renderButtonsOn_",
  880. smalltalk.method({
  881. selector: "renderButtonsOn:",
  882. fn: function (html){
  883. var self=this;
  884. var $1,$2,$3,$4;
  885. $1=smalltalk.send(html,"_button",[]);
  886. smalltalk.send($1,"_class_",["btn"]);
  887. smalltalk.send($1,"_with_",["Refresh"]);
  888. $2=smalltalk.send($1,"_onClick_",[(function(){
  889. return smalltalk.send(smalltalk.send(self,"_announcer",[]),"_announce_",[smalltalk.send((smalltalk.HLRefreshRequested || HLRefreshRequested),"_new",[])]);
  890. })]);
  891. $3=smalltalk.send(html,"_button",[]);
  892. smalltalk.send($3,"_class_",["btn"]);
  893. smalltalk.send($3,"_with_",["Dive"]);
  894. $4=smalltalk.send($3,"_onClick_",[(function(){
  895. return smalltalk.send(smalltalk.send(self,"_announcer",[]),"_announce_",[smalltalk.send((smalltalk.HLDiveRequested || HLDiveRequested),"_new",[])]);
  896. })]);
  897. self["@diveButton"]=$4;
  898. return self}
  899. }),
  900. smalltalk.HLInspectorVariables);
  901. smalltalk.addMethod(
  902. "_resetItems",
  903. smalltalk.method({
  904. selector: "resetItems",
  905. fn: function (){
  906. var self=this;
  907. self["@items"]=nil;
  908. return self}
  909. }),
  910. smalltalk.HLInspectorVariables);
  911. smalltalk.addMethod(
  912. "_selectItem_",
  913. smalltalk.method({
  914. selector: "selectItem:",
  915. fn: function (anObject){
  916. var self=this;
  917. smalltalk.send(self,"_selectItem_",[anObject],smalltalk.HLNavigationListWidget);
  918. smalltalk.send(smalltalk.send(self,"_model",[]),"_selectedInstVar_",[anObject]);
  919. return self}
  920. }),
  921. smalltalk.HLInspectorVariables);
  922. smalltalk.addMethod(
  923. "_selection",
  924. smalltalk.method({
  925. selector: "selection",
  926. fn: function (){
  927. var self=this;
  928. var $1;
  929. $1=smalltalk.send(self["@model"],"_selection",[]);
  930. return $1;
  931. }
  932. }),
  933. smalltalk.HLInspectorVariables);
  934. smalltalk.addMethod(
  935. "_variables",
  936. smalltalk.method({
  937. selector: "variables",
  938. fn: function (){
  939. var self=this;
  940. var $1;
  941. $1=smalltalk.send(self["@model"],"_variables",[]);
  942. return $1;
  943. }
  944. }),
  945. smalltalk.HLInspectorVariables);