Helios-Inspector.js 59 KB

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