Helios-Inspector.deploy.js 21 KB

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