Helios-Inspector.js 59 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798991001011021031041051061071081091101111121131141151161171181191201211221231241251261271281291301311321331341351361371381391401411421431441451461471481491501511521531541551561571581591601611621631641651661671681691701711721731741751761771781791801811821831841851861871881891901911921931941951961971981992002012022032042052062072082092102112122132142152162172182192202212222232242252262272282292302312322332342352362372382392402412422432442452462472482492502512522532542552562572582592602612622632642652662672682692702712722732742752762772782792802812822832842852862872882892902912922932942952962972982993003013023033043053063073083093103113123133143153163173183193203213223233243253263273283293303313323333343353363373383393403413423433443453463473483493503513523533543553563573583593603613623633643653663673683693703713723733743753763773783793803813823833843853863873883893903913923933943953963973983994004014024034044054064074084094104114124134144154164174184194204214224234244254264274284294304314324334344354364374384394404414424434444454464474484494504514524534544554564574584594604614624634644654664674684694704714724734744754764774784794804814824834844854864874884894904914924934944954964974984995005015025035045055065075085095105115125135145155165175185195205215225235245255265275285295305315325335345355365375385395405415425435445455465475485495505515525535545555565575585595605615625635645655665675685695705715725735745755765775785795805815825835845855865875885895905915925935945955965975985996006016026036046056066076086096106116126136146156166176186196206216226236246256266276286296306316326336346356366376386396406416426436446456466476486496506516526536546556566576586596606616626636646656666676686696706716726736746756766776786796806816826836846856866876886896906916926936946956966976986997007017027037047057067077087097107117127137147157167177187197207217227237247257267277287297307317327337347357367377387397407417427437447457467477487497507517527537547557567577587597607617627637647657667677687697707717727737747757767777787797807817827837847857867877887897907917927937947957967977987998008018028038048058068078088098108118128138148158168178188198208218228238248258268278288298308318328338348358368378388398408418428438448458468478488498508518528538548558568578588598608618628638648658668678688698708718728738748758768778788798808818828838848858868878888898908918928938948958968978988999009019029039049059069079089099109119129139149159169179189199209219229239249259269279289299309319329339349359369379389399409419429439449459469479489499509519529539549559569579589599609619629639649659669679689699709719729739749759769779789799809819829839849859869879889899909919929939949959969979989991000100110021003100410051006100710081009101010111012101310141015101610171018101910201021102210231024102510261027102810291030103110321033103410351036103710381039104010411042104310441045104610471048104910501051105210531054105510561057105810591060106110621063106410651066106710681069107010711072107310741075107610771078107910801081108210831084108510861087108810891090109110921093109410951096109710981099110011011102110311041105110611071108110911101111111211131114111511161117111811191120112111221123112411251126112711281129113011311132113311341135113611371138113911401141114211431144114511461147114811491150115111521153115411551156115711581159116011611162116311641165116611671168116911701171117211731174117511761177117811791180118111821183118411851186118711881189119011911192119311941195119611971198119912001201120212031204120512061207120812091210121112121213121412151216121712181219122012211222122312241225122612271228122912301231123212331234123512361237123812391240124112421243124412451246124712481249125012511252125312541255125612571258125912601261126212631264126512661267126812691270127112721273127412751276127712781279128012811282128312841285128612871288128912901291129212931294129512961297129812991300130113021303130413051306130713081309131013111312131313141315131613171318131913201321132213231324132513261327132813291330133113321333133413351336133713381339134013411342134313441345134613471348134913501351135213531354135513561357135813591360136113621363136413651366136713681369137013711372137313741375137613771378137913801381138213831384138513861387138813891390139113921393139413951396139713981399140014011402140314041405140614071408140914101411141214131414141514161417141814191420142114221423142414251426142714281429143014311432143314341435143614371438143914401441144214431444144514461447144814491450145114521453145414551456145714581459146014611462146314641465146614671468146914701471147214731474147514761477147814791480148114821483148414851486148714881489149014911492149314941495149614971498149915001501150215031504150515061507150815091510151115121513151415151516151715181519152015211522152315241525152615271528152915301531153215331534153515361537153815391540154115421543154415451546154715481549155015511552155315541555155615571558155915601561156215631564156515661567156815691570157115721573157415751576157715781579158015811582158315841585158615871588158915901591159215931594159515961597159815991600160116021603160416051606160716081609161016111612161316141615161616171618161916201621162216231624162516261627162816291630163116321633163416351636163716381639164016411642164316441645164616471648164916501651165216531654165516561657165816591660166116621663166416651666166716681669167016711672167316741675167616771678167916801681168216831684168516861687168816891690169116921693169416951696169716981699170017011702170317041705170617071708170917101711171217131714171517161717171817191720172117221723172417251726172717281729173017311732173317341735173617371738173917401741174217431744174517461747174817491750175117521753175417551756175717581759176017611762176317641765176617671768176917701771177217731774177517761777177817791780178117821783178417851786178717881789179017911792179317941795179617971798179918001801180218031804180518061807180818091810181118121813181418151816181718181819182018211822182318241825182618271828182918301831183218331834183518361837183818391840184118421843184418451846184718481849185018511852185318541855185618571858185918601861186218631864186518661867186818691870187118721873187418751876187718781879188018811882188318841885188618871888188918901891189218931894189518961897189818991900190119021903190419051906190719081909191019111912191319141915191619171918191919201921192219231924192519261927192819291930193119321933193419351936193719381939194019411942194319441945194619471948194919501951195219531954195519561957195819591960196119621963196419651966196719681969197019711972197319741975
  1. define("helios/Helios-Inspector", ["amber/boot", "helios/Helios-Core"], function($boot){"use strict";
  2. var $core=$boot.api,nil=$boot.nil,$recv=$boot.asReceiver,$globals=$boot.globals;
  3. $core.addPackage('Helios-Inspector');
  4. $core.packages["Helios-Inspector"].innerEval = function (expr) { return eval(expr); };
  5. $core.packages["Helios-Inspector"].transport = {"type":"amd","amdNamespace":"helios"};
  6. $core.addClass('HLInspectorDisplayWidget', $globals.HLNavigationListWidget, ['inspector'], 'Helios-Inspector');
  7. $core.addMethod(
  8. $core.method({
  9. selector: "inspector",
  10. protocol: 'accessing',
  11. fn: function (){
  12. var self=this;
  13. return self["@inspector"];
  14. },
  15. //>>excludeStart("ide", pragmas.excludeIdeData);
  16. args: [],
  17. source: "inspector\x0a\x09^ inspector",
  18. referencedClasses: [],
  19. //>>excludeEnd("ide");
  20. messageSends: []
  21. }),
  22. $globals.HLInspectorDisplayWidget);
  23. $core.addMethod(
  24. $core.method({
  25. selector: "inspector:",
  26. protocol: 'accessing',
  27. fn: function (anInspector){
  28. var self=this;
  29. self["@inspector"]=anInspector;
  30. return self;
  31. },
  32. //>>excludeStart("ide", pragmas.excludeIdeData);
  33. args: ["anInspector"],
  34. source: "inspector: anInspector\x0a\x09inspector := anInspector",
  35. referencedClasses: [],
  36. //>>excludeEnd("ide");
  37. messageSends: []
  38. }),
  39. $globals.HLInspectorDisplayWidget);
  40. $core.addMethod(
  41. $core.method({
  42. selector: "model",
  43. protocol: 'accessing',
  44. fn: function (){
  45. var self=this;
  46. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  47. return $core.withContext(function($ctx1) {
  48. //>>excludeEnd("ctx");
  49. return $recv(self._inspector())._model();
  50. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  51. }, function($ctx1) {$ctx1.fill(self,"model",{},$globals.HLInspectorDisplayWidget)});
  52. //>>excludeEnd("ctx");
  53. },
  54. //>>excludeStart("ide", pragmas.excludeIdeData);
  55. args: [],
  56. source: "model\x0a\x0a\x09^ self inspector model",
  57. referencedClasses: [],
  58. //>>excludeEnd("ide");
  59. messageSends: ["model", "inspector"]
  60. }),
  61. $globals.HLInspectorDisplayWidget);
  62. $core.addMethod(
  63. $core.method({
  64. selector: "renderContentOn:",
  65. protocol: 'rendering',
  66. fn: function (html){
  67. var self=this;
  68. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  69. return $core.withContext(function($ctx1) {
  70. //>>excludeEnd("ctx");
  71. $recv($recv(html)._div())._with_(self._selectionDisplayString());
  72. return self;
  73. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  74. }, function($ctx1) {$ctx1.fill(self,"renderContentOn:",{html:html},$globals.HLInspectorDisplayWidget)});
  75. //>>excludeEnd("ctx");
  76. },
  77. //>>excludeStart("ide", pragmas.excludeIdeData);
  78. args: ["html"],
  79. source: "renderContentOn: html\x0a\x09\x0a html div with: self selectionDisplayString",
  80. referencedClasses: [],
  81. //>>excludeEnd("ide");
  82. messageSends: ["with:", "div", "selectionDisplayString"]
  83. }),
  84. $globals.HLInspectorDisplayWidget);
  85. $core.addMethod(
  86. $core.method({
  87. selector: "selectionDisplayString",
  88. protocol: 'rendering',
  89. fn: function (){
  90. var self=this;
  91. var selection;
  92. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  93. return $core.withContext(function($ctx1) {
  94. //>>excludeEnd("ctx");
  95. var $1,$4,$3,$2;
  96. $1=self._model();
  97. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  98. $ctx1.sendIdx["model"]=1;
  99. //>>excludeEnd("ctx");
  100. selection=$recv($1)._selection();
  101. $4=self._model();
  102. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  103. $ctx1.sendIdx["model"]=2;
  104. //>>excludeEnd("ctx");
  105. $3=$recv($4)._variables();
  106. $2=$recv($3)._includesKey_(selection);
  107. if($core.assert($2)){
  108. return $recv($recv(self._model())._instVarObjectAt_(selection))._printString();
  109. } else {
  110. return "";
  111. };
  112. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  113. }, function($ctx1) {$ctx1.fill(self,"selectionDisplayString",{selection:selection},$globals.HLInspectorDisplayWidget)});
  114. //>>excludeEnd("ctx");
  115. },
  116. //>>excludeStart("ide", pragmas.excludeIdeData);
  117. args: [],
  118. source: "selectionDisplayString\x0a\x09|selection|\x0a\x09selection := self model selection.\x0a ^ (self model variables includesKey: selection)\x0a \x09ifTrue:[ (self model instVarObjectAt: selection) printString ]\x0a \x09ifFalse:[ '' ]",
  119. referencedClasses: [],
  120. //>>excludeEnd("ide");
  121. messageSends: ["selection", "model", "ifTrue:ifFalse:", "includesKey:", "variables", "printString", "instVarObjectAt:"]
  122. }),
  123. $globals.HLInspectorDisplayWidget);
  124. $core.addClass('HLInspectorModel', $globals.HLModel, ['inspectee', 'code', 'variables', 'label', 'selection'], 'Helios-Inspector');
  125. //>>excludeStart("ide", pragmas.excludeIdeData);
  126. $globals.HLInspectorModel.comment="I am the model of the Helios inspector `HLInspectorWidget`.\x0a\x0a## API\x0a\x0aUse the method `inspect:on:` to inspect an object on an inspector.";
  127. //>>excludeEnd("ide");
  128. $core.addMethod(
  129. $core.method({
  130. selector: "code",
  131. protocol: 'accessing',
  132. fn: function (){
  133. var self=this;
  134. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  135. return $core.withContext(function($ctx1) {
  136. //>>excludeEnd("ctx");
  137. var $1,$receiver;
  138. $1=self["@code"];
  139. if(($receiver = $1) == null || $receiver.isNil){
  140. self["@code"]=$recv($globals.HLCodeModel)._on_(self._environment());
  141. return self["@code"];
  142. } else {
  143. return $1;
  144. };
  145. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  146. }, function($ctx1) {$ctx1.fill(self,"code",{},$globals.HLInspectorModel)});
  147. //>>excludeEnd("ctx");
  148. },
  149. //>>excludeStart("ide", pragmas.excludeIdeData);
  150. args: [],
  151. source: "code\x0a\x09\x22Answers the code model working for this workspace model\x22\x0a\x09^ code ifNil:[ code := HLCodeModel on: self environment ]",
  152. referencedClasses: ["HLCodeModel"],
  153. //>>excludeEnd("ide");
  154. messageSends: ["ifNil:", "on:", "environment"]
  155. }),
  156. $globals.HLInspectorModel);
  157. $core.addMethod(
  158. $core.method({
  159. selector: "inspect:on:",
  160. protocol: 'actions',
  161. fn: function (anObject,anInspector){
  162. var self=this;
  163. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  164. return $core.withContext(function($ctx1) {
  165. //>>excludeEnd("ctx");
  166. self["@inspectee"]=anObject;
  167. self["@variables"]=[];
  168. $recv(self["@inspectee"])._inspectOn_(anInspector);
  169. return self;
  170. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  171. }, function($ctx1) {$ctx1.fill(self,"inspect:on:",{anObject:anObject,anInspector:anInspector},$globals.HLInspectorModel)});
  172. //>>excludeEnd("ctx");
  173. },
  174. //>>excludeStart("ide", pragmas.excludeIdeData);
  175. args: ["anObject", "anInspector"],
  176. source: "inspect: anObject on: anInspector\x0a\x09inspectee := anObject.\x0a\x09variables := #().\x0a\x09inspectee inspectOn: anInspector",
  177. referencedClasses: [],
  178. //>>excludeEnd("ide");
  179. messageSends: ["inspectOn:"]
  180. }),
  181. $globals.HLInspectorModel);
  182. $core.addMethod(
  183. $core.method({
  184. selector: "inspectee",
  185. protocol: 'accessing',
  186. fn: function (){
  187. var self=this;
  188. return self["@inspectee"];
  189. },
  190. //>>excludeStart("ide", pragmas.excludeIdeData);
  191. args: [],
  192. source: "inspectee \x0a\x09^ inspectee",
  193. referencedClasses: [],
  194. //>>excludeEnd("ide");
  195. messageSends: []
  196. }),
  197. $globals.HLInspectorModel);
  198. $core.addMethod(
  199. $core.method({
  200. selector: "inspectee:",
  201. protocol: 'accessing',
  202. fn: function (anObject){
  203. var self=this;
  204. self["@inspectee"]=anObject;
  205. return self;
  206. },
  207. //>>excludeStart("ide", pragmas.excludeIdeData);
  208. args: ["anObject"],
  209. source: "inspectee: anObject \x0a\x09inspectee := anObject",
  210. referencedClasses: [],
  211. //>>excludeEnd("ide");
  212. messageSends: []
  213. }),
  214. $globals.HLInspectorModel);
  215. $core.addMethod(
  216. $core.method({
  217. selector: "instVarObjectAt:",
  218. protocol: 'actions',
  219. fn: function (anInstVarName){
  220. var self=this;
  221. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  222. return $core.withContext(function($ctx1) {
  223. //>>excludeEnd("ctx");
  224. return $recv(self._variables())._at_(anInstVarName);
  225. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  226. }, function($ctx1) {$ctx1.fill(self,"instVarObjectAt:",{anInstVarName:anInstVarName},$globals.HLInspectorModel)});
  227. //>>excludeEnd("ctx");
  228. },
  229. //>>excludeStart("ide", pragmas.excludeIdeData);
  230. args: ["anInstVarName"],
  231. source: "instVarObjectAt: anInstVarName\x0a\x09^ self variables at: anInstVarName",
  232. referencedClasses: [],
  233. //>>excludeEnd("ide");
  234. messageSends: ["at:", "variables"]
  235. }),
  236. $globals.HLInspectorModel);
  237. $core.addMethod(
  238. $core.method({
  239. selector: "label",
  240. protocol: 'accessing',
  241. fn: function (){
  242. var self=this;
  243. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  244. return $core.withContext(function($ctx1) {
  245. //>>excludeEnd("ctx");
  246. var $1,$receiver;
  247. $1=self["@label"];
  248. if(($receiver = $1) == null || $receiver.isNil){
  249. return $recv(self._inspectee())._printString();
  250. } else {
  251. return $1;
  252. };
  253. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  254. }, function($ctx1) {$ctx1.fill(self,"label",{},$globals.HLInspectorModel)});
  255. //>>excludeEnd("ctx");
  256. },
  257. //>>excludeStart("ide", pragmas.excludeIdeData);
  258. args: [],
  259. source: "label\x0a ^ label ifNil: [ self inspectee printString ]",
  260. referencedClasses: [],
  261. //>>excludeEnd("ide");
  262. messageSends: ["ifNil:", "printString", "inspectee"]
  263. }),
  264. $globals.HLInspectorModel);
  265. $core.addMethod(
  266. $core.method({
  267. selector: "label:",
  268. protocol: 'accessing',
  269. fn: function (aString){
  270. var self=this;
  271. self["@label"]=aString;
  272. return self;
  273. },
  274. //>>excludeStart("ide", pragmas.excludeIdeData);
  275. args: ["aString"],
  276. source: "label: aString\x0a label := aString",
  277. referencedClasses: [],
  278. //>>excludeEnd("ide");
  279. messageSends: []
  280. }),
  281. $globals.HLInspectorModel);
  282. $core.addMethod(
  283. $core.method({
  284. selector: "selectedInstVar:",
  285. protocol: 'actions',
  286. fn: function (anInstVarName){
  287. var self=this;
  288. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  289. return $core.withContext(function($ctx1) {
  290. //>>excludeEnd("ctx");
  291. self._selection_(anInstVarName);
  292. return self;
  293. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  294. }, function($ctx1) {$ctx1.fill(self,"selectedInstVar:",{anInstVarName:anInstVarName},$globals.HLInspectorModel)});
  295. //>>excludeEnd("ctx");
  296. },
  297. //>>excludeStart("ide", pragmas.excludeIdeData);
  298. args: ["anInstVarName"],
  299. source: "selectedInstVar: anInstVarName\x0a self selection: anInstVarName",
  300. referencedClasses: [],
  301. //>>excludeEnd("ide");
  302. messageSends: ["selection:"]
  303. }),
  304. $globals.HLInspectorModel);
  305. $core.addMethod(
  306. $core.method({
  307. selector: "selectedInstVarObject",
  308. protocol: 'accessing',
  309. fn: function (){
  310. var self=this;
  311. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  312. return $core.withContext(function($ctx1) {
  313. //>>excludeEnd("ctx");
  314. return self._instVarObjectAt_(self._selection());
  315. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  316. }, function($ctx1) {$ctx1.fill(self,"selectedInstVarObject",{},$globals.HLInspectorModel)});
  317. //>>excludeEnd("ctx");
  318. },
  319. //>>excludeStart("ide", pragmas.excludeIdeData);
  320. args: [],
  321. source: "selectedInstVarObject\x0a\x09^ self instVarObjectAt: self selection",
  322. referencedClasses: [],
  323. //>>excludeEnd("ide");
  324. messageSends: ["instVarObjectAt:", "selection"]
  325. }),
  326. $globals.HLInspectorModel);
  327. $core.addMethod(
  328. $core.method({
  329. selector: "selection",
  330. protocol: 'accessing',
  331. fn: function (){
  332. var self=this;
  333. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  334. return $core.withContext(function($ctx1) {
  335. //>>excludeEnd("ctx");
  336. var $1,$receiver;
  337. $1=self["@selection"];
  338. if(($receiver = $1) == null || $receiver.isNil){
  339. return "";
  340. } else {
  341. return $1;
  342. };
  343. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  344. }, function($ctx1) {$ctx1.fill(self,"selection",{},$globals.HLInspectorModel)});
  345. //>>excludeEnd("ctx");
  346. },
  347. //>>excludeStart("ide", pragmas.excludeIdeData);
  348. args: [],
  349. source: "selection\x0a\x09^ selection ifNil:[ '' ]",
  350. referencedClasses: [],
  351. //>>excludeEnd("ide");
  352. messageSends: ["ifNil:"]
  353. }),
  354. $globals.HLInspectorModel);
  355. $core.addMethod(
  356. $core.method({
  357. selector: "selection:",
  358. protocol: 'accessing',
  359. fn: function (anObject){
  360. var self=this;
  361. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  362. return $core.withContext(function($ctx1) {
  363. //>>excludeEnd("ctx");
  364. self["@selection"]=anObject;
  365. $recv(self._announcer())._announce_($recv($globals.HLInstanceVariableSelected)._on_(self["@selection"]));
  366. return self;
  367. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  368. }, function($ctx1) {$ctx1.fill(self,"selection:",{anObject:anObject},$globals.HLInspectorModel)});
  369. //>>excludeEnd("ctx");
  370. },
  371. //>>excludeStart("ide", pragmas.excludeIdeData);
  372. args: ["anObject"],
  373. source: "selection: anObject\x0a\x09selection := anObject.\x0a\x0a\x09self announcer announce: (HLInstanceVariableSelected on: selection)",
  374. referencedClasses: ["HLInstanceVariableSelected"],
  375. //>>excludeEnd("ide");
  376. messageSends: ["announce:", "announcer", "on:"]
  377. }),
  378. $globals.HLInspectorModel);
  379. $core.addMethod(
  380. $core.method({
  381. selector: "subscribe:",
  382. protocol: 'actions',
  383. fn: function (aWidget){
  384. var self=this;
  385. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  386. return $core.withContext(function($ctx1) {
  387. //>>excludeEnd("ctx");
  388. $recv(aWidget)._subscribeTo_(self._announcer());
  389. return self;
  390. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  391. }, function($ctx1) {$ctx1.fill(self,"subscribe:",{aWidget:aWidget},$globals.HLInspectorModel)});
  392. //>>excludeEnd("ctx");
  393. },
  394. //>>excludeStart("ide", pragmas.excludeIdeData);
  395. args: ["aWidget"],
  396. source: "subscribe: aWidget\x0a\x09aWidget subscribeTo: self announcer",
  397. referencedClasses: [],
  398. //>>excludeEnd("ide");
  399. messageSends: ["subscribeTo:", "announcer"]
  400. }),
  401. $globals.HLInspectorModel);
  402. $core.addMethod(
  403. $core.method({
  404. selector: "variables",
  405. protocol: 'accessing',
  406. fn: function (){
  407. var self=this;
  408. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  409. return $core.withContext(function($ctx1) {
  410. //>>excludeEnd("ctx");
  411. var $1,$receiver;
  412. $1=self["@variables"];
  413. if(($receiver = $1) == null || $receiver.isNil){
  414. return $recv($globals.Dictionary)._new();
  415. } else {
  416. return $1;
  417. };
  418. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  419. }, function($ctx1) {$ctx1.fill(self,"variables",{},$globals.HLInspectorModel)});
  420. //>>excludeEnd("ctx");
  421. },
  422. //>>excludeStart("ide", pragmas.excludeIdeData);
  423. args: [],
  424. source: "variables\x0a\x09^ variables ifNil: [ Dictionary new ]",
  425. referencedClasses: ["Dictionary"],
  426. //>>excludeEnd("ide");
  427. messageSends: ["ifNil:", "new"]
  428. }),
  429. $globals.HLInspectorModel);
  430. $core.addMethod(
  431. $core.method({
  432. selector: "variables:",
  433. protocol: 'accessing',
  434. fn: function (aCollection){
  435. var self=this;
  436. self["@variables"]=aCollection;
  437. return self;
  438. },
  439. //>>excludeStart("ide", pragmas.excludeIdeData);
  440. args: ["aCollection"],
  441. source: "variables: aCollection\x0a\x09variables := aCollection",
  442. referencedClasses: [],
  443. //>>excludeEnd("ide");
  444. messageSends: []
  445. }),
  446. $globals.HLInspectorModel);
  447. $core.addMethod(
  448. $core.method({
  449. selector: "on:",
  450. protocol: 'actions',
  451. fn: function (anEnvironment){
  452. var self=this;
  453. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  454. return $core.withContext(function($ctx1) {
  455. //>>excludeEnd("ctx");
  456. var $1;
  457. $1=self._new();
  458. $recv($1)._environment_(anEnvironment);
  459. return $recv($1)._yourself();
  460. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  461. }, function($ctx1) {$ctx1.fill(self,"on:",{anEnvironment:anEnvironment},$globals.HLInspectorModel.klass)});
  462. //>>excludeEnd("ctx");
  463. },
  464. //>>excludeStart("ide", pragmas.excludeIdeData);
  465. args: ["anEnvironment"],
  466. source: "on: anEnvironment\x0a\x0a\x09^ self new\x0a \x09environment: anEnvironment;\x0a yourself",
  467. referencedClasses: [],
  468. //>>excludeEnd("ide");
  469. messageSends: ["environment:", "new", "yourself"]
  470. }),
  471. $globals.HLInspectorModel.klass);
  472. $core.addClass('HLInspectorVariablesWidget', $globals.HLNavigationListWidget, ['announcer', 'inspector', 'list', 'diveButton'], 'Helios-Inspector');
  473. $core.addMethod(
  474. $core.method({
  475. selector: "announcer",
  476. protocol: 'accessing',
  477. fn: function (){
  478. var self=this;
  479. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  480. return $core.withContext(function($ctx1) {
  481. //>>excludeEnd("ctx");
  482. var $1,$receiver;
  483. $1=self["@announcer"];
  484. if(($receiver = $1) == null || $receiver.isNil){
  485. self["@announcer"]=$recv($globals.Announcer)._new();
  486. return self["@announcer"];
  487. } else {
  488. return $1;
  489. };
  490. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  491. }, function($ctx1) {$ctx1.fill(self,"announcer",{},$globals.HLInspectorVariablesWidget)});
  492. //>>excludeEnd("ctx");
  493. },
  494. //>>excludeStart("ide", pragmas.excludeIdeData);
  495. args: [],
  496. source: "announcer\x0a\x09^ announcer ifNil:[ announcer := Announcer new ]",
  497. referencedClasses: ["Announcer"],
  498. //>>excludeEnd("ide");
  499. messageSends: ["ifNil:", "new"]
  500. }),
  501. $globals.HLInspectorVariablesWidget);
  502. $core.addMethod(
  503. $core.method({
  504. selector: "defaultItems",
  505. protocol: 'defaults',
  506. fn: function (){
  507. var self=this;
  508. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  509. return $core.withContext(function($ctx1) {
  510. //>>excludeEnd("ctx");
  511. return self._variables();
  512. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  513. }, function($ctx1) {$ctx1.fill(self,"defaultItems",{},$globals.HLInspectorVariablesWidget)});
  514. //>>excludeEnd("ctx");
  515. },
  516. //>>excludeStart("ide", pragmas.excludeIdeData);
  517. args: [],
  518. source: "defaultItems\x0a\x09^ self variables",
  519. referencedClasses: [],
  520. //>>excludeEnd("ide");
  521. messageSends: ["variables"]
  522. }),
  523. $globals.HLInspectorVariablesWidget);
  524. $core.addMethod(
  525. $core.method({
  526. selector: "dive",
  527. protocol: 'actions',
  528. fn: function (){
  529. var self=this;
  530. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  531. return $core.withContext(function($ctx1) {
  532. //>>excludeEnd("ctx");
  533. $recv(self._announcer())._announce_($recv($globals.HLDiveRequested)._new());
  534. return self;
  535. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  536. }, function($ctx1) {$ctx1.fill(self,"dive",{},$globals.HLInspectorVariablesWidget)});
  537. //>>excludeEnd("ctx");
  538. },
  539. //>>excludeStart("ide", pragmas.excludeIdeData);
  540. args: [],
  541. source: "dive\x0a\x09self announcer announce: HLDiveRequested new",
  542. referencedClasses: ["HLDiveRequested"],
  543. //>>excludeEnd("ide");
  544. messageSends: ["announce:", "announcer", "new"]
  545. }),
  546. $globals.HLInspectorVariablesWidget);
  547. $core.addMethod(
  548. $core.method({
  549. selector: "inspector",
  550. protocol: 'accessing',
  551. fn: function (){
  552. var self=this;
  553. return self["@inspector"];
  554. },
  555. //>>excludeStart("ide", pragmas.excludeIdeData);
  556. args: [],
  557. source: "inspector\x0a\x09^ inspector",
  558. referencedClasses: [],
  559. //>>excludeEnd("ide");
  560. messageSends: []
  561. }),
  562. $globals.HLInspectorVariablesWidget);
  563. $core.addMethod(
  564. $core.method({
  565. selector: "inspector:",
  566. protocol: 'accessing',
  567. fn: function (anInspector){
  568. var self=this;
  569. self["@inspector"]=anInspector;
  570. return self;
  571. },
  572. //>>excludeStart("ide", pragmas.excludeIdeData);
  573. args: ["anInspector"],
  574. source: "inspector: anInspector\x0a\x09inspector := anInspector",
  575. referencedClasses: [],
  576. //>>excludeEnd("ide");
  577. messageSends: []
  578. }),
  579. $globals.HLInspectorVariablesWidget);
  580. $core.addMethod(
  581. $core.method({
  582. selector: "label",
  583. protocol: 'accessing',
  584. fn: function (){
  585. var self=this;
  586. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  587. return $core.withContext(function($ctx1) {
  588. //>>excludeEnd("ctx");
  589. return $recv(self._model())._label();
  590. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  591. }, function($ctx1) {$ctx1.fill(self,"label",{},$globals.HLInspectorVariablesWidget)});
  592. //>>excludeEnd("ctx");
  593. },
  594. //>>excludeStart("ide", pragmas.excludeIdeData);
  595. args: [],
  596. source: "label\x0a\x09^ self model label",
  597. referencedClasses: [],
  598. //>>excludeEnd("ide");
  599. messageSends: ["label", "model"]
  600. }),
  601. $globals.HLInspectorVariablesWidget);
  602. $core.addMethod(
  603. $core.method({
  604. selector: "model",
  605. protocol: 'accessing',
  606. fn: function (){
  607. var self=this;
  608. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  609. return $core.withContext(function($ctx1) {
  610. //>>excludeEnd("ctx");
  611. return $recv(self._inspector())._model();
  612. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  613. }, function($ctx1) {$ctx1.fill(self,"model",{},$globals.HLInspectorVariablesWidget)});
  614. //>>excludeEnd("ctx");
  615. },
  616. //>>excludeStart("ide", pragmas.excludeIdeData);
  617. args: [],
  618. source: "model\x0a ^ self inspector model",
  619. referencedClasses: [],
  620. //>>excludeEnd("ide");
  621. messageSends: ["model", "inspector"]
  622. }),
  623. $globals.HLInspectorVariablesWidget);
  624. $core.addMethod(
  625. $core.method({
  626. selector: "refresh",
  627. protocol: 'actions',
  628. fn: function (){
  629. var self=this;
  630. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  631. return $core.withContext(function($ctx1) {
  632. //>>excludeEnd("ctx");
  633. var $1;
  634. $1=$recv(self._variables()).__eq(self._items());
  635. if(!$core.assert($1)){
  636. self._resetItems();
  637. (
  638. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  639. $ctx1.supercall = true,
  640. //>>excludeEnd("ctx");
  641. ($globals.HLInspectorVariablesWidget.superclass||$boot.dnu).fn.prototype._refresh.apply($recv(self), []));
  642. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  643. $ctx1.supercall = false;
  644. //>>excludeEnd("ctx");;
  645. };
  646. return self;
  647. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  648. }, function($ctx1) {$ctx1.fill(self,"refresh",{},$globals.HLInspectorVariablesWidget)});
  649. //>>excludeEnd("ctx");
  650. },
  651. //>>excludeStart("ide", pragmas.excludeIdeData);
  652. args: [],
  653. source: "refresh\x0a\x09self variables = self items ifFalse: [\x0a\x09\x09self resetItems.\x0a \x09super refresh ]",
  654. referencedClasses: [],
  655. //>>excludeEnd("ide");
  656. messageSends: ["ifFalse:", "=", "variables", "items", "resetItems", "refresh"]
  657. }),
  658. $globals.HLInspectorVariablesWidget);
  659. $core.addMethod(
  660. $core.method({
  661. selector: "renderButtonsOn:",
  662. protocol: 'rendering',
  663. fn: function (html){
  664. var self=this;
  665. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  666. return $core.withContext(function($ctx1) {
  667. //>>excludeEnd("ctx");
  668. var $1;
  669. $1=$recv(html)._button();
  670. $recv($1)._class_("btn btn-default");
  671. $recv($1)._with_("Dive");
  672. self["@diveButton"]=$recv($1)._onClick_((function(){
  673. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  674. return $core.withContext(function($ctx2) {
  675. //>>excludeEnd("ctx");
  676. return self._dive();
  677. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  678. }, function($ctx2) {$ctx2.fillBlock({},$ctx1,1)});
  679. //>>excludeEnd("ctx");
  680. }));
  681. return self;
  682. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  683. }, function($ctx1) {$ctx1.fill(self,"renderButtonsOn:",{html:html},$globals.HLInspectorVariablesWidget)});
  684. //>>excludeEnd("ctx");
  685. },
  686. //>>excludeStart("ide", pragmas.excludeIdeData);
  687. args: ["html"],
  688. source: "renderButtonsOn: html\x0a\x09diveButton := html button \x0a\x09\x09class: 'btn btn-default';\x0a\x09\x09with: 'Dive'; \x0a\x09\x09onClick: [ self dive ]",
  689. referencedClasses: [],
  690. //>>excludeEnd("ide");
  691. messageSends: ["class:", "button", "with:", "onClick:", "dive"]
  692. }),
  693. $globals.HLInspectorVariablesWidget);
  694. $core.addMethod(
  695. $core.method({
  696. selector: "renderContentOn:",
  697. protocol: 'rendering',
  698. fn: function (html){
  699. var self=this;
  700. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  701. return $core.withContext(function($ctx1) {
  702. //>>excludeEnd("ctx");
  703. self._renderHeadOn_(html);
  704. (
  705. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  706. $ctx1.supercall = true,
  707. //>>excludeEnd("ctx");
  708. ($globals.HLInspectorVariablesWidget.superclass||$boot.dnu).fn.prototype._renderContentOn_.apply($recv(self), [html]));
  709. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  710. $ctx1.supercall = false;
  711. //>>excludeEnd("ctx");;
  712. $recv(self._wrapper())._onDblClick_((function(){
  713. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  714. return $core.withContext(function($ctx2) {
  715. //>>excludeEnd("ctx");
  716. return self._dive();
  717. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  718. }, function($ctx2) {$ctx2.fillBlock({},$ctx1,1)});
  719. //>>excludeEnd("ctx");
  720. }));
  721. return self;
  722. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  723. }, function($ctx1) {$ctx1.fill(self,"renderContentOn:",{html:html},$globals.HLInspectorVariablesWidget)});
  724. //>>excludeEnd("ctx");
  725. },
  726. //>>excludeStart("ide", pragmas.excludeIdeData);
  727. args: ["html"],
  728. source: "renderContentOn: html\x0a\x09self renderHeadOn: html.\x0a\x09super renderContentOn: html.\x0a\x09self wrapper onDblClick: [ self dive ]",
  729. referencedClasses: [],
  730. //>>excludeEnd("ide");
  731. messageSends: ["renderHeadOn:", "renderContentOn:", "onDblClick:", "wrapper", "dive"]
  732. }),
  733. $globals.HLInspectorVariablesWidget);
  734. $core.addMethod(
  735. $core.method({
  736. selector: "renderHeadOn:",
  737. protocol: 'rendering',
  738. fn: function (html){
  739. var self=this;
  740. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  741. return $core.withContext(function($ctx1) {
  742. //>>excludeEnd("ctx");
  743. var $1;
  744. $1=$recv(html)._div();
  745. $recv($1)._class_("list-label");
  746. $recv($1)._with_(self._label());
  747. return self;
  748. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  749. }, function($ctx1) {$ctx1.fill(self,"renderHeadOn:",{html:html},$globals.HLInspectorVariablesWidget)});
  750. //>>excludeEnd("ctx");
  751. },
  752. //>>excludeStart("ide", pragmas.excludeIdeData);
  753. args: ["html"],
  754. source: "renderHeadOn: html\x0a\x09html div \x0a\x09\x09class: 'list-label';\x0a\x09\x09with: self label",
  755. referencedClasses: [],
  756. //>>excludeEnd("ide");
  757. messageSends: ["class:", "div", "with:", "label"]
  758. }),
  759. $globals.HLInspectorVariablesWidget);
  760. $core.addMethod(
  761. $core.method({
  762. selector: "resetItems",
  763. protocol: 'actions',
  764. fn: function (){
  765. var self=this;
  766. self["@items"]=nil;
  767. return self;
  768. },
  769. //>>excludeStart("ide", pragmas.excludeIdeData);
  770. args: [],
  771. source: "resetItems\x0a\x09items := nil",
  772. referencedClasses: [],
  773. //>>excludeEnd("ide");
  774. messageSends: []
  775. }),
  776. $globals.HLInspectorVariablesWidget);
  777. $core.addMethod(
  778. $core.method({
  779. selector: "selectItem:",
  780. protocol: 'reactions',
  781. fn: function (anObject){
  782. var self=this;
  783. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  784. return $core.withContext(function($ctx1) {
  785. //>>excludeEnd("ctx");
  786. (
  787. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  788. $ctx1.supercall = true,
  789. //>>excludeEnd("ctx");
  790. ($globals.HLInspectorVariablesWidget.superclass||$boot.dnu).fn.prototype._selectItem_.apply($recv(self), [anObject]));
  791. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  792. $ctx1.supercall = false;
  793. //>>excludeEnd("ctx");;
  794. $recv(self._model())._selectedInstVar_(anObject);
  795. return self;
  796. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  797. }, function($ctx1) {$ctx1.fill(self,"selectItem:",{anObject:anObject},$globals.HLInspectorVariablesWidget)});
  798. //>>excludeEnd("ctx");
  799. },
  800. //>>excludeStart("ide", pragmas.excludeIdeData);
  801. args: ["anObject"],
  802. source: "selectItem: anObject\x0a\x09super selectItem: anObject.\x0a self model selectedInstVar: anObject",
  803. referencedClasses: [],
  804. //>>excludeEnd("ide");
  805. messageSends: ["selectItem:", "selectedInstVar:", "model"]
  806. }),
  807. $globals.HLInspectorVariablesWidget);
  808. $core.addMethod(
  809. $core.method({
  810. selector: "selection",
  811. protocol: 'accessing',
  812. fn: function (){
  813. var self=this;
  814. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  815. return $core.withContext(function($ctx1) {
  816. //>>excludeEnd("ctx");
  817. return $recv(self._model())._selection();
  818. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  819. }, function($ctx1) {$ctx1.fill(self,"selection",{},$globals.HLInspectorVariablesWidget)});
  820. //>>excludeEnd("ctx");
  821. },
  822. //>>excludeStart("ide", pragmas.excludeIdeData);
  823. args: [],
  824. source: "selection\x0a\x09^ self model selection",
  825. referencedClasses: [],
  826. //>>excludeEnd("ide");
  827. messageSends: ["selection", "model"]
  828. }),
  829. $globals.HLInspectorVariablesWidget);
  830. $core.addMethod(
  831. $core.method({
  832. selector: "variables",
  833. protocol: 'accessing',
  834. fn: function (){
  835. var self=this;
  836. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  837. return $core.withContext(function($ctx1) {
  838. //>>excludeEnd("ctx");
  839. return $recv($recv(self._model())._variables())._keys();
  840. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  841. }, function($ctx1) {$ctx1.fill(self,"variables",{},$globals.HLInspectorVariablesWidget)});
  842. //>>excludeEnd("ctx");
  843. },
  844. //>>excludeStart("ide", pragmas.excludeIdeData);
  845. args: [],
  846. source: "variables\x0a\x09^ self model variables keys",
  847. referencedClasses: [],
  848. //>>excludeEnd("ide");
  849. messageSends: ["keys", "variables", "model"]
  850. }),
  851. $globals.HLInspectorVariablesWidget);
  852. $core.addClass('HLInspectorWidget', $globals.HLWidget, ['model', 'variablesWidget', 'displayWidget', 'codeWidget'], 'Helios-Inspector');
  853. $core.addMethod(
  854. $core.method({
  855. selector: "codeWidget",
  856. protocol: 'accessing',
  857. fn: function (){
  858. var self=this;
  859. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  860. return $core.withContext(function($ctx1) {
  861. //>>excludeEnd("ctx");
  862. var $1,$receiver;
  863. $1=self["@codeWidget"];
  864. if(($receiver = $1) == null || $receiver.isNil){
  865. self["@codeWidget"]=self._defaultCodeWidget();
  866. return self["@codeWidget"];
  867. } else {
  868. return $1;
  869. };
  870. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  871. }, function($ctx1) {$ctx1.fill(self,"codeWidget",{},$globals.HLInspectorWidget)});
  872. //>>excludeEnd("ctx");
  873. },
  874. //>>excludeStart("ide", pragmas.excludeIdeData);
  875. args: [],
  876. source: "codeWidget\x0a\x09^ codeWidget ifNil: [\x0a\x09\x09codeWidget := self defaultCodeWidget ]",
  877. referencedClasses: [],
  878. //>>excludeEnd("ide");
  879. messageSends: ["ifNil:", "defaultCodeWidget"]
  880. }),
  881. $globals.HLInspectorWidget);
  882. $core.addMethod(
  883. $core.method({
  884. selector: "codeWidget:",
  885. protocol: 'accessing',
  886. fn: function (aWidget){
  887. var self=this;
  888. self["@codeWidget"]=aWidget;
  889. return self;
  890. },
  891. //>>excludeStart("ide", pragmas.excludeIdeData);
  892. args: ["aWidget"],
  893. source: "codeWidget: aWidget\x0a\x09codeWidget := aWidget",
  894. referencedClasses: [],
  895. //>>excludeEnd("ide");
  896. messageSends: []
  897. }),
  898. $globals.HLInspectorWidget);
  899. $core.addMethod(
  900. $core.method({
  901. selector: "defaultCodeWidget",
  902. protocol: 'defaults',
  903. fn: function (){
  904. var self=this;
  905. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  906. return $core.withContext(function($ctx1) {
  907. //>>excludeEnd("ctx");
  908. var $1,$3,$2;
  909. $1=$recv($globals.HLCodeWidget)._new();
  910. $3=self._model();
  911. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  912. $ctx1.sendIdx["model"]=1;
  913. //>>excludeEnd("ctx");
  914. $2=$recv($3)._code();
  915. $recv($1)._model_($2);
  916. $recv($1)._receiver_($recv(self._model())._inspectee());
  917. return $recv($1)._yourself();
  918. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  919. }, function($ctx1) {$ctx1.fill(self,"defaultCodeWidget",{},$globals.HLInspectorWidget)});
  920. //>>excludeEnd("ctx");
  921. },
  922. //>>excludeStart("ide", pragmas.excludeIdeData);
  923. args: [],
  924. source: "defaultCodeWidget\x0a\x09^ HLCodeWidget new\x0a \x09model: self model code;\x0a \x09receiver: self model inspectee;\x0a \x09yourself",
  925. referencedClasses: ["HLCodeWidget"],
  926. //>>excludeEnd("ide");
  927. messageSends: ["model:", "new", "code", "model", "receiver:", "inspectee", "yourself"]
  928. }),
  929. $globals.HLInspectorWidget);
  930. $core.addMethod(
  931. $core.method({
  932. selector: "displayWidget",
  933. protocol: 'accessing',
  934. fn: function (){
  935. var self=this;
  936. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  937. return $core.withContext(function($ctx1) {
  938. //>>excludeEnd("ctx");
  939. var $1,$2,$receiver;
  940. $1=self["@displayWidget"];
  941. if(($receiver = $1) == null || $receiver.isNil){
  942. $2=$recv($globals.HLInspectorDisplayWidget)._new();
  943. $recv($2)._inspector_(self);
  944. self["@displayWidget"]=$recv($2)._yourself();
  945. return self["@displayWidget"];
  946. } else {
  947. return $1;
  948. };
  949. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  950. }, function($ctx1) {$ctx1.fill(self,"displayWidget",{},$globals.HLInspectorWidget)});
  951. //>>excludeEnd("ctx");
  952. },
  953. //>>excludeStart("ide", pragmas.excludeIdeData);
  954. args: [],
  955. source: "displayWidget\x0a\x09^ displayWidget ifNil: [\x0a\x09\x09displayWidget := HLInspectorDisplayWidget new\x0a \x09\x09inspector: self;\x0a \x09yourself ]",
  956. referencedClasses: ["HLInspectorDisplayWidget"],
  957. //>>excludeEnd("ide");
  958. messageSends: ["ifNil:", "inspector:", "new", "yourself"]
  959. }),
  960. $globals.HLInspectorWidget);
  961. $core.addMethod(
  962. $core.method({
  963. selector: "initialize",
  964. protocol: 'accessing',
  965. fn: function (){
  966. var self=this;
  967. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  968. return $core.withContext(function($ctx1) {
  969. //>>excludeEnd("ctx");
  970. (
  971. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  972. $ctx1.supercall = true,
  973. //>>excludeEnd("ctx");
  974. ($globals.HLInspectorWidget.superclass||$boot.dnu).fn.prototype._initialize.apply($recv(self), []));
  975. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  976. $ctx1.supercall = false;
  977. //>>excludeEnd("ctx");;
  978. self._register();
  979. return self;
  980. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  981. }, function($ctx1) {$ctx1.fill(self,"initialize",{},$globals.HLInspectorWidget)});
  982. //>>excludeEnd("ctx");
  983. },
  984. //>>excludeStart("ide", pragmas.excludeIdeData);
  985. args: [],
  986. source: "initialize\x0a\x09super initialize.\x0a\x09self register",
  987. referencedClasses: [],
  988. //>>excludeEnd("ide");
  989. messageSends: ["initialize", "register"]
  990. }),
  991. $globals.HLInspectorWidget);
  992. $core.addMethod(
  993. $core.method({
  994. selector: "inspect:",
  995. protocol: 'actions',
  996. fn: function (anObject){
  997. var self=this;
  998. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  999. return $core.withContext(function($ctx1) {
  1000. //>>excludeEnd("ctx");
  1001. $recv(self._model())._inspect_on_(anObject,self);
  1002. $recv(self._codeWidget())._receiver_(anObject);
  1003. self._refreshVariablesWidget();
  1004. self._refreshDisplayWidget();
  1005. return self;
  1006. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1007. }, function($ctx1) {$ctx1.fill(self,"inspect:",{anObject:anObject},$globals.HLInspectorWidget)});
  1008. //>>excludeEnd("ctx");
  1009. },
  1010. //>>excludeStart("ide", pragmas.excludeIdeData);
  1011. args: ["anObject"],
  1012. source: "inspect: anObject\x0a\x09self model inspect: anObject on: self.\x0a\x09self codeWidget receiver: anObject.\x0a \x0a\x09self \x0a \x09refreshVariablesWidget;\x0a\x09\x09refreshDisplayWidget",
  1013. referencedClasses: [],
  1014. //>>excludeEnd("ide");
  1015. messageSends: ["inspect:on:", "model", "receiver:", "codeWidget", "refreshVariablesWidget", "refreshDisplayWidget"]
  1016. }),
  1017. $globals.HLInspectorWidget);
  1018. $core.addMethod(
  1019. $core.method({
  1020. selector: "inspectee",
  1021. protocol: 'accessing',
  1022. fn: function (){
  1023. var self=this;
  1024. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1025. return $core.withContext(function($ctx1) {
  1026. //>>excludeEnd("ctx");
  1027. return $recv(self._model())._inspectee();
  1028. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1029. }, function($ctx1) {$ctx1.fill(self,"inspectee",{},$globals.HLInspectorWidget)});
  1030. //>>excludeEnd("ctx");
  1031. },
  1032. //>>excludeStart("ide", pragmas.excludeIdeData);
  1033. args: [],
  1034. source: "inspectee\x0a\x09^ self model inspectee",
  1035. referencedClasses: [],
  1036. //>>excludeEnd("ide");
  1037. messageSends: ["inspectee", "model"]
  1038. }),
  1039. $globals.HLInspectorWidget);
  1040. $core.addMethod(
  1041. $core.method({
  1042. selector: "inspectee:",
  1043. protocol: 'accessing',
  1044. fn: function (anObject){
  1045. var self=this;
  1046. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1047. return $core.withContext(function($ctx1) {
  1048. //>>excludeEnd("ctx");
  1049. $recv(self._model())._inspectee_(anObject);
  1050. return self;
  1051. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1052. }, function($ctx1) {$ctx1.fill(self,"inspectee:",{anObject:anObject},$globals.HLInspectorWidget)});
  1053. //>>excludeEnd("ctx");
  1054. },
  1055. //>>excludeStart("ide", pragmas.excludeIdeData);
  1056. args: ["anObject"],
  1057. source: "inspectee: anObject\x0a\x09self model inspectee: anObject",
  1058. referencedClasses: [],
  1059. //>>excludeEnd("ide");
  1060. messageSends: ["inspectee:", "model"]
  1061. }),
  1062. $globals.HLInspectorWidget);
  1063. $core.addMethod(
  1064. $core.method({
  1065. selector: "label",
  1066. protocol: 'accessing',
  1067. fn: function (){
  1068. var self=this;
  1069. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1070. return $core.withContext(function($ctx1) {
  1071. //>>excludeEnd("ctx");
  1072. return $recv(self._model())._label();
  1073. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1074. }, function($ctx1) {$ctx1.fill(self,"label",{},$globals.HLInspectorWidget)});
  1075. //>>excludeEnd("ctx");
  1076. },
  1077. //>>excludeStart("ide", pragmas.excludeIdeData);
  1078. args: [],
  1079. source: "label\x0a ^ self model label",
  1080. referencedClasses: [],
  1081. //>>excludeEnd("ide");
  1082. messageSends: ["label", "model"]
  1083. }),
  1084. $globals.HLInspectorWidget);
  1085. $core.addMethod(
  1086. $core.method({
  1087. selector: "model",
  1088. protocol: 'accessing',
  1089. fn: function (){
  1090. var self=this;
  1091. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1092. return $core.withContext(function($ctx1) {
  1093. //>>excludeEnd("ctx");
  1094. var $1,$receiver;
  1095. $1=self["@model"];
  1096. if(($receiver = $1) == null || $receiver.isNil){
  1097. self._model_($recv($globals.HLInspectorModel)._new());
  1098. return self["@model"];
  1099. } else {
  1100. return $1;
  1101. };
  1102. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1103. }, function($ctx1) {$ctx1.fill(self,"model",{},$globals.HLInspectorWidget)});
  1104. //>>excludeEnd("ctx");
  1105. },
  1106. //>>excludeStart("ide", pragmas.excludeIdeData);
  1107. args: [],
  1108. source: "model\x0a\x09^ model ifNil: [ \x0a \x09self model: HLInspectorModel new.\x0a\x09\x09model ]",
  1109. referencedClasses: ["HLInspectorModel"],
  1110. //>>excludeEnd("ide");
  1111. messageSends: ["ifNil:", "model:", "new"]
  1112. }),
  1113. $globals.HLInspectorWidget);
  1114. $core.addMethod(
  1115. $core.method({
  1116. selector: "model:",
  1117. protocol: 'accessing',
  1118. fn: function (aModel){
  1119. var self=this;
  1120. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1121. return $core.withContext(function($ctx1) {
  1122. //>>excludeEnd("ctx");
  1123. self["@model"]=aModel;
  1124. $recv(self._codeWidget())._model_($recv(aModel)._code());
  1125. self._observeCodeWidget();
  1126. self._observeVariablesWidget();
  1127. self._observeModel();
  1128. return self;
  1129. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1130. }, function($ctx1) {$ctx1.fill(self,"model:",{aModel:aModel},$globals.HLInspectorWidget)});
  1131. //>>excludeEnd("ctx");
  1132. },
  1133. //>>excludeStart("ide", pragmas.excludeIdeData);
  1134. args: ["aModel"],
  1135. source: "model: aModel\x0a\x09model := aModel. \x0a self codeWidget model: aModel code.\x0a \x0a self \x0a observeCodeWidget;\x0a \x09observeVariablesWidget;\x0a observeModel",
  1136. referencedClasses: [],
  1137. //>>excludeEnd("ide");
  1138. messageSends: ["model:", "codeWidget", "code", "observeCodeWidget", "observeVariablesWidget", "observeModel"]
  1139. }),
  1140. $globals.HLInspectorWidget);
  1141. $core.addMethod(
  1142. $core.method({
  1143. selector: "observeCodeWidget",
  1144. protocol: 'actions',
  1145. fn: function (){
  1146. var self=this;
  1147. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1148. return $core.withContext(function($ctx1) {
  1149. //>>excludeEnd("ctx");
  1150. $recv($recv(self._codeWidget())._announcer())._on_do_($globals.HLDoItExecuted,(function(){
  1151. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1152. return $core.withContext(function($ctx2) {
  1153. //>>excludeEnd("ctx");
  1154. return self._onDoneIt();
  1155. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1156. }, function($ctx2) {$ctx2.fillBlock({},$ctx1,1)});
  1157. //>>excludeEnd("ctx");
  1158. }));
  1159. return self;
  1160. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1161. }, function($ctx1) {$ctx1.fill(self,"observeCodeWidget",{},$globals.HLInspectorWidget)});
  1162. //>>excludeEnd("ctx");
  1163. },
  1164. //>>excludeStart("ide", pragmas.excludeIdeData);
  1165. args: [],
  1166. source: "observeCodeWidget\x0a\x09self codeWidget announcer \x0a \x09on: HLDoItExecuted \x0a do: [ self onDoneIt ]",
  1167. referencedClasses: ["HLDoItExecuted"],
  1168. //>>excludeEnd("ide");
  1169. messageSends: ["on:do:", "announcer", "codeWidget", "onDoneIt"]
  1170. }),
  1171. $globals.HLInspectorWidget);
  1172. $core.addMethod(
  1173. $core.method({
  1174. selector: "observeModel",
  1175. protocol: 'actions',
  1176. fn: function (){
  1177. var self=this;
  1178. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1179. return $core.withContext(function($ctx1) {
  1180. //>>excludeEnd("ctx");
  1181. $recv($recv(self._model())._announcer())._on_send_to_($globals.HLInstanceVariableSelected,"onInstanceVariableSelected",self);
  1182. return self;
  1183. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1184. }, function($ctx1) {$ctx1.fill(self,"observeModel",{},$globals.HLInspectorWidget)});
  1185. //>>excludeEnd("ctx");
  1186. },
  1187. //>>excludeStart("ide", pragmas.excludeIdeData);
  1188. args: [],
  1189. source: "observeModel\x0a\x09self model announcer\x0a on: HLInstanceVariableSelected\x0a\x09\x09send: #onInstanceVariableSelected\x0a\x09\x09to: self",
  1190. referencedClasses: ["HLInstanceVariableSelected"],
  1191. //>>excludeEnd("ide");
  1192. messageSends: ["on:send:to:", "announcer", "model"]
  1193. }),
  1194. $globals.HLInspectorWidget);
  1195. $core.addMethod(
  1196. $core.method({
  1197. selector: "observeVariablesWidget",
  1198. protocol: 'actions',
  1199. fn: function (){
  1200. var self=this;
  1201. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1202. return $core.withContext(function($ctx1) {
  1203. //>>excludeEnd("ctx");
  1204. $recv($recv(self._variablesWidget())._announcer())._on_send_to_($globals.HLDiveRequested,"onDive",self);
  1205. return self;
  1206. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1207. }, function($ctx1) {$ctx1.fill(self,"observeVariablesWidget",{},$globals.HLInspectorWidget)});
  1208. //>>excludeEnd("ctx");
  1209. },
  1210. //>>excludeStart("ide", pragmas.excludeIdeData);
  1211. args: [],
  1212. source: "observeVariablesWidget\x0a\x09self variablesWidget announcer \x0a on: HLDiveRequested \x0a\x09\x09send: #onDive\x0a\x09\x09to: self",
  1213. referencedClasses: ["HLDiveRequested"],
  1214. //>>excludeEnd("ide");
  1215. messageSends: ["on:send:to:", "announcer", "variablesWidget"]
  1216. }),
  1217. $globals.HLInspectorWidget);
  1218. $core.addMethod(
  1219. $core.method({
  1220. selector: "onDive",
  1221. protocol: 'reactions',
  1222. fn: function (){
  1223. var self=this;
  1224. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1225. return $core.withContext(function($ctx1) {
  1226. //>>excludeEnd("ctx");
  1227. var $1;
  1228. $1=$recv($globals.HLInspector)._new();
  1229. $recv($1)._inspect_($recv(self._model())._selectedInstVarObject());
  1230. $recv($1)._openAsTab();
  1231. return self;
  1232. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1233. }, function($ctx1) {$ctx1.fill(self,"onDive",{},$globals.HLInspectorWidget)});
  1234. //>>excludeEnd("ctx");
  1235. },
  1236. //>>excludeStart("ide", pragmas.excludeIdeData);
  1237. args: [],
  1238. source: "onDive\x0a\x09HLInspector new \x0a\x09\x09inspect: self model selectedInstVarObject;\x0a\x09\x09openAsTab",
  1239. referencedClasses: ["HLInspector"],
  1240. //>>excludeEnd("ide");
  1241. messageSends: ["inspect:", "new", "selectedInstVarObject", "model", "openAsTab"]
  1242. }),
  1243. $globals.HLInspectorWidget);
  1244. $core.addMethod(
  1245. $core.method({
  1246. selector: "onDoneIt",
  1247. protocol: 'reactions',
  1248. fn: function (){
  1249. var self=this;
  1250. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1251. return $core.withContext(function($ctx1) {
  1252. //>>excludeEnd("ctx");
  1253. self._refresh();
  1254. return self;
  1255. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1256. }, function($ctx1) {$ctx1.fill(self,"onDoneIt",{},$globals.HLInspectorWidget)});
  1257. //>>excludeEnd("ctx");
  1258. },
  1259. //>>excludeStart("ide", pragmas.excludeIdeData);
  1260. args: [],
  1261. source: "onDoneIt\x0a\x0a\x09self refresh",
  1262. referencedClasses: [],
  1263. //>>excludeEnd("ide");
  1264. messageSends: ["refresh"]
  1265. }),
  1266. $globals.HLInspectorWidget);
  1267. $core.addMethod(
  1268. $core.method({
  1269. selector: "onInspectIt",
  1270. protocol: 'reactions',
  1271. fn: function (){
  1272. var self=this;
  1273. return self;
  1274. },
  1275. //>>excludeStart("ide", pragmas.excludeIdeData);
  1276. args: [],
  1277. source: "onInspectIt",
  1278. referencedClasses: [],
  1279. //>>excludeEnd("ide");
  1280. messageSends: []
  1281. }),
  1282. $globals.HLInspectorWidget);
  1283. $core.addMethod(
  1284. $core.method({
  1285. selector: "onInstanceVariableSelected",
  1286. protocol: 'reactions',
  1287. fn: function (){
  1288. var self=this;
  1289. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1290. return $core.withContext(function($ctx1) {
  1291. //>>excludeEnd("ctx");
  1292. self._refreshDisplayWidget();
  1293. return self;
  1294. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1295. }, function($ctx1) {$ctx1.fill(self,"onInstanceVariableSelected",{},$globals.HLInspectorWidget)});
  1296. //>>excludeEnd("ctx");
  1297. },
  1298. //>>excludeStart("ide", pragmas.excludeIdeData);
  1299. args: [],
  1300. source: "onInstanceVariableSelected\x0a\x09self refreshDisplayWidget",
  1301. referencedClasses: [],
  1302. //>>excludeEnd("ide");
  1303. messageSends: ["refreshDisplayWidget"]
  1304. }),
  1305. $globals.HLInspectorWidget);
  1306. $core.addMethod(
  1307. $core.method({
  1308. selector: "onPrintIt",
  1309. protocol: 'reactions',
  1310. fn: function (){
  1311. var self=this;
  1312. return self;
  1313. },
  1314. //>>excludeStart("ide", pragmas.excludeIdeData);
  1315. args: [],
  1316. source: "onPrintIt",
  1317. referencedClasses: [],
  1318. //>>excludeEnd("ide");
  1319. messageSends: []
  1320. }),
  1321. $globals.HLInspectorWidget);
  1322. $core.addMethod(
  1323. $core.method({
  1324. selector: "refresh",
  1325. protocol: 'actions',
  1326. fn: function (){
  1327. var self=this;
  1328. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1329. return $core.withContext(function($ctx1) {
  1330. //>>excludeEnd("ctx");
  1331. self._inspect_(self._inspectee());
  1332. return self;
  1333. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1334. }, function($ctx1) {$ctx1.fill(self,"refresh",{},$globals.HLInspectorWidget)});
  1335. //>>excludeEnd("ctx");
  1336. },
  1337. //>>excludeStart("ide", pragmas.excludeIdeData);
  1338. args: [],
  1339. source: "refresh\x0a\x09self inspect: self inspectee",
  1340. referencedClasses: [],
  1341. //>>excludeEnd("ide");
  1342. messageSends: ["inspect:", "inspectee"]
  1343. }),
  1344. $globals.HLInspectorWidget);
  1345. $core.addMethod(
  1346. $core.method({
  1347. selector: "refreshDisplayWidget",
  1348. protocol: 'actions',
  1349. fn: function (){
  1350. var self=this;
  1351. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1352. return $core.withContext(function($ctx1) {
  1353. //>>excludeEnd("ctx");
  1354. $recv(self._displayWidget())._refresh();
  1355. return self;
  1356. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1357. }, function($ctx1) {$ctx1.fill(self,"refreshDisplayWidget",{},$globals.HLInspectorWidget)});
  1358. //>>excludeEnd("ctx");
  1359. },
  1360. //>>excludeStart("ide", pragmas.excludeIdeData);
  1361. args: [],
  1362. source: "refreshDisplayWidget\x0a\x09self displayWidget refresh",
  1363. referencedClasses: [],
  1364. //>>excludeEnd("ide");
  1365. messageSends: ["refresh", "displayWidget"]
  1366. }),
  1367. $globals.HLInspectorWidget);
  1368. $core.addMethod(
  1369. $core.method({
  1370. selector: "refreshVariablesWidget",
  1371. protocol: 'actions',
  1372. fn: function (){
  1373. var self=this;
  1374. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1375. return $core.withContext(function($ctx1) {
  1376. //>>excludeEnd("ctx");
  1377. $recv(self._variablesWidget())._refresh();
  1378. return self;
  1379. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1380. }, function($ctx1) {$ctx1.fill(self,"refreshVariablesWidget",{},$globals.HLInspectorWidget)});
  1381. //>>excludeEnd("ctx");
  1382. },
  1383. //>>excludeStart("ide", pragmas.excludeIdeData);
  1384. args: [],
  1385. source: "refreshVariablesWidget\x0a\x09self variablesWidget refresh",
  1386. referencedClasses: [],
  1387. //>>excludeEnd("ide");
  1388. messageSends: ["refresh", "variablesWidget"]
  1389. }),
  1390. $globals.HLInspectorWidget);
  1391. $core.addMethod(
  1392. $core.method({
  1393. selector: "register",
  1394. protocol: 'registration',
  1395. fn: function (){
  1396. var self=this;
  1397. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1398. return $core.withContext(function($ctx1) {
  1399. //>>excludeEnd("ctx");
  1400. $recv($globals.HLInspector)._register_(self);
  1401. return self;
  1402. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1403. }, function($ctx1) {$ctx1.fill(self,"register",{},$globals.HLInspectorWidget)});
  1404. //>>excludeEnd("ctx");
  1405. },
  1406. //>>excludeStart("ide", pragmas.excludeIdeData);
  1407. args: [],
  1408. source: "register\x0a\x09HLInspector register: self",
  1409. referencedClasses: ["HLInspector"],
  1410. //>>excludeEnd("ide");
  1411. messageSends: ["register:"]
  1412. }),
  1413. $globals.HLInspectorWidget);
  1414. $core.addMethod(
  1415. $core.method({
  1416. selector: "renderContentOn:",
  1417. protocol: 'rendering',
  1418. fn: function (html){
  1419. var self=this;
  1420. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1421. return $core.withContext(function($ctx1) {
  1422. //>>excludeEnd("ctx");
  1423. var $1;
  1424. $1=$recv($globals.HLHorizontalSplitter)._with_with_($recv($globals.HLVerticalSplitter)._with_with_(self._variablesWidget(),self._displayWidget()),self._codeWidget());
  1425. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1426. $ctx1.sendIdx["with:with:"]=1;
  1427. //>>excludeEnd("ctx");
  1428. $recv(html)._with_($1);
  1429. return self;
  1430. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1431. }, function($ctx1) {$ctx1.fill(self,"renderContentOn:",{html:html},$globals.HLInspectorWidget)});
  1432. //>>excludeEnd("ctx");
  1433. },
  1434. //>>excludeStart("ide", pragmas.excludeIdeData);
  1435. args: ["html"],
  1436. source: "renderContentOn: html\x0a \x09html with: (HLHorizontalSplitter\x0a \x09with: (HLVerticalSplitter \x0a with: self variablesWidget\x0a with: self displayWidget)\x0a with: self codeWidget)",
  1437. referencedClasses: ["HLHorizontalSplitter", "HLVerticalSplitter"],
  1438. //>>excludeEnd("ide");
  1439. messageSends: ["with:", "with:with:", "variablesWidget", "displayWidget", "codeWidget"]
  1440. }),
  1441. $globals.HLInspectorWidget);
  1442. $core.addMethod(
  1443. $core.method({
  1444. selector: "setLabel:",
  1445. protocol: 'actions',
  1446. fn: function (aString){
  1447. var self=this;
  1448. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1449. return $core.withContext(function($ctx1) {
  1450. //>>excludeEnd("ctx");
  1451. $recv(self._model())._label_(aString);
  1452. return self;
  1453. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1454. }, function($ctx1) {$ctx1.fill(self,"setLabel:",{aString:aString},$globals.HLInspectorWidget)});
  1455. //>>excludeEnd("ctx");
  1456. },
  1457. //>>excludeStart("ide", pragmas.excludeIdeData);
  1458. args: ["aString"],
  1459. source: "setLabel: aString\x0a\x09self model label: aString",
  1460. referencedClasses: [],
  1461. //>>excludeEnd("ide");
  1462. messageSends: ["label:", "model"]
  1463. }),
  1464. $globals.HLInspectorWidget);
  1465. $core.addMethod(
  1466. $core.method({
  1467. selector: "setVariables:",
  1468. protocol: 'actions',
  1469. fn: function (aDictionary){
  1470. var self=this;
  1471. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1472. return $core.withContext(function($ctx1) {
  1473. //>>excludeEnd("ctx");
  1474. $recv(self._model())._variables_(aDictionary);
  1475. return self;
  1476. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1477. }, function($ctx1) {$ctx1.fill(self,"setVariables:",{aDictionary:aDictionary},$globals.HLInspectorWidget)});
  1478. //>>excludeEnd("ctx");
  1479. },
  1480. //>>excludeStart("ide", pragmas.excludeIdeData);
  1481. args: ["aDictionary"],
  1482. source: "setVariables: aDictionary\x0a\x09self model variables: aDictionary",
  1483. referencedClasses: [],
  1484. //>>excludeEnd("ide");
  1485. messageSends: ["variables:", "model"]
  1486. }),
  1487. $globals.HLInspectorWidget);
  1488. $core.addMethod(
  1489. $core.method({
  1490. selector: "tabLabel",
  1491. protocol: 'accessing',
  1492. fn: function (){
  1493. var self=this;
  1494. return "Inspector";
  1495. },
  1496. //>>excludeStart("ide", pragmas.excludeIdeData);
  1497. args: [],
  1498. source: "tabLabel\x0a ^ 'Inspector'",
  1499. referencedClasses: [],
  1500. //>>excludeEnd("ide");
  1501. messageSends: []
  1502. }),
  1503. $globals.HLInspectorWidget);
  1504. $core.addMethod(
  1505. $core.method({
  1506. selector: "unregister",
  1507. protocol: 'registration',
  1508. fn: function (){
  1509. var self=this;
  1510. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1511. return $core.withContext(function($ctx1) {
  1512. //>>excludeEnd("ctx");
  1513. (
  1514. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1515. $ctx1.supercall = true,
  1516. //>>excludeEnd("ctx");
  1517. ($globals.HLInspectorWidget.superclass||$boot.dnu).fn.prototype._unregister.apply($recv(self), []));
  1518. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1519. $ctx1.supercall = false;
  1520. //>>excludeEnd("ctx");;
  1521. $recv($globals.HLInspector)._unregister_(self);
  1522. return self;
  1523. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1524. }, function($ctx1) {$ctx1.fill(self,"unregister",{},$globals.HLInspectorWidget)});
  1525. //>>excludeEnd("ctx");
  1526. },
  1527. //>>excludeStart("ide", pragmas.excludeIdeData);
  1528. args: [],
  1529. source: "unregister\x0a\x09super unregister.\x0a\x09HLInspector unregister: self",
  1530. referencedClasses: ["HLInspector"],
  1531. //>>excludeEnd("ide");
  1532. messageSends: ["unregister", "unregister:"]
  1533. }),
  1534. $globals.HLInspectorWidget);
  1535. $core.addMethod(
  1536. $core.method({
  1537. selector: "variablesWidget",
  1538. protocol: 'accessing',
  1539. fn: function (){
  1540. var self=this;
  1541. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1542. return $core.withContext(function($ctx1) {
  1543. //>>excludeEnd("ctx");
  1544. var $1,$2,$receiver;
  1545. $1=self["@variablesWidget"];
  1546. if(($receiver = $1) == null || $receiver.isNil){
  1547. $2=$recv($globals.HLInspectorVariablesWidget)._new();
  1548. $recv($2)._inspector_(self);
  1549. self["@variablesWidget"]=$recv($2)._yourself();
  1550. return self["@variablesWidget"];
  1551. } else {
  1552. return $1;
  1553. };
  1554. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1555. }, function($ctx1) {$ctx1.fill(self,"variablesWidget",{},$globals.HLInspectorWidget)});
  1556. //>>excludeEnd("ctx");
  1557. },
  1558. //>>excludeStart("ide", pragmas.excludeIdeData);
  1559. args: [],
  1560. source: "variablesWidget\x0a\x09^ variablesWidget ifNil: [\x0a\x09\x09variablesWidget := HLInspectorVariablesWidget new\x0a \x09\x09inspector: self;\x0a \x09yourself ]",
  1561. referencedClasses: ["HLInspectorVariablesWidget"],
  1562. //>>excludeEnd("ide");
  1563. messageSends: ["ifNil:", "inspector:", "new", "yourself"]
  1564. }),
  1565. $globals.HLInspectorWidget);
  1566. $core.addClass('HLInspector', $globals.HLInspectorWidget, [], 'Helios-Inspector');
  1567. $core.addMethod(
  1568. $core.method({
  1569. selector: "inspect:",
  1570. protocol: 'actions',
  1571. fn: function (anObject){
  1572. var self=this;
  1573. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1574. return $core.withContext(function($ctx1) {
  1575. //>>excludeEnd("ctx");
  1576. self._setTabLabel_($recv(anObject)._printString());
  1577. (
  1578. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1579. $ctx1.supercall = true,
  1580. //>>excludeEnd("ctx");
  1581. ($globals.HLInspector.superclass||$boot.dnu).fn.prototype._inspect_.apply($recv(self), [anObject]));
  1582. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1583. $ctx1.supercall = false;
  1584. //>>excludeEnd("ctx");;
  1585. return self;
  1586. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1587. }, function($ctx1) {$ctx1.fill(self,"inspect:",{anObject:anObject},$globals.HLInspector)});
  1588. //>>excludeEnd("ctx");
  1589. },
  1590. //>>excludeStart("ide", pragmas.excludeIdeData);
  1591. args: ["anObject"],
  1592. source: "inspect: anObject\x0a\x09self setTabLabel: anObject printString.\x0a\x09super inspect: anObject",
  1593. referencedClasses: [],
  1594. //>>excludeEnd("ide");
  1595. messageSends: ["setTabLabel:", "printString", "inspect:"]
  1596. }),
  1597. $globals.HLInspector);
  1598. $core.addMethod(
  1599. $core.method({
  1600. selector: "renderContentOn:",
  1601. protocol: 'rendering',
  1602. fn: function (html){
  1603. var self=this;
  1604. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1605. return $core.withContext(function($ctx1) {
  1606. //>>excludeEnd("ctx");
  1607. var $4,$3,$2,$1;
  1608. $4=self._variablesWidget();
  1609. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1610. $ctx1.sendIdx["variablesWidget"]=1;
  1611. //>>excludeEnd("ctx");
  1612. $3=$recv($globals.HLVerticalSplitter)._with_with_($4,self._displayWidget());
  1613. $2=$recv($globals.HLHorizontalSplitter)._with_with_($3,self._codeWidget());
  1614. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1615. $ctx1.sendIdx["with:with:"]=1;
  1616. //>>excludeEnd("ctx");
  1617. $1=$recv($globals.HLContainer)._with_($2);
  1618. $recv(html)._with_($1);
  1619. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1620. $ctx1.sendIdx["with:"]=1;
  1621. //>>excludeEnd("ctx");
  1622. $recv(self._variablesWidget())._focus();
  1623. return self;
  1624. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1625. }, function($ctx1) {$ctx1.fill(self,"renderContentOn:",{html:html},$globals.HLInspector)});
  1626. //>>excludeEnd("ctx");
  1627. },
  1628. //>>excludeStart("ide", pragmas.excludeIdeData);
  1629. args: ["html"],
  1630. source: "renderContentOn: html\x0a \x09html with: (HLContainer with: (HLHorizontalSplitter\x0a \x09with: (HLVerticalSplitter \x0a with: self variablesWidget\x0a with: self displayWidget)\x0a with: self codeWidget)).\x0a\x09\x0a\x09self variablesWidget focus",
  1631. referencedClasses: ["HLContainer", "HLHorizontalSplitter", "HLVerticalSplitter"],
  1632. //>>excludeEnd("ide");
  1633. messageSends: ["with:", "with:with:", "variablesWidget", "displayWidget", "codeWidget", "focus"]
  1634. }),
  1635. $globals.HLInspector);
  1636. $globals.HLInspector.klass.iVarNames = ['inspectors'];
  1637. $core.addMethod(
  1638. $core.method({
  1639. selector: "canBeOpenAsTab",
  1640. protocol: 'testing',
  1641. fn: function (){
  1642. var self=this;
  1643. return false;
  1644. },
  1645. //>>excludeStart("ide", pragmas.excludeIdeData);
  1646. args: [],
  1647. source: "canBeOpenAsTab\x0a\x09^ false",
  1648. referencedClasses: [],
  1649. //>>excludeEnd("ide");
  1650. messageSends: []
  1651. }),
  1652. $globals.HLInspector.klass);
  1653. $core.addMethod(
  1654. $core.method({
  1655. selector: "initialize",
  1656. protocol: 'initialization',
  1657. fn: function (){
  1658. var self=this;
  1659. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1660. return $core.withContext(function($ctx1) {
  1661. //>>excludeEnd("ctx");
  1662. (
  1663. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1664. $ctx1.supercall = true,
  1665. //>>excludeEnd("ctx");
  1666. ($globals.HLInspector.klass.superclass||$boot.dnu).fn.prototype._initialize.apply($recv(self), []));
  1667. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1668. $ctx1.supercall = false;
  1669. //>>excludeEnd("ctx");;
  1670. self._watchChanges();
  1671. return self;
  1672. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1673. }, function($ctx1) {$ctx1.fill(self,"initialize",{},$globals.HLInspector.klass)});
  1674. //>>excludeEnd("ctx");
  1675. },
  1676. //>>excludeStart("ide", pragmas.excludeIdeData);
  1677. args: [],
  1678. source: "initialize\x0a\x09super initialize.\x0a\x09self watchChanges",
  1679. referencedClasses: [],
  1680. //>>excludeEnd("ide");
  1681. messageSends: ["initialize", "watchChanges"]
  1682. }),
  1683. $globals.HLInspector.klass);
  1684. $core.addMethod(
  1685. $core.method({
  1686. selector: "inspect:",
  1687. protocol: 'actions',
  1688. fn: function (anObject){
  1689. var self=this;
  1690. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1691. return $core.withContext(function($ctx1) {
  1692. //>>excludeEnd("ctx");
  1693. var $1;
  1694. $1=self._new();
  1695. $recv($1)._openAsTab();
  1696. $recv($1)._inspect_(anObject);
  1697. return self;
  1698. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1699. }, function($ctx1) {$ctx1.fill(self,"inspect:",{anObject:anObject},$globals.HLInspector.klass)});
  1700. //>>excludeEnd("ctx");
  1701. },
  1702. //>>excludeStart("ide", pragmas.excludeIdeData);
  1703. args: ["anObject"],
  1704. source: "inspect: anObject\x0a\x09self new\x0a\x09\x09openAsTab;\x0a\x09\x09inspect: anObject",
  1705. referencedClasses: [],
  1706. //>>excludeEnd("ide");
  1707. messageSends: ["openAsTab", "new", "inspect:"]
  1708. }),
  1709. $globals.HLInspector.klass);
  1710. $core.addMethod(
  1711. $core.method({
  1712. selector: "inspectors",
  1713. protocol: 'accessing',
  1714. fn: function (){
  1715. var self=this;
  1716. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1717. return $core.withContext(function($ctx1) {
  1718. //>>excludeEnd("ctx");
  1719. var $1,$receiver;
  1720. $1=self["@inspectors"];
  1721. if(($receiver = $1) == null || $receiver.isNil){
  1722. self["@inspectors"]=$recv($globals.OrderedCollection)._new();
  1723. return self["@inspectors"];
  1724. } else {
  1725. return $1;
  1726. };
  1727. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1728. }, function($ctx1) {$ctx1.fill(self,"inspectors",{},$globals.HLInspector.klass)});
  1729. //>>excludeEnd("ctx");
  1730. },
  1731. //>>excludeStart("ide", pragmas.excludeIdeData);
  1732. args: [],
  1733. source: "inspectors\x0a\x09^ inspectors ifNil: [ inspectors := OrderedCollection new ]",
  1734. referencedClasses: ["OrderedCollection"],
  1735. //>>excludeEnd("ide");
  1736. messageSends: ["ifNil:", "new"]
  1737. }),
  1738. $globals.HLInspector.klass);
  1739. $core.addMethod(
  1740. $core.method({
  1741. selector: "register:",
  1742. protocol: 'registration',
  1743. fn: function (anInspector){
  1744. var self=this;
  1745. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1746. return $core.withContext(function($ctx1) {
  1747. //>>excludeEnd("ctx");
  1748. $recv(self._inspectors())._add_(anInspector);
  1749. return self;
  1750. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1751. }, function($ctx1) {$ctx1.fill(self,"register:",{anInspector:anInspector},$globals.HLInspector.klass)});
  1752. //>>excludeEnd("ctx");
  1753. },
  1754. //>>excludeStart("ide", pragmas.excludeIdeData);
  1755. args: ["anInspector"],
  1756. source: "register: anInspector\x0a\x09self inspectors add: anInspector",
  1757. referencedClasses: [],
  1758. //>>excludeEnd("ide");
  1759. messageSends: ["add:", "inspectors"]
  1760. }),
  1761. $globals.HLInspector.klass);
  1762. $core.addMethod(
  1763. $core.method({
  1764. selector: "tabClass",
  1765. protocol: 'accessing',
  1766. fn: function (){
  1767. var self=this;
  1768. return "inspector";
  1769. },
  1770. //>>excludeStart("ide", pragmas.excludeIdeData);
  1771. args: [],
  1772. source: "tabClass\x0a\x09^ 'inspector'",
  1773. referencedClasses: [],
  1774. //>>excludeEnd("ide");
  1775. messageSends: []
  1776. }),
  1777. $globals.HLInspector.klass);
  1778. $core.addMethod(
  1779. $core.method({
  1780. selector: "tabLabel",
  1781. protocol: 'accessing',
  1782. fn: function (){
  1783. var self=this;
  1784. return "Inspector";
  1785. },
  1786. //>>excludeStart("ide", pragmas.excludeIdeData);
  1787. args: [],
  1788. source: "tabLabel\x0a\x09^ 'Inspector'",
  1789. referencedClasses: [],
  1790. //>>excludeEnd("ide");
  1791. messageSends: []
  1792. }),
  1793. $globals.HLInspector.klass);
  1794. $core.addMethod(
  1795. $core.method({
  1796. selector: "tabPriority",
  1797. protocol: 'accessing',
  1798. fn: function (){
  1799. var self=this;
  1800. return (10);
  1801. },
  1802. //>>excludeStart("ide", pragmas.excludeIdeData);
  1803. args: [],
  1804. source: "tabPriority\x0a\x09^ 10",
  1805. referencedClasses: [],
  1806. //>>excludeEnd("ide");
  1807. messageSends: []
  1808. }),
  1809. $globals.HLInspector.klass);
  1810. $core.addMethod(
  1811. $core.method({
  1812. selector: "unregister:",
  1813. protocol: 'registration',
  1814. fn: function (anInspector){
  1815. var self=this;
  1816. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1817. return $core.withContext(function($ctx1) {
  1818. //>>excludeEnd("ctx");
  1819. $recv(self._inspectors())._remove_(anInspector);
  1820. return self;
  1821. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1822. }, function($ctx1) {$ctx1.fill(self,"unregister:",{anInspector:anInspector},$globals.HLInspector.klass)});
  1823. //>>excludeEnd("ctx");
  1824. },
  1825. //>>excludeStart("ide", pragmas.excludeIdeData);
  1826. args: ["anInspector"],
  1827. source: "unregister: anInspector\x0a\x09self inspectors remove: anInspector",
  1828. referencedClasses: [],
  1829. //>>excludeEnd("ide");
  1830. messageSends: ["remove:", "inspectors"]
  1831. }),
  1832. $globals.HLInspector.klass);
  1833. $core.addMethod(
  1834. $core.method({
  1835. selector: "watchChanges",
  1836. protocol: 'initialization',
  1837. fn: function (){
  1838. var self=this;
  1839. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1840. return $core.withContext(function($ctx1) {
  1841. //>>excludeEnd("ctx");
  1842. $recv((function(){
  1843. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1844. return $core.withContext(function($ctx2) {
  1845. //>>excludeEnd("ctx");
  1846. return $recv(self._inspectors())._do_((function(each){
  1847. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1848. return $core.withContext(function($ctx3) {
  1849. //>>excludeEnd("ctx");
  1850. return $recv(each)._refresh();
  1851. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1852. }, function($ctx3) {$ctx3.fillBlock({each:each},$ctx2,2)});
  1853. //>>excludeEnd("ctx");
  1854. }));
  1855. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1856. }, function($ctx2) {$ctx2.fillBlock({},$ctx1,1)});
  1857. //>>excludeEnd("ctx");
  1858. }))._valueWithInterval_((500));
  1859. return self;
  1860. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1861. }, function($ctx1) {$ctx1.fill(self,"watchChanges",{},$globals.HLInspector.klass)});
  1862. //>>excludeEnd("ctx");
  1863. },
  1864. //>>excludeStart("ide", pragmas.excludeIdeData);
  1865. args: [],
  1866. source: "watchChanges\x0a\x09[ self inspectors do: [ :each | each refresh ] ]\x0a\x09\x09valueWithInterval: 500",
  1867. referencedClasses: [],
  1868. //>>excludeEnd("ide");
  1869. messageSends: ["valueWithInterval:", "do:", "inspectors", "refresh"]
  1870. }),
  1871. $globals.HLInspector.klass);
  1872. });