Helios-Inspector.js 60 KB

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