Helios-Inspector.js 62 KB

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