Helios-Inspector.js 60 KB

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