Helios-Inspector.deploy.js 20 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989990991992993994995996
  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(smalltalk.send(self["@model"],"_selectedInstVarObject",[]),"_printString",[])]);
  475. return self}
  476. }),
  477. smalltalk.HLInspectorDisplay);
  478. smalltalk.addClass('HLInspectorModel', smalltalk.Object, ['announcer', 'environment', 'inspectee', 'code', 'variables', 'selection'], 'Helios-Inspector');
  479. smalltalk.addMethod(
  480. "_announcer",
  481. smalltalk.method({
  482. selector: "announcer",
  483. fn: function (){
  484. var self=this;
  485. var $1;
  486. if(($receiver = self["@announcer"]) == nil || $receiver == undefined){
  487. $1=smalltalk.send(self,"_initializeAnnouncer",[]);
  488. } else {
  489. $1=self["@announcer"];
  490. };
  491. return $1;
  492. }
  493. }),
  494. smalltalk.HLInspectorModel);
  495. smalltalk.addMethod(
  496. "_beLocal",
  497. smalltalk.method({
  498. selector: "beLocal",
  499. fn: function (){
  500. var self=this;
  501. smalltalk.send(self,"_initializeEnvironment",[]);
  502. return self}
  503. }),
  504. smalltalk.HLInspectorModel);
  505. smalltalk.addMethod(
  506. "_beRemoteOn_port_",
  507. smalltalk.method({
  508. selector: "beRemoteOn:port:",
  509. fn: function (anIPAddress,aPort){
  510. var self=this;
  511. return self}
  512. }),
  513. smalltalk.HLInspectorModel);
  514. smalltalk.addMethod(
  515. "_code",
  516. smalltalk.method({
  517. selector: "code",
  518. fn: function (){
  519. var self=this;
  520. var $1;
  521. if(($receiver = self["@code"]) == nil || $receiver == undefined){
  522. $1=smalltalk.send(self,"_initializeCode",[]);
  523. } else {
  524. $1=self["@code"];
  525. };
  526. return $1;
  527. }
  528. }),
  529. smalltalk.HLInspectorModel);
  530. smalltalk.addMethod(
  531. "_environment",
  532. smalltalk.method({
  533. selector: "environment",
  534. fn: function (){
  535. var self=this;
  536. var $1;
  537. if(($receiver = self["@environment"]) == nil || $receiver == undefined){
  538. $1=smalltalk.send(self,"_initializeEnvironment",[]);
  539. } else {
  540. $1=self["@environment"];
  541. };
  542. return $1;
  543. }
  544. }),
  545. smalltalk.HLInspectorModel);
  546. smalltalk.addMethod(
  547. "_environment_",
  548. smalltalk.method({
  549. selector: "environment:",
  550. fn: function (anEnvironment){
  551. var self=this;
  552. self["@environment"]=anEnvironment;
  553. return self}
  554. }),
  555. smalltalk.HLInspectorModel);
  556. smalltalk.addMethod(
  557. "_initializeAnnouncer",
  558. smalltalk.method({
  559. selector: "initializeAnnouncer",
  560. fn: function (){
  561. var self=this;
  562. var $1;
  563. self["@announcer"]=smalltalk.send((smalltalk.Announcer || Announcer),"_new",[]);
  564. $1=self["@announcer"];
  565. return $1;
  566. }
  567. }),
  568. smalltalk.HLInspectorModel);
  569. smalltalk.addMethod(
  570. "_initializeCode",
  571. smalltalk.method({
  572. selector: "initializeCode",
  573. fn: function (){
  574. var self=this;
  575. var $1;
  576. self["@code"]=smalltalk.send((smalltalk.HLCodeModel || HLCodeModel),"_on_",[smalltalk.send(self,"_environment",[])]);
  577. $1=self["@code"];
  578. return $1;
  579. }
  580. }),
  581. smalltalk.HLInspectorModel);
  582. smalltalk.addMethod(
  583. "_initializeEnvironment",
  584. smalltalk.method({
  585. selector: "initializeEnvironment",
  586. fn: function (){
  587. var self=this;
  588. var $1;
  589. self["@environment"]=smalltalk.send((smalltalk.HLLocalEnvironment || HLLocalEnvironment),"_new",[]);
  590. $1=self["@environment"];
  591. return $1;
  592. }
  593. }),
  594. smalltalk.HLInspectorModel);
  595. smalltalk.addMethod(
  596. "_initializeSelection",
  597. smalltalk.method({
  598. selector: "initializeSelection",
  599. fn: function (){
  600. var self=this;
  601. var $1;
  602. self["@selection"]=smalltalk.send(self,"_inspectee",[]);
  603. $1=self["@selection"];
  604. return $1;
  605. }
  606. }),
  607. smalltalk.HLInspectorModel);
  608. smalltalk.addMethod(
  609. "_inspect_on_",
  610. smalltalk.method({
  611. selector: "inspect:on:",
  612. fn: function (anObject,anInspector){
  613. var self=this;
  614. self["@inspectee"]=anObject;
  615. self["@variables"]=[];
  616. smalltalk.send(self["@inspectee"],"_inspectOn_",[anInspector]);
  617. return self}
  618. }),
  619. smalltalk.HLInspectorModel);
  620. smalltalk.addMethod(
  621. "_inspectee",
  622. smalltalk.method({
  623. selector: "inspectee",
  624. fn: function (){
  625. var self=this;
  626. return self["@inspectee"];
  627. }
  628. }),
  629. smalltalk.HLInspectorModel);
  630. smalltalk.addMethod(
  631. "_inspectee_",
  632. smalltalk.method({
  633. selector: "inspectee:",
  634. fn: function (anObject){
  635. var self=this;
  636. self["@inspectee"]=anObject;
  637. return self}
  638. }),
  639. smalltalk.HLInspectorModel);
  640. smalltalk.addMethod(
  641. "_instVarObjectAt_",
  642. smalltalk.method({
  643. selector: "instVarObjectAt:",
  644. fn: function (anInstVarName){
  645. var self=this;
  646. var $1;
  647. $1=smalltalk.send(smalltalk.send(self,"_variables",[]),"_at_",[anInstVarName]);
  648. return $1;
  649. }
  650. }),
  651. smalltalk.HLInspectorModel);
  652. smalltalk.addMethod(
  653. "_onKeyDown_",
  654. smalltalk.method({
  655. selector: "onKeyDown:",
  656. fn: function (anEvent){
  657. var self=this;
  658. if(anEvent.ctrlKey) {
  659. if(anEvent.keyCode === 80) { //ctrl+p
  660. self._printIt();
  661. anEvent.preventDefault();
  662. return false;
  663. }
  664. if(anEvent.keyCode === 68) { //ctrl+d
  665. self._doIt();
  666. anEvent.preventDefault();
  667. return false;
  668. }
  669. if(anEvent.keyCode === 73) { //ctrl+i
  670. self._inspectIt();
  671. anEvent.preventDefault();
  672. return false;
  673. }
  674. };
  675. ;
  676. return self}
  677. }),
  678. smalltalk.HLInspectorModel);
  679. smalltalk.addMethod(
  680. "_selectedInstVar_",
  681. smalltalk.method({
  682. selector: "selectedInstVar:",
  683. fn: function (anInstVarObject){
  684. var self=this;
  685. smalltalk.send(self,"_halt",[]);
  686. smalltalk.send(self,"_selection_",[smalltalk.send(smalltalk.send(self,"_variables",[]),"_keyAtValue_",[anInstVarObject])]);
  687. return self}
  688. }),
  689. smalltalk.HLInspectorModel);
  690. smalltalk.addMethod(
  691. "_selectedInstVarObject",
  692. smalltalk.method({
  693. selector: "selectedInstVarObject",
  694. fn: function (){
  695. var self=this;
  696. var $1;
  697. $1=smalltalk.send(self,"_instVarObjectAt_",[smalltalk.send(self,"_selection",[])]);
  698. return $1;
  699. }
  700. }),
  701. smalltalk.HLInspectorModel);
  702. smalltalk.addMethod(
  703. "_selection",
  704. smalltalk.method({
  705. selector: "selection",
  706. fn: function (){
  707. var self=this;
  708. var $1;
  709. if(($receiver = self["@selection"]) == nil || $receiver == undefined){
  710. $1=smalltalk.send(self,"_initializeSelection",[]);
  711. } else {
  712. $1=self["@selection"];
  713. };
  714. return $1;
  715. }
  716. }),
  717. smalltalk.HLInspectorModel);
  718. smalltalk.addMethod(
  719. "_selection_",
  720. smalltalk.method({
  721. selector: "selection:",
  722. fn: function (anObject){
  723. var self=this;
  724. self["@selection"]=anObject;
  725. smalltalk.send(smalltalk.send(self,"_announcer",[]),"_announce_",[smalltalk.send((smalltalk.HLInstanceVariableSelected || HLInstanceVariableSelected),"_on_",[self["@selection"]])]);
  726. return self}
  727. }),
  728. smalltalk.HLInspectorModel);
  729. smalltalk.addMethod(
  730. "_subscribe_",
  731. smalltalk.method({
  732. selector: "subscribe:",
  733. fn: function (aWidget){
  734. var self=this;
  735. smalltalk.send(aWidget,"_subscribeTo_",[smalltalk.send(self,"_announcer",[])]);
  736. return self}
  737. }),
  738. smalltalk.HLInspectorModel);
  739. smalltalk.addMethod(
  740. "_variables",
  741. smalltalk.method({
  742. selector: "variables",
  743. fn: function (){
  744. var self=this;
  745. return self["@variables"];
  746. }
  747. }),
  748. smalltalk.HLInspectorModel);
  749. smalltalk.addMethod(
  750. "_variables_",
  751. smalltalk.method({
  752. selector: "variables:",
  753. fn: function (aCollection){
  754. var self=this;
  755. self["@variables"]=aCollection;
  756. return self}
  757. }),
  758. smalltalk.HLInspectorModel);
  759. smalltalk.addMethod(
  760. "_on_",
  761. smalltalk.method({
  762. selector: "on:",
  763. fn: function (anEnvironment){
  764. var self=this;
  765. var $2,$3,$1;
  766. $2=smalltalk.send(self,"_new",[]);
  767. smalltalk.send($2,"_environment_",[anEnvironment]);
  768. $3=smalltalk.send($2,"_yourself",[]);
  769. $1=$3;
  770. return $1;
  771. }
  772. }),
  773. smalltalk.HLInspectorModel.klass);
  774. smalltalk.addClass('HLInspectorVariables', smalltalk.HLNavigationListWidget, ['announcer', 'model', 'list', 'diveButton'], 'Helios-Inspector');
  775. smalltalk.addMethod(
  776. "_announcer",
  777. smalltalk.method({
  778. selector: "announcer",
  779. fn: function (){
  780. var self=this;
  781. var $1;
  782. if(($receiver = self["@announcer"]) == nil || $receiver == undefined){
  783. $1=smalltalk.send(self,"_initializeAnnouncer",[]);
  784. } else {
  785. $1=self["@announcer"];
  786. };
  787. return $1;
  788. }
  789. }),
  790. smalltalk.HLInspectorVariables);
  791. smalltalk.addMethod(
  792. "_initializeAnnouncer",
  793. smalltalk.method({
  794. selector: "initializeAnnouncer",
  795. fn: function (){
  796. var self=this;
  797. var $1;
  798. self["@announcer"]=smalltalk.send((smalltalk.Announcer || Announcer),"_new",[]);
  799. $1=self["@announcer"];
  800. return $1;
  801. }
  802. }),
  803. smalltalk.HLInspectorVariables);
  804. smalltalk.addMethod(
  805. "_initializeItems",
  806. smalltalk.method({
  807. selector: "initializeItems",
  808. fn: function (){
  809. var self=this;
  810. var $1;
  811. self["@items"]=smalltalk.send(smalltalk.send(smalltalk.send(self,"_model",[]),"_variables",[]),"_keys",[]);
  812. $1=self["@items"];
  813. return $1;
  814. }
  815. }),
  816. smalltalk.HLInspectorVariables);
  817. smalltalk.addMethod(
  818. "_model",
  819. smalltalk.method({
  820. selector: "model",
  821. fn: function (){
  822. var self=this;
  823. return self["@model"];
  824. }
  825. }),
  826. smalltalk.HLInspectorVariables);
  827. smalltalk.addMethod(
  828. "_model_",
  829. smalltalk.method({
  830. selector: "model:",
  831. fn: function (aModel){
  832. var self=this;
  833. self["@model"]=aModel;
  834. return self}
  835. }),
  836. smalltalk.HLInspectorVariables);
  837. smalltalk.addMethod(
  838. "_refresh",
  839. smalltalk.method({
  840. selector: "refresh",
  841. fn: function (){
  842. var self=this;
  843. smalltalk.send(self,"_resetItems",[]);
  844. smalltalk.send(self,"_refresh",[],smalltalk.HLNavigationListWidget);
  845. return self}
  846. }),
  847. smalltalk.HLInspectorVariables);
  848. smalltalk.addMethod(
  849. "_renderButtonsOn_",
  850. smalltalk.method({
  851. selector: "renderButtonsOn:",
  852. fn: function (html){
  853. var self=this;
  854. var $1,$2,$3,$4;
  855. $1=smalltalk.send(html,"_button",[]);
  856. smalltalk.send($1,"_class_",["btn"]);
  857. smalltalk.send($1,"_with_",["Refresh"]);
  858. $2=smalltalk.send($1,"_onClick_",[(function(){
  859. return smalltalk.send(smalltalk.send(self,"_announcer",[]),"_announce_",[smalltalk.send((smalltalk.HLRefreshRequested || HLRefreshRequested),"_new",[])]);
  860. })]);
  861. $3=smalltalk.send(html,"_button",[]);
  862. smalltalk.send($3,"_class_",["btn"]);
  863. smalltalk.send($3,"_with_",["Dive"]);
  864. $4=smalltalk.send($3,"_onClick_",[(function(){
  865. return smalltalk.send(smalltalk.send(self,"_announcer",[]),"_announce_",[smalltalk.send((smalltalk.HLDiveRequested || HLDiveRequested),"_new",[])]);
  866. })]);
  867. self["@diveButton"]=$4;
  868. return self}
  869. }),
  870. smalltalk.HLInspectorVariables);
  871. smalltalk.addMethod(
  872. "_resetItems",
  873. smalltalk.method({
  874. selector: "resetItems",
  875. fn: function (){
  876. var self=this;
  877. self["@items"]=nil;
  878. return self}
  879. }),
  880. smalltalk.HLInspectorVariables);
  881. smalltalk.addMethod(
  882. "_selectItem_",
  883. smalltalk.method({
  884. selector: "selectItem:",
  885. fn: function (anObject){
  886. var self=this;
  887. smalltalk.send(self,"_selectItem_",[anObject],smalltalk.HLNavigationListWidget);
  888. smalltalk.send(smalltalk.send(self,"_model",[]),"_selectedInstVar_",[anObject]);
  889. return self}
  890. }),
  891. smalltalk.HLInspectorVariables);
  892. smalltalk.addMethod(
  893. "_selection",
  894. smalltalk.method({
  895. selector: "selection",
  896. fn: function (){
  897. var self=this;
  898. var $1;
  899. $1=smalltalk.send(self["@model"],"_selection",[]);
  900. return $1;
  901. }
  902. }),
  903. smalltalk.HLInspectorVariables);
  904. smalltalk.addMethod(
  905. "_variables",
  906. smalltalk.method({
  907. selector: "variables",
  908. fn: function (){
  909. var self=this;
  910. var $1;
  911. $1=smalltalk.send(self["@model"],"_variables",[]);
  912. return $1;
  913. }
  914. }),
  915. smalltalk.HLInspectorVariables);