Trapped.js 74 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989990991992993994995996997998999100010011002100310041005100610071008100910101011101210131014101510161017101810191020102110221023102410251026102710281029103010311032103310341035103610371038103910401041104210431044104510461047104810491050105110521053105410551056105710581059106010611062106310641065106610671068106910701071107210731074107510761077107810791080108110821083108410851086108710881089109010911092109310941095109610971098109911001101110211031104110511061107110811091110111111121113111411151116111711181119112011211122112311241125112611271128112911301131113211331134113511361137113811391140114111421143114411451146114711481149115011511152115311541155115611571158115911601161116211631164116511661167116811691170117111721173117411751176117711781179118011811182118311841185118611871188118911901191119211931194119511961197119811991200120112021203120412051206120712081209121012111212121312141215121612171218121912201221122212231224122512261227122812291230123112321233123412351236123712381239124012411242124312441245124612471248124912501251125212531254125512561257125812591260126112621263126412651266126712681269127012711272127312741275127612771278127912801281128212831284128512861287128812891290129112921293129412951296129712981299130013011302130313041305130613071308130913101311131213131314131513161317131813191320132113221323132413251326132713281329133013311332133313341335133613371338133913401341134213431344134513461347134813491350135113521353135413551356135713581359136013611362136313641365136613671368136913701371137213731374137513761377137813791380138113821383138413851386138713881389139013911392139313941395139613971398139914001401140214031404140514061407140814091410141114121413141414151416141714181419142014211422142314241425142614271428142914301431143214331434143514361437143814391440144114421443144414451446144714481449145014511452145314541455145614571458145914601461146214631464146514661467146814691470147114721473147414751476147714781479148014811482148314841485148614871488148914901491149214931494149514961497149814991500150115021503150415051506150715081509151015111512151315141515151615171518151915201521152215231524152515261527152815291530153115321533153415351536153715381539154015411542154315441545154615471548154915501551155215531554155515561557155815591560156115621563156415651566156715681569157015711572157315741575157615771578157915801581158215831584158515861587158815891590159115921593159415951596159715981599160016011602160316041605160616071608160916101611161216131614161516161617161816191620162116221623162416251626162716281629163016311632163316341635163616371638163916401641164216431644164516461647164816491650165116521653165416551656165716581659166016611662166316641665166616671668166916701671167216731674167516761677167816791680168116821683168416851686168716881689169016911692169316941695169616971698169917001701170217031704170517061707170817091710171117121713171417151716171717181719172017211722172317241725172617271728172917301731173217331734173517361737173817391740174117421743174417451746174717481749175017511752175317541755175617571758175917601761176217631764176517661767176817691770177117721773177417751776177717781779178017811782178317841785178617871788178917901791179217931794179517961797179817991800180118021803180418051806180718081809181018111812181318141815181618171818181918201821182218231824182518261827182818291830183118321833183418351836183718381839184018411842184318441845184618471848184918501851185218531854185518561857185818591860186118621863186418651866186718681869187018711872187318741875187618771878187918801881188218831884188518861887188818891890189118921893189418951896189718981899190019011902190319041905190619071908190919101911191219131914191519161917191819191920192119221923192419251926192719281929193019311932193319341935193619371938193919401941194219431944194519461947194819491950195119521953195419551956195719581959196019611962196319641965196619671968196919701971197219731974197519761977197819791980198119821983198419851986198719881989199019911992199319941995199619971998199920002001200220032004200520062007200820092010201120122013201420152016201720182019202020212022202320242025202620272028202920302031203220332034203520362037203820392040204120422043204420452046204720482049205020512052205320542055205620572058205920602061206220632064206520662067206820692070207120722073207420752076207720782079208020812082208320842085208620872088208920902091209220932094209520962097209820992100210121022103210421052106210721082109211021112112211321142115211621172118211921202121212221232124212521262127212821292130213121322133213421352136213721382139214021412142214321442145214621472148
  1. define(["amber/boot"
  2. //>>excludeStart("imports", pragmas.excludeImports);
  3. , "amber/web/Web", "axxord/Axxord"
  4. //>>excludeEnd("imports");
  5. , "amber/web/Web", "amber_core/Kernel-Collections", "amber_core/Kernel-Objects"], function($boot
  6. //>>excludeStart("imports", pragmas.excludeImports);
  7. //>>excludeEnd("imports");
  8. ){"use strict";
  9. if(!$boot.nilAsReceiver)$boot.nilAsReceiver=$boot.nil;
  10. if(!("nilAsValue" in $boot))$boot.nilAsValue=$boot.nilAsReceiver;
  11. var $core=$boot.api,nil=$boot.nilAsValue,$nil=$boot.nilAsReceiver,$recv=$boot.asReceiver,$globals=$boot.globals;
  12. if(!$boot.nilAsClass)$boot.nilAsClass=$boot.dnu;
  13. $core.addPackage("Trapped");
  14. $core.packages["Trapped"].innerEval = function (expr) { return eval(expr); };
  15. $core.packages["Trapped"].imports = ["amber/web/Web", "axxord/Axxord"];
  16. $core.packages["Trapped"].transport = {"type":"amd","amdNamespace":"trapped"};
  17. $core.addClass("TrappedDataCarrier", $globals.Object, ["target", "model", "chain"], "Trapped");
  18. $core.addMethod(
  19. $core.method({
  20. selector: "chain:",
  21. protocol: "accessing",
  22. fn: function (aProcessingChain){
  23. var self=this,$self=this;
  24. $self["@chain"]=aProcessingChain;
  25. return self;
  26. },
  27. //>>excludeStart("ide", pragmas.excludeIdeData);
  28. args: ["aProcessingChain"],
  29. source: "chain: aProcessingChain\x0a\x09chain := aProcessingChain",
  30. referencedClasses: [],
  31. //>>excludeEnd("ide");
  32. messageSends: []
  33. }),
  34. $globals.TrappedDataCarrier);
  35. $core.addMethod(
  36. $core.method({
  37. selector: "falseAsNilValue",
  38. protocol: "converting",
  39. fn: function (){
  40. var self=this,$self=this;
  41. var value;
  42. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  43. return $core.withContext(function($ctx1) {
  44. //>>excludeEnd("ctx");
  45. var $1;
  46. value=$self._value();
  47. $1=$recv(value).__eq(false);
  48. if($core.assert($1)){
  49. return nil;
  50. } else {
  51. return value;
  52. }
  53. return self;
  54. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  55. }, function($ctx1) {$ctx1.fill(self,"falseAsNilValue",{value:value},$globals.TrappedDataCarrier)});
  56. //>>excludeEnd("ctx");
  57. },
  58. //>>excludeStart("ide", pragmas.excludeIdeData);
  59. args: [],
  60. source: "falseAsNilValue\x0a\x09| value |\x0a\x09value := self value.\x0a\x09value = false ifTrue: [ ^nil ] ifFalse: [ ^value ]",
  61. referencedClasses: [],
  62. //>>excludeEnd("ide");
  63. messageSends: ["value", "ifTrue:ifFalse:", "="]
  64. }),
  65. $globals.TrappedDataCarrier);
  66. $core.addMethod(
  67. $core.method({
  68. selector: "initialize",
  69. protocol: "initialization",
  70. fn: function (){
  71. var self=this,$self=this;
  72. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  73. return $core.withContext(function($ctx1) {
  74. //>>excludeEnd("ctx");
  75. (
  76. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  77. $ctx1.supercall = true,
  78. //>>excludeEnd("ctx");
  79. ($globals.TrappedDataCarrier.superclass||$boot.nilAsClass).fn.prototype._initialize.apply($self, []));
  80. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  81. $ctx1.supercall = false;
  82. //>>excludeEnd("ctx");;
  83. $self["@model"]=true;
  84. return self;
  85. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  86. }, function($ctx1) {$ctx1.fill(self,"initialize",{},$globals.TrappedDataCarrier)});
  87. //>>excludeEnd("ctx");
  88. },
  89. //>>excludeStart("ide", pragmas.excludeIdeData);
  90. args: [],
  91. source: "initialize\x0a\x09super initialize.\x0a\x09model := true",
  92. referencedClasses: [],
  93. //>>excludeEnd("ide");
  94. messageSends: ["initialize"]
  95. }),
  96. $globals.TrappedDataCarrier);
  97. $core.addMethod(
  98. $core.method({
  99. selector: "target",
  100. protocol: "accessing",
  101. fn: function (){
  102. var self=this,$self=this;
  103. return $self["@target"];
  104. },
  105. //>>excludeStart("ide", pragmas.excludeIdeData);
  106. args: [],
  107. source: "target\x0a\x09^target",
  108. referencedClasses: [],
  109. //>>excludeEnd("ide");
  110. messageSends: []
  111. }),
  112. $globals.TrappedDataCarrier);
  113. $core.addMethod(
  114. $core.method({
  115. selector: "target:",
  116. protocol: "accessing",
  117. fn: function (anObject){
  118. var self=this,$self=this;
  119. $self["@target"]=anObject;
  120. return self;
  121. },
  122. //>>excludeStart("ide", pragmas.excludeIdeData);
  123. args: ["anObject"],
  124. source: "target: anObject\x0a\x09target := anObject",
  125. referencedClasses: [],
  126. //>>excludeEnd("ide");
  127. messageSends: []
  128. }),
  129. $globals.TrappedDataCarrier);
  130. $core.addMethod(
  131. $core.method({
  132. selector: "value",
  133. protocol: "accessing",
  134. fn: function (){
  135. var self=this,$self=this;
  136. return $self["@model"];
  137. },
  138. //>>excludeStart("ide", pragmas.excludeIdeData);
  139. args: [],
  140. source: "value\x0a\x09^model",
  141. referencedClasses: [],
  142. //>>excludeEnd("ide");
  143. messageSends: []
  144. }),
  145. $globals.TrappedDataCarrier);
  146. $core.addMethod(
  147. $core.method({
  148. selector: "value:",
  149. protocol: "accessing",
  150. fn: function (anObject){
  151. var self=this,$self=this;
  152. $self["@model"]=anObject;
  153. return self;
  154. },
  155. //>>excludeStart("ide", pragmas.excludeIdeData);
  156. args: ["anObject"],
  157. source: "value: anObject\x0a\x09model := anObject",
  158. referencedClasses: [],
  159. //>>excludeEnd("ide");
  160. messageSends: []
  161. }),
  162. $globals.TrappedDataCarrier);
  163. $core.addMethod(
  164. $core.method({
  165. selector: "value:whenDifferentFrom:",
  166. protocol: "accessing",
  167. fn: function (anObject,anotherObject){
  168. var self=this,$self=this;
  169. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  170. return $core.withContext(function($ctx1) {
  171. //>>excludeEnd("ctx");
  172. var $1;
  173. $1=$recv(anObject).__eq(anotherObject);
  174. if(!$core.assert($1)){
  175. $self._value_(anObject);
  176. }
  177. return self;
  178. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  179. }, function($ctx1) {$ctx1.fill(self,"value:whenDifferentFrom:",{anObject:anObject,anotherObject:anotherObject},$globals.TrappedDataCarrier)});
  180. //>>excludeEnd("ctx");
  181. },
  182. //>>excludeStart("ide", pragmas.excludeIdeData);
  183. args: ["anObject", "anotherObject"],
  184. source: "value: anObject whenDifferentFrom: anotherObject\x0a\x09anObject = anotherObject ifFalse: [ self value: anObject ]",
  185. referencedClasses: [],
  186. //>>excludeEnd("ide");
  187. messageSends: ["ifFalse:", "=", "value:"]
  188. }),
  189. $globals.TrappedDataCarrier);
  190. $core.addMethod(
  191. $core.method({
  192. selector: "on:target:",
  193. protocol: "not yet classified",
  194. fn: function (aProcessingChain,anObject){
  195. var self=this,$self=this;
  196. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  197. return $core.withContext(function($ctx1) {
  198. //>>excludeEnd("ctx");
  199. var $1;
  200. $1=$self._new();
  201. $recv($1)._chain_(aProcessingChain);
  202. $recv($1)._target_(anObject);
  203. return $recv($1)._yourself();
  204. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  205. }, function($ctx1) {$ctx1.fill(self,"on:target:",{aProcessingChain:aProcessingChain,anObject:anObject},$globals.TrappedDataCarrier.a$cls)});
  206. //>>excludeEnd("ctx");
  207. },
  208. //>>excludeStart("ide", pragmas.excludeIdeData);
  209. args: ["aProcessingChain", "anObject"],
  210. source: "on: aProcessingChain target: anObject\x0a\x09^self new\x0a\x09\x09chain: aProcessingChain;\x0a\x09\x09target: anObject;\x0a\x09\x09yourself",
  211. referencedClasses: [],
  212. //>>excludeEnd("ide");
  213. messageSends: ["chain:", "new", "target:", "yourself"]
  214. }),
  215. $globals.TrappedDataCarrier.a$cls);
  216. $core.addClass("TrappedDataCarrierToModel", $globals.TrappedDataCarrier, ["index"], "Trapped");
  217. $core.addMethod(
  218. $core.method({
  219. selector: "proceed",
  220. protocol: "not yet classified",
  221. fn: function (){
  222. var self=this,$self=this;
  223. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  224. return $core.withContext(function($ctx1) {
  225. //>>excludeEnd("ctx");
  226. var $1,$receiver;
  227. $1=$self["@index"];
  228. if(($receiver = $1) == null || $receiver.a$nil){
  229. $self["@index"]=$recv($self["@chain"])._lastProcessorNo();
  230. } else {
  231. $self["@index"]=$recv($self["@index"]).__minus((1));
  232. }
  233. $recv($recv($self["@chain"])._processorNo_($self["@index"]))._toModel_(self);
  234. return self;
  235. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  236. }, function($ctx1) {$ctx1.fill(self,"proceed",{},$globals.TrappedDataCarrierToModel)});
  237. //>>excludeEnd("ctx");
  238. },
  239. //>>excludeStart("ide", pragmas.excludeIdeData);
  240. args: [],
  241. source: "proceed\x0a\x09index := index ifNil: [ chain lastProcessorNo ] ifNotNil: [ index - 1 ].\x0a\x09(chain processorNo: index) toModel: self",
  242. referencedClasses: [],
  243. //>>excludeEnd("ide");
  244. messageSends: ["ifNil:ifNotNil:", "lastProcessorNo", "-", "toModel:", "processorNo:"]
  245. }),
  246. $globals.TrappedDataCarrierToModel);
  247. $core.addClass("TrappedDataCarrierToView", $globals.TrappedDataCarrier, ["index"], "Trapped");
  248. $core.addMethod(
  249. $core.method({
  250. selector: "proceed",
  251. protocol: "not yet classified",
  252. fn: function (){
  253. var self=this,$self=this;
  254. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  255. return $core.withContext(function($ctx1) {
  256. //>>excludeEnd("ctx");
  257. var $1,$receiver;
  258. $1=$self["@index"];
  259. if(($receiver = $1) == null || $receiver.a$nil){
  260. $self["@index"]=$recv($self["@chain"])._firstProcessorNo();
  261. } else {
  262. $self["@index"]=$recv($self["@index"]).__plus((1));
  263. }
  264. $recv($recv($self["@chain"])._processorNo_($self["@index"]))._toView_(self);
  265. return self;
  266. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  267. }, function($ctx1) {$ctx1.fill(self,"proceed",{},$globals.TrappedDataCarrierToView)});
  268. //>>excludeEnd("ctx");
  269. },
  270. //>>excludeStart("ide", pragmas.excludeIdeData);
  271. args: [],
  272. source: "proceed\x0a\x09index := index ifNil: [ chain firstProcessorNo ] ifNotNil: [ index + 1 ].\x0a\x09(chain processorNo: index) toView: self",
  273. referencedClasses: [],
  274. //>>excludeEnd("ide");
  275. messageSends: ["ifNil:ifNotNil:", "firstProcessorNo", "+", "toView:", "processorNo:"]
  276. }),
  277. $globals.TrappedDataCarrierToView);
  278. $core.addClass("TrappedPosition", $globals.Object, ["path", "model"], "Trapped");
  279. $core.addMethod(
  280. $core.method({
  281. selector: "model",
  282. protocol: "accessing",
  283. fn: function (){
  284. var self=this,$self=this;
  285. return $self["@model"];
  286. },
  287. //>>excludeStart("ide", pragmas.excludeIdeData);
  288. args: [],
  289. source: "model\x0a\x09^model",
  290. referencedClasses: [],
  291. //>>excludeEnd("ide");
  292. messageSends: []
  293. }),
  294. $globals.TrappedPosition);
  295. $core.addMethod(
  296. $core.method({
  297. selector: "modify:",
  298. protocol: "action",
  299. fn: function (aBlock){
  300. var self=this,$self=this;
  301. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  302. return $core.withContext(function($ctx1) {
  303. //>>excludeEnd("ctx");
  304. $recv($self._model())._axes_transform_($self._path(),aBlock);
  305. return self;
  306. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  307. }, function($ctx1) {$ctx1.fill(self,"modify:",{aBlock:aBlock},$globals.TrappedPosition)});
  308. //>>excludeEnd("ctx");
  309. },
  310. //>>excludeStart("ide", pragmas.excludeIdeData);
  311. args: ["aBlock"],
  312. source: "modify: aBlock\x0a\x09self model axes: self path transform: aBlock",
  313. referencedClasses: [],
  314. //>>excludeEnd("ide");
  315. messageSends: ["axes:transform:", "model", "path"]
  316. }),
  317. $globals.TrappedPosition);
  318. $core.addMethod(
  319. $core.method({
  320. selector: "path",
  321. protocol: "accessing",
  322. fn: function (){
  323. var self=this,$self=this;
  324. return $self["@path"];
  325. },
  326. //>>excludeStart("ide", pragmas.excludeIdeData);
  327. args: [],
  328. source: "path\x0a\x09^path",
  329. referencedClasses: [],
  330. //>>excludeEnd("ide");
  331. messageSends: []
  332. }),
  333. $globals.TrappedPosition);
  334. $core.addMethod(
  335. $core.method({
  336. selector: "path:model:",
  337. protocol: "accessing",
  338. fn: function (anArray,aTrappedMW){
  339. var self=this,$self=this;
  340. $self["@path"]=anArray;
  341. $self["@model"]=aTrappedMW;
  342. return self;
  343. },
  344. //>>excludeStart("ide", pragmas.excludeIdeData);
  345. args: ["anArray", "aTrappedMW"],
  346. source: "path: anArray model: aTrappedMW\x0a\x09path := anArray.\x0a model := aTrappedMW",
  347. referencedClasses: [],
  348. //>>excludeEnd("ide");
  349. messageSends: []
  350. }),
  351. $globals.TrappedPosition);
  352. $core.addMethod(
  353. $core.method({
  354. selector: "read:",
  355. protocol: "action",
  356. fn: function (aBlock){
  357. var self=this,$self=this;
  358. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  359. return $core.withContext(function($ctx1) {
  360. //>>excludeEnd("ctx");
  361. $recv($self._model())._axes_consume_($self._path(),aBlock);
  362. return self;
  363. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  364. }, function($ctx1) {$ctx1.fill(self,"read:",{aBlock:aBlock},$globals.TrappedPosition)});
  365. //>>excludeEnd("ctx");
  366. },
  367. //>>excludeStart("ide", pragmas.excludeIdeData);
  368. args: ["aBlock"],
  369. source: "read: aBlock\x0a\x09self model axes: self path consume: aBlock",
  370. referencedClasses: [],
  371. //>>excludeEnd("ide");
  372. messageSends: ["axes:consume:", "model", "path"]
  373. }),
  374. $globals.TrappedPosition);
  375. $core.addMethod(
  376. $core.method({
  377. selector: "watch:",
  378. protocol: "action",
  379. fn: function (aBlock){
  380. var self=this,$self=this;
  381. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  382. return $core.withContext(function($ctx1) {
  383. //>>excludeEnd("ctx");
  384. $recv($recv($self._model())._axxord())._addInterest_($recv($self._class())._interestOn_block_($self._path(),(function(){
  385. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  386. return $core.withContext(function($ctx2) {
  387. //>>excludeEnd("ctx");
  388. return $self._read_(aBlock);
  389. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  390. }, function($ctx2) {$ctx2.fillBlock({},$ctx1,1)});
  391. //>>excludeEnd("ctx");
  392. })));
  393. return self;
  394. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  395. }, function($ctx1) {$ctx1.fill(self,"watch:",{aBlock:aBlock},$globals.TrappedPosition)});
  396. //>>excludeEnd("ctx");
  397. },
  398. //>>excludeStart("ide", pragmas.excludeIdeData);
  399. args: ["aBlock"],
  400. source: "watch: aBlock\x0a\x09self model axxord addInterest: (self class\x0a\x09\x09interestOn: self path\x0a\x09\x09block: [ self read: aBlock ])",
  401. referencedClasses: [],
  402. //>>excludeEnd("ide");
  403. messageSends: ["addInterest:", "axxord", "model", "interestOn:block:", "class", "path", "read:"]
  404. }),
  405. $globals.TrappedPosition);
  406. $core.addMethod(
  407. $core.method({
  408. selector: "interestOn:block:",
  409. protocol: "factory",
  410. fn: function (anAspect,aBlock){
  411. var self=this,$self=this;
  412. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  413. return $core.withContext(function($ctx1) {
  414. //>>excludeEnd("ctx");
  415. var $1;
  416. $1=$recv($recv(anAspect)._notEmpty())._and_((function(){
  417. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  418. return $core.withContext(function($ctx2) {
  419. //>>excludeEnd("ctx");
  420. return $recv($recv(anAspect)._last())._isNil();
  421. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  422. }, function($ctx2) {$ctx2.fillBlock({},$ctx1,1)});
  423. //>>excludeEnd("ctx");
  424. }));
  425. if($core.assert($1)){
  426. return $recv($globals.Axes)._newInterestThru_doing_($recv(anAspect)._allButLast(),aBlock);
  427. } else {
  428. return $recv($globals.Axes)._newInterestUpTo_doing_(anAspect,aBlock);
  429. }
  430. return self;
  431. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  432. }, function($ctx1) {$ctx1.fill(self,"interestOn:block:",{anAspect:anAspect,aBlock:aBlock},$globals.TrappedPosition.a$cls)});
  433. //>>excludeEnd("ctx");
  434. },
  435. //>>excludeStart("ide", pragmas.excludeIdeData);
  436. args: ["anAspect", "aBlock"],
  437. source: "interestOn: anAspect block: aBlock\x0a\x09(anAspect notEmpty and: [ anAspect last isNil ])\x0a\x09\x09ifTrue: [ ^ Axes newInterestThru: anAspect allButLast doing: aBlock ]\x0a\x09\x09ifFalse: [ ^ Axes newInterestUpTo: anAspect doing: aBlock ]",
  438. referencedClasses: ["Axes"],
  439. //>>excludeEnd("ide");
  440. messageSends: ["ifTrue:ifFalse:", "and:", "notEmpty", "isNil", "last", "newInterestThru:doing:", "allButLast", "newInterestUpTo:doing:"]
  441. }),
  442. $globals.TrappedPosition.a$cls);
  443. $core.addClass("TrappedSnapshot", $globals.TrappedPosition, ["prefix"], "Trapped");
  444. $core.addMethod(
  445. $core.method({
  446. selector: "do:",
  447. protocol: "action",
  448. fn: function (aBlock){
  449. var self=this,$self=this;
  450. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  451. return $core.withContext(function($ctx1) {
  452. //>>excludeEnd("ctx");
  453. $recv($recv($globals.TrappedPathStack)._current())._with_do_($recv([$self["@prefix"]]).__comma($self["@path"]),(function(){
  454. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  455. return $core.withContext(function($ctx2) {
  456. //>>excludeEnd("ctx");
  457. return $recv(aBlock)._value_($self["@model"]);
  458. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  459. }, function($ctx2) {$ctx2.fillBlock({},$ctx1,1)});
  460. //>>excludeEnd("ctx");
  461. }));
  462. return self;
  463. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  464. }, function($ctx1) {$ctx1.fill(self,"do:",{aBlock:aBlock},$globals.TrappedSnapshot)});
  465. //>>excludeEnd("ctx");
  466. },
  467. //>>excludeStart("ide", pragmas.excludeIdeData);
  468. args: ["aBlock"],
  469. source: "do: aBlock\x0a\x09TrappedPathStack current with: {prefix}, path do: [ aBlock value: model ]",
  470. referencedClasses: ["TrappedPathStack"],
  471. //>>excludeEnd("ide");
  472. messageSends: ["with:do:", "current", ",", "value:"]
  473. }),
  474. $globals.TrappedSnapshot);
  475. $core.addMethod(
  476. $core.method({
  477. selector: "prefix",
  478. protocol: "accessing",
  479. fn: function (){
  480. var self=this,$self=this;
  481. return $self["@prefix"];
  482. },
  483. //>>excludeStart("ide", pragmas.excludeIdeData);
  484. args: [],
  485. source: "prefix\x0a\x09^ prefix",
  486. referencedClasses: [],
  487. //>>excludeEnd("ide");
  488. messageSends: []
  489. }),
  490. $globals.TrappedSnapshot);
  491. $core.addMethod(
  492. $core.method({
  493. selector: "prefix:",
  494. protocol: "accessing",
  495. fn: function (anObject){
  496. var self=this,$self=this;
  497. $self["@prefix"]=anObject;
  498. return self;
  499. },
  500. //>>excludeStart("ide", pragmas.excludeIdeData);
  501. args: ["anObject"],
  502. source: "prefix: anObject\x0a\x09prefix := anObject",
  503. referencedClasses: [],
  504. //>>excludeEnd("ide");
  505. messageSends: []
  506. }),
  507. $globals.TrappedSnapshot);
  508. $core.addClass("TrappedProcessingChain", $globals.Object, ["processors"], "Trapped");
  509. $core.addMethod(
  510. $core.method({
  511. selector: "firstProcessorNo",
  512. protocol: "accessing",
  513. fn: function (){
  514. var self=this,$self=this;
  515. return (1);
  516. },
  517. //>>excludeStart("ide", pragmas.excludeIdeData);
  518. args: [],
  519. source: "firstProcessorNo\x0a\x09^1",
  520. referencedClasses: [],
  521. //>>excludeEnd("ide");
  522. messageSends: []
  523. }),
  524. $globals.TrappedProcessingChain);
  525. $core.addMethod(
  526. $core.method({
  527. selector: "forSnapshot:andBrush:",
  528. protocol: "action",
  529. fn: function (aSnapshot,aTagBrush){
  530. var self=this,$self=this;
  531. var toViewCarrier,toModelCarrier;
  532. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  533. return $core.withContext(function($ctx1) {
  534. //>>excludeEnd("ctx");
  535. var $1;
  536. toViewCarrier=$recv($globals.TrappedDataCarrierToView)._on_target_(self,aTagBrush);
  537. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  538. $ctx1.sendIdx["on:target:"]=1;
  539. //>>excludeEnd("ctx");
  540. toModelCarrier=$recv($globals.TrappedDataCarrierToModel)._on_target_(self,aSnapshot);
  541. $recv($self["@processors"])._do_((function(each){
  542. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  543. return $core.withContext(function($ctx2) {
  544. //>>excludeEnd("ctx");
  545. return $recv(each)._installToView_toModel_(toViewCarrier,toModelCarrier);
  546. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  547. }, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1,1)});
  548. //>>excludeEnd("ctx");
  549. }));
  550. $1=$recv($recv(toViewCarrier)._value()).__eq(true);
  551. if($core.assert($1)){
  552. $recv($recv(toViewCarrier)._copy())._proceed();
  553. }
  554. return self;
  555. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  556. }, function($ctx1) {$ctx1.fill(self,"forSnapshot:andBrush:",{aSnapshot:aSnapshot,aTagBrush:aTagBrush,toViewCarrier:toViewCarrier,toModelCarrier:toModelCarrier},$globals.TrappedProcessingChain)});
  557. //>>excludeEnd("ctx");
  558. },
  559. //>>excludeStart("ide", pragmas.excludeIdeData);
  560. args: ["aSnapshot", "aTagBrush"],
  561. source: "forSnapshot: aSnapshot andBrush: aTagBrush\x0a\x09| toViewCarrier toModelCarrier |\x0a\x09toViewCarrier := TrappedDataCarrierToView on: self target: aTagBrush.\x0a\x09toModelCarrier := TrappedDataCarrierToModel on: self target: aSnapshot.\x0a\x09processors do: [ :each | each installToView: toViewCarrier toModel: toModelCarrier ].\x0a\x09toViewCarrier value = true ifTrue: [ toViewCarrier copy proceed ]",
  562. referencedClasses: ["TrappedDataCarrierToView", "TrappedDataCarrierToModel"],
  563. //>>excludeEnd("ide");
  564. messageSends: ["on:target:", "do:", "installToView:toModel:", "ifTrue:", "=", "value", "proceed", "copy"]
  565. }),
  566. $globals.TrappedProcessingChain);
  567. $core.addMethod(
  568. $core.method({
  569. selector: "lastProcessorNo",
  570. protocol: "accessing",
  571. fn: function (){
  572. var self=this,$self=this;
  573. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  574. return $core.withContext(function($ctx1) {
  575. //>>excludeEnd("ctx");
  576. return $recv($self["@processors"])._size();
  577. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  578. }, function($ctx1) {$ctx1.fill(self,"lastProcessorNo",{},$globals.TrappedProcessingChain)});
  579. //>>excludeEnd("ctx");
  580. },
  581. //>>excludeStart("ide", pragmas.excludeIdeData);
  582. args: [],
  583. source: "lastProcessorNo\x0a\x09^processors size",
  584. referencedClasses: [],
  585. //>>excludeEnd("ide");
  586. messageSends: ["size"]
  587. }),
  588. $globals.TrappedProcessingChain);
  589. $core.addMethod(
  590. $core.method({
  591. selector: "processorNo:",
  592. protocol: "accessing",
  593. fn: function (aNumber){
  594. var self=this,$self=this;
  595. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  596. return $core.withContext(function($ctx1) {
  597. //>>excludeEnd("ctx");
  598. return $recv($self["@processors"])._at_(aNumber);
  599. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  600. }, function($ctx1) {$ctx1.fill(self,"processorNo:",{aNumber:aNumber},$globals.TrappedProcessingChain)});
  601. //>>excludeEnd("ctx");
  602. },
  603. //>>excludeStart("ide", pragmas.excludeIdeData);
  604. args: ["aNumber"],
  605. source: "processorNo: aNumber\x0a\x09^processors at: aNumber",
  606. referencedClasses: [],
  607. //>>excludeEnd("ide");
  608. messageSends: ["at:"]
  609. }),
  610. $globals.TrappedProcessingChain);
  611. $core.addMethod(
  612. $core.method({
  613. selector: "processors:",
  614. protocol: "accessing",
  615. fn: function (anArray){
  616. var self=this,$self=this;
  617. $self["@processors"]=anArray;
  618. return self;
  619. },
  620. //>>excludeStart("ide", pragmas.excludeIdeData);
  621. args: ["anArray"],
  622. source: "processors: anArray\x0a\x09processors := anArray",
  623. referencedClasses: [],
  624. //>>excludeEnd("ide");
  625. messageSends: []
  626. }),
  627. $globals.TrappedProcessingChain);
  628. $core.addMethod(
  629. $core.method({
  630. selector: "blackboardReaderWriter",
  631. protocol: "private",
  632. fn: function (){
  633. var self=this,$self=this;
  634. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  635. return $core.withContext(function($ctx1) {
  636. //>>excludeEnd("ctx");
  637. return $recv($globals.TrappedProcessorBlackboard)._new();
  638. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  639. }, function($ctx1) {$ctx1.fill(self,"blackboardReaderWriter",{},$globals.TrappedProcessingChain.a$cls)});
  640. //>>excludeEnd("ctx");
  641. },
  642. //>>excludeStart("ide", pragmas.excludeIdeData);
  643. args: [],
  644. source: "blackboardReaderWriter\x0a\x09^TrappedProcessorBlackboard new",
  645. referencedClasses: ["TrappedProcessorBlackboard"],
  646. //>>excludeEnd("ide");
  647. messageSends: ["new"]
  648. }),
  649. $globals.TrappedProcessingChain.a$cls);
  650. $core.addMethod(
  651. $core.method({
  652. selector: "dataTerminator",
  653. protocol: "private",
  654. fn: function (){
  655. var self=this,$self=this;
  656. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  657. return $core.withContext(function($ctx1) {
  658. //>>excludeEnd("ctx");
  659. return $recv($globals.TrappedProcessorTerminator)._new();
  660. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  661. }, function($ctx1) {$ctx1.fill(self,"dataTerminator",{},$globals.TrappedProcessingChain.a$cls)});
  662. //>>excludeEnd("ctx");
  663. },
  664. //>>excludeStart("ide", pragmas.excludeIdeData);
  665. args: [],
  666. source: "dataTerminator\x0a\x09^TrappedProcessorTerminator new",
  667. referencedClasses: ["TrappedProcessorTerminator"],
  668. //>>excludeEnd("ide");
  669. messageSends: ["new"]
  670. }),
  671. $globals.TrappedProcessingChain.a$cls);
  672. $core.addMethod(
  673. $core.method({
  674. selector: "new:",
  675. protocol: "instance creation",
  676. fn: function (anArray){
  677. var self=this,$self=this;
  678. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  679. return $core.withContext(function($ctx1) {
  680. //>>excludeEnd("ctx");
  681. var $1,$2;
  682. $1=$recv(anArray)._anySatisfy_((function(each){
  683. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  684. return $core.withContext(function($ctx2) {
  685. //>>excludeEnd("ctx");
  686. return $recv(each)._isExpectingModelData();
  687. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  688. }, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1,1)});
  689. //>>excludeEnd("ctx");
  690. }));
  691. if($core.assert($1)){
  692. $recv(anArray)._addFirst_($self._blackboardReaderWriter());
  693. } else {
  694. $recv(anArray)._add_($self._dataTerminator());
  695. }
  696. $2=$self._new();
  697. $recv($2)._processors_(anArray);
  698. return $recv($2)._yourself();
  699. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  700. }, function($ctx1) {$ctx1.fill(self,"new:",{anArray:anArray},$globals.TrappedProcessingChain.a$cls)});
  701. //>>excludeEnd("ctx");
  702. },
  703. //>>excludeStart("ide", pragmas.excludeIdeData);
  704. args: ["anArray"],
  705. source: "new: anArray\x0a\x09(anArray anySatisfy: [ :each | each isExpectingModelData ])\x0a\x09\x09ifFalse: [ anArray add: self dataTerminator ]\x0a\x09\x09ifTrue: [ anArray addFirst: self blackboardReaderWriter ].\x0a\x09^self new\x0a\x09\x09processors: anArray;\x0a\x09\x09yourself",
  706. referencedClasses: [],
  707. //>>excludeEnd("ide");
  708. messageSends: ["ifFalse:ifTrue:", "anySatisfy:", "isExpectingModelData", "add:", "dataTerminator", "addFirst:", "blackboardReaderWriter", "processors:", "new", "yourself"]
  709. }),
  710. $globals.TrappedProcessingChain.a$cls);
  711. $core.addMethod(
  712. $core.method({
  713. selector: "newFromProcessorSpecs:",
  714. protocol: "instance creation",
  715. fn: function (anArray){
  716. var self=this,$self=this;
  717. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  718. return $core.withContext(function($ctx1) {
  719. //>>excludeEnd("ctx");
  720. return $self._new_($recv($recv(anArray)._ifEmpty_((function(){
  721. return ["contents"];
  722. })))._collect_((function(each){
  723. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  724. return $core.withContext(function($ctx2) {
  725. //>>excludeEnd("ctx");
  726. return $recv(each)._asTrapProcSendTo_($globals.TrappedProcessor);
  727. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  728. }, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1,2)});
  729. //>>excludeEnd("ctx");
  730. })));
  731. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  732. }, function($ctx1) {$ctx1.fill(self,"newFromProcessorSpecs:",{anArray:anArray},$globals.TrappedProcessingChain.a$cls)});
  733. //>>excludeEnd("ctx");
  734. },
  735. //>>excludeStart("ide", pragmas.excludeIdeData);
  736. args: ["anArray"],
  737. source: "newFromProcessorSpecs: anArray\x0a\x09^self new: ((anArray ifEmpty: [ #(contents) ]) collect: [ :each | each asTrapProcSendTo: TrappedProcessor ])",
  738. referencedClasses: ["TrappedProcessor"],
  739. //>>excludeEnd("ide");
  740. messageSends: ["new:", "collect:", "ifEmpty:", "asTrapProcSendTo:"]
  741. }),
  742. $globals.TrappedProcessingChain.a$cls);
  743. $core.addClass("TrappedProcessor", $globals.Object, [], "Trapped");
  744. //>>excludeStart("ide", pragmas.excludeIdeData);
  745. $globals.TrappedProcessor.comment="I am a processing step in TrappedProcessingChain.\x0aI am stateless flyweight (aka servant)\x0aand will get all necessary data as arguments in API calls.\x0a\x0aMy public API is:\x0a - installToView:toModel:\x0a This gets two TrappedDataCarriers set up without actual data\x0a and at the beginning of their chains. It should do one-time\x0a installation task needed (install event handlers etc.).\x0a To start a chain, do: dataCarrier copy value: data; proceed.\x0a - toView:\x0a This performs transformation of TrappedDataCarrier on its way from model to view.\x0a Should call aDataCarrier proceed to proceed to subsequent step.\x0a - toModel:\x0a This performs transformation of TrappedDataCarrier on its way from view to model.\x0a Should call aDataCarrier proceed to proceed to subsequent step.";
  746. //>>excludeEnd("ide");
  747. $core.addMethod(
  748. $core.method({
  749. selector: "installToView:toModel:",
  750. protocol: "installation",
  751. fn: function (aDataCarrier,anotherDataCarrier){
  752. var self=this,$self=this;
  753. return self;
  754. },
  755. //>>excludeStart("ide", pragmas.excludeIdeData);
  756. args: ["aDataCarrier", "anotherDataCarrier"],
  757. source: "installToView: aDataCarrier toModel: anotherDataCarrier\x0a\x09\x22by default, do nothing\x22",
  758. referencedClasses: [],
  759. //>>excludeEnd("ide");
  760. messageSends: []
  761. }),
  762. $globals.TrappedProcessor);
  763. $core.addMethod(
  764. $core.method({
  765. selector: "isExpectingModelData",
  766. protocol: "testing",
  767. fn: function (){
  768. var self=this,$self=this;
  769. return false;
  770. },
  771. //>>excludeStart("ide", pragmas.excludeIdeData);
  772. args: [],
  773. source: "isExpectingModelData\x0a\x09^false",
  774. referencedClasses: [],
  775. //>>excludeEnd("ide");
  776. messageSends: []
  777. }),
  778. $globals.TrappedProcessor);
  779. $core.addMethod(
  780. $core.method({
  781. selector: "toModel:",
  782. protocol: "data transformation",
  783. fn: function (aDataCarrier){
  784. var self=this,$self=this;
  785. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  786. return $core.withContext(function($ctx1) {
  787. //>>excludeEnd("ctx");
  788. $recv(aDataCarrier)._proceed();
  789. return self;
  790. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  791. }, function($ctx1) {$ctx1.fill(self,"toModel:",{aDataCarrier:aDataCarrier},$globals.TrappedProcessor)});
  792. //>>excludeEnd("ctx");
  793. },
  794. //>>excludeStart("ide", pragmas.excludeIdeData);
  795. args: ["aDataCarrier"],
  796. source: "toModel: aDataCarrier\x0a\x09\x22by default, proceed\x22\x0a\x09aDataCarrier proceed",
  797. referencedClasses: [],
  798. //>>excludeEnd("ide");
  799. messageSends: ["proceed"]
  800. }),
  801. $globals.TrappedProcessor);
  802. $core.addMethod(
  803. $core.method({
  804. selector: "toView:",
  805. protocol: "data transformation",
  806. fn: function (aDataCarrier){
  807. var self=this,$self=this;
  808. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  809. return $core.withContext(function($ctx1) {
  810. //>>excludeEnd("ctx");
  811. $recv(aDataCarrier)._proceed();
  812. return self;
  813. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  814. }, function($ctx1) {$ctx1.fill(self,"toView:",{aDataCarrier:aDataCarrier},$globals.TrappedProcessor)});
  815. //>>excludeEnd("ctx");
  816. },
  817. //>>excludeStart("ide", pragmas.excludeIdeData);
  818. args: ["aDataCarrier"],
  819. source: "toView: aDataCarrier\x0a\x09\x22by default, proceed\x22\x0a\x09aDataCarrier proceed",
  820. referencedClasses: [],
  821. //>>excludeEnd("ide");
  822. messageSends: ["proceed"]
  823. }),
  824. $globals.TrappedProcessor);
  825. $core.addMethod(
  826. $core.method({
  827. selector: "contents",
  828. protocol: "factory",
  829. fn: function (){
  830. var self=this,$self=this;
  831. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  832. return $core.withContext(function($ctx1) {
  833. //>>excludeEnd("ctx");
  834. return $recv($globals.TrappedProcessorContents)._new();
  835. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  836. }, function($ctx1) {$ctx1.fill(self,"contents",{},$globals.TrappedProcessor.a$cls)});
  837. //>>excludeEnd("ctx");
  838. },
  839. //>>excludeStart("ide", pragmas.excludeIdeData);
  840. args: [],
  841. source: "contents\x0a\x09^TrappedProcessorContents new",
  842. referencedClasses: ["TrappedProcessorContents"],
  843. //>>excludeEnd("ide");
  844. messageSends: ["new"]
  845. }),
  846. $globals.TrappedProcessor.a$cls);
  847. $core.addClass("TrappedDataExpectingProcessor", $globals.TrappedProcessor, [], "Trapped");
  848. //>>excludeStart("ide", pragmas.excludeIdeData);
  849. $globals.TrappedDataExpectingProcessor.comment="I answer true to isExpectingModelData and serve as a base class\x0afor processor that present / change model data.\x0a\x0aWhen at least one of my instances is present in the chain,\x0aautomatic databinding processor is added at the beginning\x0a(the data-binding scenario); otherwise, the chain\x0ais run immediately with true as data (run-once scenario).";
  850. //>>excludeEnd("ide");
  851. $core.addMethod(
  852. $core.method({
  853. selector: "isExpectingModelData",
  854. protocol: "testing",
  855. fn: function (){
  856. var self=this,$self=this;
  857. return true;
  858. },
  859. //>>excludeStart("ide", pragmas.excludeIdeData);
  860. args: [],
  861. source: "isExpectingModelData\x0a\x09^true",
  862. referencedClasses: [],
  863. //>>excludeEnd("ide");
  864. messageSends: []
  865. }),
  866. $globals.TrappedDataExpectingProcessor);
  867. $core.addClass("TrappedProcessorContents", $globals.TrappedDataExpectingProcessor, [], "Trapped");
  868. //>>excludeStart("ide", pragmas.excludeIdeData);
  869. $globals.TrappedProcessorContents.comment="I put data into target via contents: in toView:";
  870. //>>excludeEnd("ide");
  871. $core.addMethod(
  872. $core.method({
  873. selector: "toView:",
  874. protocol: "data transformation",
  875. fn: function (aDataCarrier){
  876. var self=this,$self=this;
  877. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  878. return $core.withContext(function($ctx1) {
  879. //>>excludeEnd("ctx");
  880. $recv(aDataCarrier)._toTargetContents();
  881. return self;
  882. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  883. }, function($ctx1) {$ctx1.fill(self,"toView:",{aDataCarrier:aDataCarrier},$globals.TrappedProcessorContents)});
  884. //>>excludeEnd("ctx");
  885. },
  886. //>>excludeStart("ide", pragmas.excludeIdeData);
  887. args: ["aDataCarrier"],
  888. source: "toView: aDataCarrier\x0a\x09aDataCarrier toTargetContents",
  889. referencedClasses: [],
  890. //>>excludeEnd("ide");
  891. messageSends: ["toTargetContents"]
  892. }),
  893. $globals.TrappedProcessorContents);
  894. $core.addClass("TrappedProcessorBlackboard", $globals.TrappedProcessor, [], "Trapped");
  895. //>>excludeStart("ide", pragmas.excludeIdeData);
  896. $globals.TrappedProcessorBlackboard.comment="I am used internally to fetch data from blackboard\x0aor write it back.\x0a\x0aI am added to the beginning of the chain\x0awhen the chain contains at least one element\x0athat isExpectingModelData (see TrappedDataExpectingProcessor).";
  897. //>>excludeEnd("ide");
  898. $core.addMethod(
  899. $core.method({
  900. selector: "installToView:toModel:",
  901. protocol: "installation",
  902. fn: function (aDataCarrier,anotherDataCarrier){
  903. var self=this,$self=this;
  904. var snap;
  905. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  906. return $core.withContext(function($ctx1) {
  907. //>>excludeEnd("ctx");
  908. var $1,$2;
  909. snap=$recv(anotherDataCarrier)._target();
  910. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  911. $ctx1.sendIdx["target"]=1;
  912. //>>excludeEnd("ctx");
  913. $recv(snap)._watch_((function(data){
  914. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  915. return $core.withContext(function($ctx2) {
  916. //>>excludeEnd("ctx");
  917. $1=$recv($recv($recv($recv($recv(aDataCarrier)._target())._asJQuery())._closest_("html"))._toArray())._isEmpty();
  918. if($core.assert($1)){
  919. $recv($globals.AxonOff)._signal();
  920. }
  921. return $recv(snap)._do_((function(){
  922. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  923. return $core.withContext(function($ctx3) {
  924. //>>excludeEnd("ctx");
  925. $2=$recv(aDataCarrier)._copy();
  926. $recv($2)._value_(data);
  927. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  928. $ctx3.sendIdx["value:"]=1;
  929. //>>excludeEnd("ctx");
  930. return $recv($2)._proceed();
  931. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  932. }, function($ctx3) {$ctx3.fillBlock({},$ctx2,3)});
  933. //>>excludeEnd("ctx");
  934. }));
  935. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  936. }, function($ctx2) {$ctx2.fillBlock({data:data},$ctx1,1)});
  937. //>>excludeEnd("ctx");
  938. }));
  939. $recv(aDataCarrier)._value_(false);
  940. return self;
  941. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  942. }, function($ctx1) {$ctx1.fill(self,"installToView:toModel:",{aDataCarrier:aDataCarrier,anotherDataCarrier:anotherDataCarrier,snap:snap},$globals.TrappedProcessorBlackboard)});
  943. //>>excludeEnd("ctx");
  944. },
  945. //>>excludeStart("ide", pragmas.excludeIdeData);
  946. args: ["aDataCarrier", "anotherDataCarrier"],
  947. source: "installToView: aDataCarrier toModel: anotherDataCarrier\x0a\x09| snap |\x0a\x09snap := anotherDataCarrier target.\x0a\x09snap watch: [ :data |\x0a\x09\x09(aDataCarrier target asJQuery closest: 'html') toArray isEmpty ifTrue: [ AxonOff signal ].\x0a snap do: [ aDataCarrier copy value: data; proceed ] ].\x0a\x09aDataCarrier value: false",
  948. referencedClasses: ["AxonOff"],
  949. //>>excludeEnd("ide");
  950. messageSends: ["target", "watch:", "ifTrue:", "isEmpty", "toArray", "closest:", "asJQuery", "signal", "do:", "value:", "copy", "proceed"]
  951. }),
  952. $globals.TrappedProcessorBlackboard);
  953. $core.addMethod(
  954. $core.method({
  955. selector: "toModel:",
  956. protocol: "data transformation",
  957. fn: function (aDataCarrier){
  958. var self=this,$self=this;
  959. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  960. return $core.withContext(function($ctx1) {
  961. //>>excludeEnd("ctx");
  962. $recv(aDataCarrier)._modifyTarget();
  963. return self;
  964. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  965. }, function($ctx1) {$ctx1.fill(self,"toModel:",{aDataCarrier:aDataCarrier},$globals.TrappedProcessorBlackboard)});
  966. //>>excludeEnd("ctx");
  967. },
  968. //>>excludeStart("ide", pragmas.excludeIdeData);
  969. args: ["aDataCarrier"],
  970. source: "toModel: aDataCarrier\x0a\x09aDataCarrier modifyTarget",
  971. referencedClasses: [],
  972. //>>excludeEnd("ide");
  973. messageSends: ["modifyTarget"]
  974. }),
  975. $globals.TrappedProcessorBlackboard);
  976. $core.addClass("TrappedProcessorTerminator", $globals.TrappedProcessor, [], "Trapped");
  977. //>>excludeStart("ide", pragmas.excludeIdeData);
  978. $globals.TrappedProcessorTerminator.comment="I do not proceed in toView:.\x0a\x0aI am added automatically to end of chain when it does not contain\x0aany element that isExpectingModelData (see TrappedDataExpectingProcessor).";
  979. //>>excludeEnd("ide");
  980. $core.addMethod(
  981. $core.method({
  982. selector: "toView:",
  983. protocol: "data transformation",
  984. fn: function (aDataCarrier){
  985. var self=this,$self=this;
  986. return self;
  987. },
  988. //>>excludeStart("ide", pragmas.excludeIdeData);
  989. args: ["aDataCarrier"],
  990. source: "toView: aDataCarrier\x0a\x09\x22stop\x22",
  991. referencedClasses: [],
  992. //>>excludeEnd("ide");
  993. messageSends: []
  994. }),
  995. $globals.TrappedProcessorTerminator);
  996. $core.addClass("TrappedSingleton", $globals.Object, [], "Trapped");
  997. $core.addMethod(
  998. $core.method({
  999. selector: "start:",
  1000. protocol: "action",
  1001. fn: function (args){
  1002. var self=this,$self=this;
  1003. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1004. return $core.withContext(function($ctx1) {
  1005. //>>excludeEnd("ctx");
  1006. return $self._subclassResponsibility();
  1007. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1008. }, function($ctx1) {$ctx1.fill(self,"start:",{args:args},$globals.TrappedSingleton)});
  1009. //>>excludeEnd("ctx");
  1010. },
  1011. //>>excludeStart("ide", pragmas.excludeIdeData);
  1012. args: ["args"],
  1013. source: "start: args\x0a\x09^ self subclassResponsibility",
  1014. referencedClasses: [],
  1015. //>>excludeEnd("ide");
  1016. messageSends: ["subclassResponsibility"]
  1017. }),
  1018. $globals.TrappedSingleton);
  1019. $globals.TrappedSingleton.a$cls.iVarNames = ["current"];
  1020. $core.addMethod(
  1021. $core.method({
  1022. selector: "current",
  1023. protocol: "accessing",
  1024. fn: function (){
  1025. var self=this,$self=this;
  1026. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1027. return $core.withContext(function($ctx1) {
  1028. //>>excludeEnd("ctx");
  1029. var $1,$receiver;
  1030. $1=$self["@current"];
  1031. if(($receiver = $1) == null || $receiver.a$nil){
  1032. $self["@current"]=$self._new();
  1033. return $self["@current"];
  1034. } else {
  1035. return $1;
  1036. }
  1037. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1038. }, function($ctx1) {$ctx1.fill(self,"current",{},$globals.TrappedSingleton.a$cls)});
  1039. //>>excludeEnd("ctx");
  1040. },
  1041. //>>excludeStart("ide", pragmas.excludeIdeData);
  1042. args: [],
  1043. source: "current\x0a\x09^ current ifNil: [ current := self new ]",
  1044. referencedClasses: [],
  1045. //>>excludeEnd("ide");
  1046. messageSends: ["ifNil:", "new"]
  1047. }),
  1048. $globals.TrappedSingleton.a$cls);
  1049. $core.addMethod(
  1050. $core.method({
  1051. selector: "start:",
  1052. protocol: "action",
  1053. fn: function (args){
  1054. var self=this,$self=this;
  1055. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1056. return $core.withContext(function($ctx1) {
  1057. //>>excludeEnd("ctx");
  1058. $recv($self._current())._start_(args);
  1059. return self;
  1060. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1061. }, function($ctx1) {$ctx1.fill(self,"start:",{args:args},$globals.TrappedSingleton.a$cls)});
  1062. //>>excludeEnd("ctx");
  1063. },
  1064. //>>excludeStart("ide", pragmas.excludeIdeData);
  1065. args: ["args"],
  1066. source: "start: args\x0a\x09self current start: args",
  1067. referencedClasses: [],
  1068. //>>excludeEnd("ide");
  1069. messageSends: ["start:", "current"]
  1070. }),
  1071. $globals.TrappedSingleton.a$cls);
  1072. $core.addClass("Trapped", $globals.TrappedSingleton, ["registry"], "Trapped");
  1073. $core.addMethod(
  1074. $core.method({
  1075. selector: "byName:",
  1076. protocol: "accessing",
  1077. fn: function (aString){
  1078. var self=this,$self=this;
  1079. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1080. return $core.withContext(function($ctx1) {
  1081. //>>excludeEnd("ctx");
  1082. return $recv($self["@registry"])._at_(aString);
  1083. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1084. }, function($ctx1) {$ctx1.fill(self,"byName:",{aString:aString},$globals.Trapped)});
  1085. //>>excludeEnd("ctx");
  1086. },
  1087. //>>excludeStart("ide", pragmas.excludeIdeData);
  1088. args: ["aString"],
  1089. source: "byName: aString\x0a\x09^ registry at: aString",
  1090. referencedClasses: [],
  1091. //>>excludeEnd("ide");
  1092. messageSends: ["at:"]
  1093. }),
  1094. $globals.Trapped);
  1095. $core.addMethod(
  1096. $core.method({
  1097. selector: "cloneAndInject:",
  1098. protocol: "private",
  1099. fn: function (anObject){
  1100. var self=this,$self=this;
  1101. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1102. return $core.withContext(function($ctx1) {
  1103. //>>excludeEnd("ctx");
  1104. var $1;
  1105. $1=$recv($recv(anObject)._asJQuery())._clone();
  1106. $recv($1)._each_((function(i,each){
  1107. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1108. return $core.withContext(function($ctx2) {
  1109. //>>excludeEnd("ctx");
  1110. return $self._injectToElement_(each);
  1111. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1112. }, function($ctx2) {$ctx2.fillBlock({i:i,each:each},$ctx1,1)});
  1113. //>>excludeEnd("ctx");
  1114. }));
  1115. return $recv($1)._get_((0));
  1116. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1117. }, function($ctx1) {$ctx1.fill(self,"cloneAndInject:",{anObject:anObject},$globals.Trapped)});
  1118. //>>excludeEnd("ctx");
  1119. },
  1120. //>>excludeStart("ide", pragmas.excludeIdeData);
  1121. args: ["anObject"],
  1122. source: "cloneAndInject: anObject\x0a\x09^anObject asJQuery clone\x0a\x09\x09each: [ :i :each | self injectToElement: each ];\x0a\x09\x09get: 0",
  1123. referencedClasses: [],
  1124. //>>excludeEnd("ide");
  1125. messageSends: ["each:", "clone", "asJQuery", "injectToElement:", "get:"]
  1126. }),
  1127. $globals.Trapped);
  1128. $core.addMethod(
  1129. $core.method({
  1130. selector: "descend:snapshotDo:",
  1131. protocol: "private",
  1132. fn: function (anArray,aBlock){
  1133. var self=this,$self=this;
  1134. var tpsc;
  1135. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1136. return $core.withContext(function($ctx1) {
  1137. //>>excludeEnd("ctx");
  1138. var $1,$3,$2;
  1139. tpsc=$recv($globals.TrappedPathStack)._current();
  1140. $recv(tpsc)._append_do_(anArray,(function(){
  1141. var prefix,modelPath,model;
  1142. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1143. return $core.withContext(function($ctx2) {
  1144. //>>excludeEnd("ctx");
  1145. $1=$recv(tpsc)._elements();
  1146. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1147. $ctx2.sendIdx["elements"]=1;
  1148. //>>excludeEnd("ctx");
  1149. prefix=$recv($1)._first();
  1150. prefix;
  1151. modelPath=$recv($recv(tpsc)._elements())._allButFirst();
  1152. modelPath;
  1153. model=$self._byName_(prefix);
  1154. model;
  1155. $3=$recv($globals.TrappedSnapshot)._new();
  1156. $recv($3)._prefix_(prefix);
  1157. $2=$recv($3)._path_model_(modelPath,model);
  1158. return $recv(aBlock)._value_($2);
  1159. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1160. }, function($ctx2) {$ctx2.fillBlock({prefix:prefix,modelPath:modelPath,model:model},$ctx1,1)});
  1161. //>>excludeEnd("ctx");
  1162. }));
  1163. return self;
  1164. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1165. }, function($ctx1) {$ctx1.fill(self,"descend:snapshotDo:",{anArray:anArray,aBlock:aBlock,tpsc:tpsc},$globals.Trapped)});
  1166. //>>excludeEnd("ctx");
  1167. },
  1168. //>>excludeStart("ide", pragmas.excludeIdeData);
  1169. args: ["anArray", "aBlock"],
  1170. source: "descend: anArray snapshotDo: aBlock\x0a\x09| tpsc |\x0a tpsc := TrappedPathStack current.\x0a tpsc append: anArray do: [\x0a | prefix modelPath model |\x0a\x09\x09prefix := tpsc elements first.\x0a\x09\x09modelPath := tpsc elements allButFirst.\x0a \x09 model := self byName: prefix.\x0a aBlock value: (TrappedSnapshot new prefix: prefix; path: modelPath model: model)\x0a ]",
  1171. referencedClasses: ["TrappedPathStack", "TrappedSnapshot"],
  1172. //>>excludeEnd("ide");
  1173. messageSends: ["current", "append:do:", "first", "elements", "allButFirst", "byName:", "value:", "prefix:", "new", "path:model:"]
  1174. }),
  1175. $globals.Trapped);
  1176. $core.addMethod(
  1177. $core.method({
  1178. selector: "initialize",
  1179. protocol: "initialization",
  1180. fn: function (){
  1181. var self=this,$self=this;
  1182. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1183. return $core.withContext(function($ctx1) {
  1184. //>>excludeEnd("ctx");
  1185. (
  1186. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1187. $ctx1.supercall = true,
  1188. //>>excludeEnd("ctx");
  1189. ($globals.Trapped.superclass||$boot.nilAsClass).fn.prototype._initialize.apply($self, []));
  1190. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1191. $ctx1.supercall = false;
  1192. //>>excludeEnd("ctx");;
  1193. $self["@registry"]=$globals.HashedCollection._newFromPairs_([]);
  1194. return self;
  1195. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1196. }, function($ctx1) {$ctx1.fill(self,"initialize",{},$globals.Trapped)});
  1197. //>>excludeEnd("ctx");
  1198. },
  1199. //>>excludeStart("ide", pragmas.excludeIdeData);
  1200. args: [],
  1201. source: "initialize\x0a\x09super initialize.\x0a\x09registry := #{}.",
  1202. referencedClasses: [],
  1203. //>>excludeEnd("ide");
  1204. messageSends: ["initialize"]
  1205. }),
  1206. $globals.Trapped);
  1207. $core.addMethod(
  1208. $core.method({
  1209. selector: "injectToChildren:",
  1210. protocol: "private",
  1211. fn: function (anElement){
  1212. var self=this,$self=this;
  1213. var child;
  1214. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1215. return $core.withContext(function($ctx1) {
  1216. //>>excludeEnd("ctx");
  1217. child=$recv(anElement)._firstChild();
  1218. $recv((function(){
  1219. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1220. return $core.withContext(function($ctx2) {
  1221. //>>excludeEnd("ctx");
  1222. return $recv(child)._isNil();
  1223. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1224. }, function($ctx2) {$ctx2.fillBlock({},$ctx1,1)});
  1225. //>>excludeEnd("ctx");
  1226. }))._whileFalse_((function(){
  1227. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1228. return $core.withContext(function($ctx2) {
  1229. //>>excludeEnd("ctx");
  1230. $self._injectToElement_(child);
  1231. child=$recv(child)._nextSibling();
  1232. return child;
  1233. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1234. }, function($ctx2) {$ctx2.fillBlock({},$ctx1,2)});
  1235. //>>excludeEnd("ctx");
  1236. }));
  1237. return self;
  1238. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1239. }, function($ctx1) {$ctx1.fill(self,"injectToChildren:",{anElement:anElement,child:child},$globals.Trapped)});
  1240. //>>excludeEnd("ctx");
  1241. },
  1242. //>>excludeStart("ide", pragmas.excludeIdeData);
  1243. args: ["anElement"],
  1244. source: "injectToChildren: anElement\x0a\x09| child |\x0a\x09child := anElement firstChild.\x0a\x09[ child isNil ] whileFalse: [ self injectToElement: child. child := child nextSibling ]",
  1245. referencedClasses: [],
  1246. //>>excludeEnd("ide");
  1247. messageSends: ["firstChild", "whileFalse:", "isNil", "injectToElement:", "nextSibling"]
  1248. }),
  1249. $globals.Trapped);
  1250. $core.addMethod(
  1251. $core.method({
  1252. selector: "injectToElement:",
  1253. protocol: "private",
  1254. fn: function (anElement){
  1255. var self=this,$self=this;
  1256. var jq;
  1257. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1258. return $core.withContext(function($ctx1) {
  1259. //>>excludeEnd("ctx");
  1260. var $1,$receiver;
  1261. jq=$recv(anElement)._asJQuery();
  1262. $1=$recv(jq)._attr_("data-trap");
  1263. if(($receiver = $1) == null || $receiver.a$nil){
  1264. $1;
  1265. } else {
  1266. var attr;
  1267. attr=$receiver;
  1268. $recv(jq)._removeAttr_("data-trap");
  1269. $recv($recv($globals.Trapped)._parse_(attr))._do_((function(rule){
  1270. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1271. return $core.withContext(function($ctx2) {
  1272. //>>excludeEnd("ctx");
  1273. return $recv($recv($recv($globals.HTMLCanvas)._onJQuery_(jq))._root())._trap_processors_($recv(rule)._first(),$recv(rule)._at_ifAbsent_((2),(function(){
  1274. return [];
  1275. })));
  1276. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1277. }, function($ctx2) {$ctx2.fillBlock({rule:rule},$ctx1,2)});
  1278. //>>excludeEnd("ctx");
  1279. }));
  1280. }
  1281. $self._injectToChildren_(anElement);
  1282. return self;
  1283. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1284. }, function($ctx1) {$ctx1.fill(self,"injectToElement:",{anElement:anElement,jq:jq},$globals.Trapped)});
  1285. //>>excludeEnd("ctx");
  1286. },
  1287. //>>excludeStart("ide", pragmas.excludeIdeData);
  1288. args: ["anElement"],
  1289. source: "injectToElement: anElement\x0a\x09| jq |\x0a\x09jq := anElement asJQuery.\x0a\x09(jq attr: 'data-trap') ifNotNil: [ :attr |\x0a\x09\x09jq removeAttr: 'data-trap'.\x0a\x09\x09(Trapped parse: attr) do: [ :rule |\x0a\x09\x09\x09(HTMLCanvas onJQuery: jq) root trap: rule first processors: (rule at: 2 ifAbsent: [#()]) ] ].\x0a\x09self injectToChildren: anElement",
  1290. referencedClasses: ["Trapped", "HTMLCanvas"],
  1291. //>>excludeEnd("ide");
  1292. messageSends: ["asJQuery", "ifNotNil:", "attr:", "removeAttr:", "do:", "parse:", "trap:processors:", "root", "onJQuery:", "first", "at:ifAbsent:", "injectToChildren:"]
  1293. }),
  1294. $globals.Trapped);
  1295. $core.addMethod(
  1296. $core.method({
  1297. selector: "register:",
  1298. protocol: "accessing",
  1299. fn: function (aListKeyedEntity){
  1300. var self=this,$self=this;
  1301. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1302. return $core.withContext(function($ctx1) {
  1303. //>>excludeEnd("ctx");
  1304. $self._register_name_(aListKeyedEntity,$recv($recv(aListKeyedEntity)._class())._name());
  1305. return self;
  1306. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1307. }, function($ctx1) {$ctx1.fill(self,"register:",{aListKeyedEntity:aListKeyedEntity},$globals.Trapped)});
  1308. //>>excludeEnd("ctx");
  1309. },
  1310. //>>excludeStart("ide", pragmas.excludeIdeData);
  1311. args: ["aListKeyedEntity"],
  1312. source: "register: aListKeyedEntity\x0a\x09self register: aListKeyedEntity name: aListKeyedEntity class name",
  1313. referencedClasses: [],
  1314. //>>excludeEnd("ide");
  1315. messageSends: ["register:name:", "name", "class"]
  1316. }),
  1317. $globals.Trapped);
  1318. $core.addMethod(
  1319. $core.method({
  1320. selector: "register:name:",
  1321. protocol: "accessing",
  1322. fn: function (aListKeyedEntity,aString){
  1323. var self=this,$self=this;
  1324. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1325. return $core.withContext(function($ctx1) {
  1326. //>>excludeEnd("ctx");
  1327. $recv($self["@registry"])._at_put_(aString,aListKeyedEntity);
  1328. return self;
  1329. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1330. }, function($ctx1) {$ctx1.fill(self,"register:name:",{aListKeyedEntity:aListKeyedEntity,aString:aString},$globals.Trapped)});
  1331. //>>excludeEnd("ctx");
  1332. },
  1333. //>>excludeStart("ide", pragmas.excludeIdeData);
  1334. args: ["aListKeyedEntity", "aString"],
  1335. source: "register: aListKeyedEntity name: aString\x0a\x09registry at: aString put: aListKeyedEntity",
  1336. referencedClasses: [],
  1337. //>>excludeEnd("ide");
  1338. messageSends: ["at:put:"]
  1339. }),
  1340. $globals.Trapped);
  1341. $core.addMethod(
  1342. $core.method({
  1343. selector: "start:",
  1344. protocol: "action",
  1345. fn: function (args){
  1346. var self=this,$self=this;
  1347. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1348. return $core.withContext(function($ctx1) {
  1349. //>>excludeEnd("ctx");
  1350. $recv(args)._do_((function(each){
  1351. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1352. return $core.withContext(function($ctx2) {
  1353. //>>excludeEnd("ctx");
  1354. return $self._register_(each);
  1355. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1356. }, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1,1)});
  1357. //>>excludeEnd("ctx");
  1358. }));
  1359. $self._injectToElement_(document);
  1360. return self;
  1361. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1362. }, function($ctx1) {$ctx1.fill(self,"start:",{args:args},$globals.Trapped)});
  1363. //>>excludeEnd("ctx");
  1364. },
  1365. //>>excludeStart("ide", pragmas.excludeIdeData);
  1366. args: ["args"],
  1367. source: "start: args\x0a\x09args do: [ :each | self register: each ].\x0a\x09self injectToElement: document",
  1368. referencedClasses: [],
  1369. //>>excludeEnd("ide");
  1370. messageSends: ["do:", "register:", "injectToElement:"]
  1371. }),
  1372. $globals.Trapped);
  1373. $core.addMethod(
  1374. $core.method({
  1375. selector: "loop:before:do:",
  1376. protocol: "private",
  1377. fn: function (aSequenceableCollection,aNode,aBlock){
  1378. var self=this,$self=this;
  1379. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1380. return $core.withContext(function($ctx1) {
  1381. //>>excludeEnd("ctx");
  1382. $recv(aSequenceableCollection)._withIndexDo_((function(item,i){
  1383. var env;
  1384. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1385. return $core.withContext(function($ctx2) {
  1386. //>>excludeEnd("ctx");
  1387. env=$recv(document)._createElement_("ins");
  1388. env;
  1389. $recv([i])._trapDescend_((function(){
  1390. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1391. return $core.withContext(function($ctx3) {
  1392. //>>excludeEnd("ctx");
  1393. return $recv($recv($recv($globals.HTMLCanvas)._onJQuery_($recv(env)._asJQuery()))._root())._with_(aBlock);
  1394. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1395. }, function($ctx3) {$ctx3.fillBlock({},$ctx2,2)});
  1396. //>>excludeEnd("ctx");
  1397. }));
  1398. return $recv($recv($globals.Array)._streamContents_((function(str){
  1399. var child;
  1400. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1401. return $core.withContext(function($ctx3) {
  1402. //>>excludeEnd("ctx");
  1403. child=$recv(env)._firstChild();
  1404. child;
  1405. return $recv((function(){
  1406. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1407. return $core.withContext(function($ctx4) {
  1408. //>>excludeEnd("ctx");
  1409. return $recv(child)._isNil();
  1410. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1411. }, function($ctx4) {$ctx4.fillBlock({},$ctx3,4)});
  1412. //>>excludeEnd("ctx");
  1413. }))._whileFalse_((function(){
  1414. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1415. return $core.withContext(function($ctx4) {
  1416. //>>excludeEnd("ctx");
  1417. $recv(str)._nextPut_(child);
  1418. child=$recv(child)._nextSibling();
  1419. return child;
  1420. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1421. }, function($ctx4) {$ctx4.fillBlock({},$ctx3,5)});
  1422. //>>excludeEnd("ctx");
  1423. }));
  1424. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1425. }, function($ctx3) {$ctx3.fillBlock({str:str,child:child},$ctx2,3)});
  1426. //>>excludeEnd("ctx");
  1427. })))._do_((function(each){
  1428. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1429. return $core.withContext(function($ctx3) {
  1430. //>>excludeEnd("ctx");
  1431. return $recv($recv(aNode)._parentNode())._insertBefore_reference_(each,aNode);
  1432. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1433. }, function($ctx3) {$ctx3.fillBlock({each:each},$ctx2,6)});
  1434. //>>excludeEnd("ctx");
  1435. }));
  1436. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1437. }, function($ctx2) {$ctx2.fillBlock({item:item,i:i,env:env},$ctx1,1)});
  1438. //>>excludeEnd("ctx");
  1439. }));
  1440. return self;
  1441. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1442. }, function($ctx1) {$ctx1.fill(self,"loop:before:do:",{aSequenceableCollection:aSequenceableCollection,aNode:aNode,aBlock:aBlock},$globals.Trapped.a$cls)});
  1443. //>>excludeEnd("ctx");
  1444. },
  1445. //>>excludeStart("ide", pragmas.excludeIdeData);
  1446. args: ["aSequenceableCollection", "aNode", "aBlock"],
  1447. source: "loop: aSequenceableCollection before: aNode do: aBlock\x0a\x09aSequenceableCollection withIndexDo: [ :item :i |\x0a\x09\x09| env |\x0a\x09\x09\x22env := document createDocumentFragment.\x22\x0a\x09\x09env := document createElement: 'ins'.\x0a\x09\x09{i} trapDescend: [ (HTMLCanvas onJQuery: env asJQuery) root with: aBlock ].\x0a\x09\x09\x22aNode parentNode insertBefore: env reference: aNode\x22\x0a\x09\x09(Array streamContents: [ :str |\x0a\x09\x09\x09| child |\x0a\x09\x09\x09child := env firstChild.\x0a\x09\x09\x09[ child isNil ] whileFalse: [\x0a\x09\x09\x09\x09str nextPut: child.\x0a\x09\x09\x09\x09child := child nextSibling ]])\x0a\x09\x09do: [ :each | aNode parentNode insertBefore: each reference: aNode ]\x0a\x09]",
  1448. referencedClasses: ["HTMLCanvas", "Array"],
  1449. //>>excludeEnd("ide");
  1450. messageSends: ["withIndexDo:", "createElement:", "trapDescend:", "with:", "root", "onJQuery:", "asJQuery", "do:", "streamContents:", "firstChild", "whileFalse:", "isNil", "nextPut:", "nextSibling", "insertBefore:reference:", "parentNode"]
  1451. }),
  1452. $globals.Trapped.a$cls);
  1453. $core.addMethod(
  1454. $core.method({
  1455. selector: "loop:between:and:do:",
  1456. protocol: "private",
  1457. fn: function (aSequenceableCollection,aTagBrush,anotherTagBrush,aBlock){
  1458. var self=this,$self=this;
  1459. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1460. return $core.withContext(function($ctx1) {
  1461. //>>excludeEnd("ctx");
  1462. var $2,$3,$1,$receiver;
  1463. $2=$recv(aTagBrush)._asJQuery();
  1464. $3=$recv(anotherTagBrush)._element();
  1465. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1466. $ctx1.sendIdx["element"]=1;
  1467. //>>excludeEnd("ctx");
  1468. $1=$recv($2)._nextUntil_($3);
  1469. $recv($1)._remove();
  1470. if(($receiver = aSequenceableCollection) == null || $receiver.a$nil){
  1471. aSequenceableCollection;
  1472. } else {
  1473. $self._loop_before_do_(aSequenceableCollection,$recv(anotherTagBrush)._element(),aBlock);
  1474. }
  1475. return self;
  1476. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1477. }, function($ctx1) {$ctx1.fill(self,"loop:between:and:do:",{aSequenceableCollection:aSequenceableCollection,aTagBrush:aTagBrush,anotherTagBrush:anotherTagBrush,aBlock:aBlock},$globals.Trapped.a$cls)});
  1478. //>>excludeEnd("ctx");
  1479. },
  1480. //>>excludeStart("ide", pragmas.excludeIdeData);
  1481. args: ["aSequenceableCollection", "aTagBrush", "anotherTagBrush", "aBlock"],
  1482. source: "loop: aSequenceableCollection between: aTagBrush and: anotherTagBrush do: aBlock\x0a\x09(aTagBrush asJQuery nextUntil: anotherTagBrush element) remove.\x0a\x09aSequenceableCollection ifNotNil: [\x0a\x09\x09self loop: aSequenceableCollection before: anotherTagBrush element do: aBlock\x0a\x09]",
  1483. referencedClasses: [],
  1484. //>>excludeEnd("ide");
  1485. messageSends: ["remove", "nextUntil:", "asJQuery", "element", "ifNotNil:", "loop:before:do:"]
  1486. }),
  1487. $globals.Trapped.a$cls);
  1488. $core.addMethod(
  1489. $core.method({
  1490. selector: "parse:",
  1491. protocol: "parsing",
  1492. fn: function (aString){
  1493. var self=this,$self=this;
  1494. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1495. return $core.withContext(function($ctx1) {
  1496. //>>excludeEnd("ctx");
  1497. var $2,$1;
  1498. $2=$recv(aString)._tokenize_(".");
  1499. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1500. $ctx1.sendIdx["tokenize:"]=1;
  1501. //>>excludeEnd("ctx");
  1502. $1=$recv($2)._collect_((function(rule){
  1503. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1504. return $core.withContext(function($ctx2) {
  1505. //>>excludeEnd("ctx");
  1506. return $recv($recv(rule)._tokenize_(":"))._collect_((function(message){
  1507. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1508. return $core.withContext(function($ctx3) {
  1509. //>>excludeEnd("ctx");
  1510. return $recv($globals.Axes)._parse_(message);
  1511. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1512. }, function($ctx3) {$ctx3.fillBlock({message:message},$ctx2,2)});
  1513. //>>excludeEnd("ctx");
  1514. }));
  1515. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1516. }, function($ctx2) {$ctx2.fillBlock({rule:rule},$ctx1,1)});
  1517. //>>excludeEnd("ctx");
  1518. }));
  1519. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1520. $ctx1.sendIdx["collect:"]=1;
  1521. //>>excludeEnd("ctx");
  1522. return $1;
  1523. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1524. }, function($ctx1) {$ctx1.fill(self,"parse:",{aString:aString},$globals.Trapped.a$cls)});
  1525. //>>excludeEnd("ctx");
  1526. },
  1527. //>>excludeStart("ide", pragmas.excludeIdeData);
  1528. args: ["aString"],
  1529. source: "parse: aString\x0a\x09^ (aString tokenize: '.') collect: [ :rule |\x0a\x09\x09(rule tokenize: ':') collect: [ :message |\x0a\x09\x09\x09Axes parse: message ] ]",
  1530. referencedClasses: ["Axes"],
  1531. //>>excludeEnd("ide");
  1532. messageSends: ["collect:", "tokenize:", "parse:"]
  1533. }),
  1534. $globals.Trapped.a$cls);
  1535. $core.addClass("TrappedPathStack", $globals.TrappedSingleton, ["elements"], "Trapped");
  1536. $core.addMethod(
  1537. $core.method({
  1538. selector: "append:do:",
  1539. protocol: "descending",
  1540. fn: function (anArray,aBlock){
  1541. var self=this,$self=this;
  1542. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1543. return $core.withContext(function($ctx1) {
  1544. //>>excludeEnd("ctx");
  1545. $self._with_do_($recv($self["@elements"]).__comma(anArray),aBlock);
  1546. return self;
  1547. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1548. }, function($ctx1) {$ctx1.fill(self,"append:do:",{anArray:anArray,aBlock:aBlock},$globals.TrappedPathStack)});
  1549. //>>excludeEnd("ctx");
  1550. },
  1551. //>>excludeStart("ide", pragmas.excludeIdeData);
  1552. args: ["anArray", "aBlock"],
  1553. source: "append: anArray do: aBlock\x0a self with: elements, anArray do: aBlock",
  1554. referencedClasses: [],
  1555. //>>excludeEnd("ide");
  1556. messageSends: ["with:do:", ","]
  1557. }),
  1558. $globals.TrappedPathStack);
  1559. $core.addMethod(
  1560. $core.method({
  1561. selector: "elements",
  1562. protocol: "accessing",
  1563. fn: function (){
  1564. var self=this,$self=this;
  1565. return $self["@elements"];
  1566. },
  1567. //>>excludeStart("ide", pragmas.excludeIdeData);
  1568. args: [],
  1569. source: "elements\x0a\x09^elements",
  1570. referencedClasses: [],
  1571. //>>excludeEnd("ide");
  1572. messageSends: []
  1573. }),
  1574. $globals.TrappedPathStack);
  1575. $core.addMethod(
  1576. $core.method({
  1577. selector: "initialize",
  1578. protocol: "initialization",
  1579. fn: function (){
  1580. var self=this,$self=this;
  1581. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1582. return $core.withContext(function($ctx1) {
  1583. //>>excludeEnd("ctx");
  1584. (
  1585. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1586. $ctx1.supercall = true,
  1587. //>>excludeEnd("ctx");
  1588. ($globals.TrappedPathStack.superclass||$boot.nilAsClass).fn.prototype._initialize.apply($self, []));
  1589. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1590. $ctx1.supercall = false;
  1591. //>>excludeEnd("ctx");;
  1592. $self["@elements"]=[];
  1593. return self;
  1594. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1595. }, function($ctx1) {$ctx1.fill(self,"initialize",{},$globals.TrappedPathStack)});
  1596. //>>excludeEnd("ctx");
  1597. },
  1598. //>>excludeStart("ide", pragmas.excludeIdeData);
  1599. args: [],
  1600. source: "initialize\x0a super initialize.\x0a\x09elements := #().",
  1601. referencedClasses: [],
  1602. //>>excludeEnd("ide");
  1603. messageSends: ["initialize"]
  1604. }),
  1605. $globals.TrappedPathStack);
  1606. $core.addMethod(
  1607. $core.method({
  1608. selector: "with:do:",
  1609. protocol: "descending",
  1610. fn: function (anArray,aBlock){
  1611. var self=this,$self=this;
  1612. var old;
  1613. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1614. return $core.withContext(function($ctx1) {
  1615. //>>excludeEnd("ctx");
  1616. old=$self["@elements"];
  1617. $recv((function(){
  1618. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1619. return $core.withContext(function($ctx2) {
  1620. //>>excludeEnd("ctx");
  1621. $self["@elements"]=anArray;
  1622. $self["@elements"];
  1623. return $recv(aBlock)._value();
  1624. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1625. }, function($ctx2) {$ctx2.fillBlock({},$ctx1,1)});
  1626. //>>excludeEnd("ctx");
  1627. }))._ensure_((function(){
  1628. $self["@elements"]=old;
  1629. return $self["@elements"];
  1630. }));
  1631. return self;
  1632. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1633. }, function($ctx1) {$ctx1.fill(self,"with:do:",{anArray:anArray,aBlock:aBlock,old:old},$globals.TrappedPathStack)});
  1634. //>>excludeEnd("ctx");
  1635. },
  1636. //>>excludeStart("ide", pragmas.excludeIdeData);
  1637. args: ["anArray", "aBlock"],
  1638. source: "with: anArray do: aBlock\x0a\x09| old |\x0a old := elements.\x0a [ elements := anArray.\x0a\x09aBlock value ] ensure: [ elements := old ]",
  1639. referencedClasses: [],
  1640. //>>excludeEnd("ide");
  1641. messageSends: ["ensure:", "value"]
  1642. }),
  1643. $globals.TrappedPathStack);
  1644. $core.addMethod(
  1645. $core.method({
  1646. selector: "asTrapProcSendTo:",
  1647. protocol: "*Trapped",
  1648. fn: function (anObject){
  1649. var self=this,$self=this;
  1650. var selector,args;
  1651. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1652. return $core.withContext(function($ctx1) {
  1653. //>>excludeEnd("ctx");
  1654. var $1;
  1655. selector="";
  1656. args=[];
  1657. $self._withIndexDo_((function(element,index){
  1658. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1659. return $core.withContext(function($ctx2) {
  1660. //>>excludeEnd("ctx");
  1661. $1=$recv(index)._odd();
  1662. if($core.assert($1)){
  1663. selector=$recv(selector).__comma(element);
  1664. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1665. $ctx2.sendIdx[","]=1;
  1666. //>>excludeEnd("ctx");
  1667. return selector;
  1668. } else {
  1669. selector=$recv(selector).__comma(":");
  1670. selector;
  1671. return $recv(args)._add_(element);
  1672. }
  1673. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1674. }, function($ctx2) {$ctx2.fillBlock({element:element,index:index},$ctx1,1)});
  1675. //>>excludeEnd("ctx");
  1676. }));
  1677. return $recv(anObject)._perform_withArguments_(selector,args);
  1678. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1679. }, function($ctx1) {$ctx1.fill(self,"asTrapProcSendTo:",{anObject:anObject,selector:selector,args:args},$globals.Array)});
  1680. //>>excludeEnd("ctx");
  1681. },
  1682. //>>excludeStart("ide", pragmas.excludeIdeData);
  1683. args: ["anObject"],
  1684. source: "asTrapProcSendTo: anObject\x0a\x09| selector args |\x0a\x09selector := ''.\x0a\x09args := #().\x0a\x09\x09self withIndexDo: [ :element :index | index odd\x0a\x09\x09\x09ifTrue: [ selector := selector, element ]\x0a\x09\x09\x09ifFalse: [ selector := selector, ':'. args add: element ] ].\x0a\x09^anObject perform: selector withArguments: args",
  1685. referencedClasses: [],
  1686. //>>excludeEnd("ide");
  1687. messageSends: ["withIndexDo:", "ifTrue:ifFalse:", "odd", ",", "add:", "perform:withArguments:"]
  1688. }),
  1689. $globals.Array);
  1690. $core.addMethod(
  1691. $core.method({
  1692. selector: "trapDescend:",
  1693. protocol: "*Trapped",
  1694. fn: function (aBlock){
  1695. var self=this,$self=this;
  1696. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1697. return $core.withContext(function($ctx1) {
  1698. //>>excludeEnd("ctx");
  1699. $recv($recv($globals.Trapped)._current())._descend_snapshotDo_(self,aBlock);
  1700. return self;
  1701. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1702. }, function($ctx1) {$ctx1.fill(self,"trapDescend:",{aBlock:aBlock},$globals.Array)});
  1703. //>>excludeEnd("ctx");
  1704. },
  1705. //>>excludeStart("ide", pragmas.excludeIdeData);
  1706. args: ["aBlock"],
  1707. source: "trapDescend: aBlock\x0a\x09Trapped current descend: self snapshotDo: aBlock",
  1708. referencedClasses: ["Trapped"],
  1709. //>>excludeEnd("ide");
  1710. messageSends: ["descend:snapshotDo:", "current"]
  1711. }),
  1712. $globals.Array);
  1713. $core.addMethod(
  1714. $core.method({
  1715. selector: "trapIter:do:",
  1716. protocol: "*Trapped",
  1717. fn: function (path,aBlock){
  1718. var self=this,$self=this;
  1719. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1720. return $core.withContext(function($ctx1) {
  1721. //>>excludeEnd("ctx");
  1722. var $1;
  1723. $self._with_((function(html){
  1724. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1725. return $core.withContext(function($ctx2) {
  1726. //>>excludeEnd("ctx");
  1727. $1=$recv(html)._tag_("script");
  1728. $recv($1)._at_put_("type","application/x-beacon");
  1729. return $recv($1)._trapIter_after_(path,aBlock);
  1730. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1731. }, function($ctx2) {$ctx2.fillBlock({html:html},$ctx1,1)});
  1732. //>>excludeEnd("ctx");
  1733. }));
  1734. return self;
  1735. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1736. }, function($ctx1) {$ctx1.fill(self,"trapIter:do:",{path:path,aBlock:aBlock},$globals.HTMLCanvas)});
  1737. //>>excludeEnd("ctx");
  1738. },
  1739. //>>excludeStart("ide", pragmas.excludeIdeData);
  1740. args: ["path", "aBlock"],
  1741. source: "trapIter: path do: aBlock\x0a self with: [ :html | (html tag: 'script') at: 'type' put: 'application/x-beacon'; trapIter: path after: aBlock ]",
  1742. referencedClasses: [],
  1743. //>>excludeEnd("ide");
  1744. messageSends: ["with:", "at:put:", "tag:", "trapIter:after:"]
  1745. }),
  1746. $globals.HTMLCanvas);
  1747. $core.addMethod(
  1748. $core.method({
  1749. selector: "asTrapProcSendTo:",
  1750. protocol: "*Trapped",
  1751. fn: function (anObject){
  1752. var self=this,$self=this;
  1753. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1754. return $core.withContext(function($ctx1) {
  1755. //>>excludeEnd("ctx");
  1756. var $1;
  1757. $1=$recv("Trapped cannot use processor descriptor of ".__comma($recv($self._class())._name())).__comma(" type.");
  1758. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1759. $ctx1.sendIdx[","]=1;
  1760. //>>excludeEnd("ctx");
  1761. $self._error_($1);
  1762. return self;
  1763. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1764. }, function($ctx1) {$ctx1.fill(self,"asTrapProcSendTo:",{anObject:anObject},$globals.Object)});
  1765. //>>excludeEnd("ctx");
  1766. },
  1767. //>>excludeStart("ide", pragmas.excludeIdeData);
  1768. args: ["anObject"],
  1769. source: "asTrapProcSendTo: anObject\x0a\x09self error: 'Trapped cannot use processor descriptor of ', self class name, ' type.'",
  1770. referencedClasses: [],
  1771. //>>excludeEnd("ide");
  1772. messageSends: ["error:", ",", "name", "class"]
  1773. }),
  1774. $globals.Object);
  1775. $core.addMethod(
  1776. $core.method({
  1777. selector: "asTrapProcSendTo:",
  1778. protocol: "*Trapped",
  1779. fn: function (anObject){
  1780. var self=this,$self=this;
  1781. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1782. return $core.withContext(function($ctx1) {
  1783. //>>excludeEnd("ctx");
  1784. return $recv(anObject)._perform_(self);
  1785. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1786. }, function($ctx1) {$ctx1.fill(self,"asTrapProcSendTo:",{anObject:anObject},$globals.String)});
  1787. //>>excludeEnd("ctx");
  1788. },
  1789. //>>excludeStart("ide", pragmas.excludeIdeData);
  1790. args: ["anObject"],
  1791. source: "asTrapProcSendTo: anObject\x0a\x09^anObject perform: self",
  1792. referencedClasses: [],
  1793. //>>excludeEnd("ide");
  1794. messageSends: ["perform:"]
  1795. }),
  1796. $globals.String);
  1797. $core.addMethod(
  1798. $core.method({
  1799. selector: "trap:",
  1800. protocol: "*Trapped",
  1801. fn: function (path){
  1802. var self=this,$self=this;
  1803. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1804. return $core.withContext(function($ctx1) {
  1805. //>>excludeEnd("ctx");
  1806. $self._trap_processors_(path,[]);
  1807. return self;
  1808. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1809. }, function($ctx1) {$ctx1.fill(self,"trap:",{path:path},$globals.TagBrush)});
  1810. //>>excludeEnd("ctx");
  1811. },
  1812. //>>excludeStart("ide", pragmas.excludeIdeData);
  1813. args: ["path"],
  1814. source: "trap: path\x0a\x09self trap: path processors: #()",
  1815. referencedClasses: [],
  1816. //>>excludeEnd("ide");
  1817. messageSends: ["trap:processors:"]
  1818. }),
  1819. $globals.TagBrush);
  1820. $core.addMethod(
  1821. $core.method({
  1822. selector: "trap:processors:",
  1823. protocol: "*Trapped",
  1824. fn: function (path,anArray){
  1825. var self=this,$self=this;
  1826. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1827. return $core.withContext(function($ctx1) {
  1828. //>>excludeEnd("ctx");
  1829. $recv(path)._trapDescend_((function(snap){
  1830. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1831. return $core.withContext(function($ctx2) {
  1832. //>>excludeEnd("ctx");
  1833. return $recv($recv($globals.TrappedProcessingChain)._newFromProcessorSpecs_(anArray))._forSnapshot_andBrush_(snap,self);
  1834. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1835. }, function($ctx2) {$ctx2.fillBlock({snap:snap},$ctx1,1)});
  1836. //>>excludeEnd("ctx");
  1837. }));
  1838. return self;
  1839. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1840. }, function($ctx1) {$ctx1.fill(self,"trap:processors:",{path:path,anArray:anArray},$globals.TagBrush)});
  1841. //>>excludeEnd("ctx");
  1842. },
  1843. //>>excludeStart("ide", pragmas.excludeIdeData);
  1844. args: ["path", "anArray"],
  1845. source: "trap: path processors: anArray\x0a\x09path trapDescend: [ :snap |\x0a\x09\x09(TrappedProcessingChain newFromProcessorSpecs: anArray)\x0a\x09\x09\x09forSnapshot: snap andBrush: self ]",
  1846. referencedClasses: ["TrappedProcessingChain"],
  1847. //>>excludeEnd("ide");
  1848. messageSends: ["trapDescend:", "forSnapshot:andBrush:", "newFromProcessorSpecs:"]
  1849. }),
  1850. $globals.TagBrush);
  1851. $core.addMethod(
  1852. $core.method({
  1853. selector: "trap:read:",
  1854. protocol: "*Trapped",
  1855. fn: function (path,aBlock){
  1856. var self=this,$self=this;
  1857. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1858. return $core.withContext(function($ctx1) {
  1859. //>>excludeEnd("ctx");
  1860. var $1;
  1861. $recv(path)._trapDescend_((function(snap){
  1862. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1863. return $core.withContext(function($ctx2) {
  1864. //>>excludeEnd("ctx");
  1865. return $recv(snap)._watch_((function(data){
  1866. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1867. return $core.withContext(function($ctx3) {
  1868. //>>excludeEnd("ctx");
  1869. $1=$recv($recv($recv($self._asJQuery())._closest_("html"))._toArray())._isEmpty();
  1870. if($core.assert($1)){
  1871. $recv($globals.AxonOff)._signal();
  1872. }
  1873. return $recv(snap)._do_((function(){
  1874. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1875. return $core.withContext(function($ctx4) {
  1876. //>>excludeEnd("ctx");
  1877. return $self._with_((function(html){
  1878. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1879. return $core.withContext(function($ctx5) {
  1880. //>>excludeEnd("ctx");
  1881. return $recv(aBlock)._value_value_(data,html);
  1882. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1883. }, function($ctx5) {$ctx5.fillBlock({html:html},$ctx4,5)});
  1884. //>>excludeEnd("ctx");
  1885. }));
  1886. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1887. }, function($ctx4) {$ctx4.fillBlock({},$ctx3,4)});
  1888. //>>excludeEnd("ctx");
  1889. }));
  1890. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1891. }, function($ctx3) {$ctx3.fillBlock({data:data},$ctx2,2)});
  1892. //>>excludeEnd("ctx");
  1893. }));
  1894. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1895. }, function($ctx2) {$ctx2.fillBlock({snap:snap},$ctx1,1)});
  1896. //>>excludeEnd("ctx");
  1897. }));
  1898. return self;
  1899. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1900. }, function($ctx1) {$ctx1.fill(self,"trap:read:",{path:path,aBlock:aBlock},$globals.TagBrush)});
  1901. //>>excludeEnd("ctx");
  1902. },
  1903. //>>excludeStart("ide", pragmas.excludeIdeData);
  1904. args: ["path", "aBlock"],
  1905. source: "trap: path read: aBlock\x0a\x09path trapDescend: [ :snap |\x0a snap watch: [ :data |\x0a (self asJQuery closest: 'html') toArray isEmpty ifTrue: [ AxonOff signal ].\x0a \x09snap do: [ self with: [ :html | aBlock value: data value: html ] ]\x0a \x09]\x0a ]",
  1906. referencedClasses: ["AxonOff"],
  1907. //>>excludeEnd("ide");
  1908. messageSends: ["trapDescend:", "watch:", "ifTrue:", "isEmpty", "toArray", "closest:", "asJQuery", "signal", "do:", "with:", "value:value:"]
  1909. }),
  1910. $globals.TagBrush);
  1911. $core.addMethod(
  1912. $core.method({
  1913. selector: "trapGuard:contents:",
  1914. protocol: "*Trapped",
  1915. fn: function (anArray,aBlock){
  1916. var self=this,$self=this;
  1917. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1918. return $core.withContext(function($ctx1) {
  1919. //>>excludeEnd("ctx");
  1920. var $1,$2,$3,$4,$receiver;
  1921. []._trapDescend_((function(snap){
  1922. var shown;
  1923. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1924. return $core.withContext(function($ctx2) {
  1925. //>>excludeEnd("ctx");
  1926. shown=nil;
  1927. shown;
  1928. return $self._trap_read_(anArray,(function(gdata){
  1929. var sanitized;
  1930. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1931. return $core.withContext(function($ctx3) {
  1932. //>>excludeEnd("ctx");
  1933. if(($receiver = gdata) == null || $receiver.a$nil){
  1934. sanitized=false;
  1935. } else {
  1936. sanitized=gdata;
  1937. }
  1938. sanitized;
  1939. $1=$recv(shown).__eq(sanitized);
  1940. if(!$core.assert($1)){
  1941. shown=sanitized;
  1942. shown;
  1943. $2=shown;
  1944. if($core.assert($2)){
  1945. $recv(snap)._do_((function(){
  1946. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1947. return $core.withContext(function($ctx4) {
  1948. //>>excludeEnd("ctx");
  1949. return $self._contents_(aBlock);
  1950. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1951. }, function($ctx4) {$ctx4.fillBlock({},$ctx3,6)});
  1952. //>>excludeEnd("ctx");
  1953. }));
  1954. $3=$self._asJQuery();
  1955. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1956. $ctx3.sendIdx["asJQuery"]=1;
  1957. //>>excludeEnd("ctx");
  1958. return $recv($3)._show();
  1959. } else {
  1960. $4=$self._asJQuery();
  1961. $recv($4)._hide();
  1962. return $recv($4)._empty();
  1963. }
  1964. }
  1965. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1966. }, function($ctx3) {$ctx3.fillBlock({gdata:gdata,sanitized:sanitized},$ctx2,2)});
  1967. //>>excludeEnd("ctx");
  1968. }));
  1969. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1970. }, function($ctx2) {$ctx2.fillBlock({snap:snap,shown:shown},$ctx1,1)});
  1971. //>>excludeEnd("ctx");
  1972. }));
  1973. return self;
  1974. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1975. }, function($ctx1) {$ctx1.fill(self,"trapGuard:contents:",{anArray:anArray,aBlock:aBlock},$globals.TagBrush)});
  1976. //>>excludeEnd("ctx");
  1977. },
  1978. //>>excludeStart("ide", pragmas.excludeIdeData);
  1979. args: ["anArray", "aBlock"],
  1980. source: "trapGuard: anArray contents: aBlock\x0a\x09#() trapDescend: [ :snap |\x0a\x09 | shown |\x0a \x09shown := nil.\x0a\x09 self trap: anArray read: [ :gdata |\x0a\x09\x09\x09| sanitized |\x0a\x09\x09\x09sanitized := gdata ifNil: [ false ].\x0a \x09 shown = sanitized ifFalse: [\x0a \x09 shown := sanitized.\x0a \x09shown\x0a\x09\x09\x09\x09\x09ifTrue: [ snap do: [ self contents: aBlock ]. self asJQuery show ]\x0a\x09\x09\x09\x09\x09ifFalse: [ self asJQuery hide; empty ] ] ] ]",
  1981. referencedClasses: [],
  1982. //>>excludeEnd("ide");
  1983. messageSends: ["trapDescend:", "trap:read:", "ifNil:", "ifFalse:", "=", "ifTrue:ifFalse:", "do:", "contents:", "show", "asJQuery", "hide", "empty"]
  1984. }),
  1985. $globals.TagBrush);
  1986. $core.addMethod(
  1987. $core.method({
  1988. selector: "trapIter:after:",
  1989. protocol: "*Trapped",
  1990. fn: function (path,aBlock){
  1991. var self=this,$self=this;
  1992. var end;
  1993. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  1994. return $core.withContext(function($ctx1) {
  1995. //>>excludeEnd("ctx");
  1996. var $2,$1,$3;
  1997. end=$recv($globals.TagBrush)._fromJQuery_canvas_("<script type=\x22application/x-beacon\x22 />"._asJQuery(),$self["@canvas"]);
  1998. $2=$self._element();
  1999. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  2000. $ctx1.sendIdx["element"]=1;
  2001. //>>excludeEnd("ctx");
  2002. $1=$recv($2)._parentNode();
  2003. $3=$recv(end)._element();
  2004. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  2005. $ctx1.sendIdx["element"]=2;
  2006. //>>excludeEnd("ctx");
  2007. $recv($1)._insertBefore_reference_($3,$recv($self._element())._nextSibling());
  2008. $self._trap_read_(path,(function(model){
  2009. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  2010. return $core.withContext(function($ctx2) {
  2011. //>>excludeEnd("ctx");
  2012. return $recv($globals.Trapped)._loop_between_and_do_(model,self,end,aBlock);
  2013. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  2014. }, function($ctx2) {$ctx2.fillBlock({model:model},$ctx1,1)});
  2015. //>>excludeEnd("ctx");
  2016. }));
  2017. return self;
  2018. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  2019. }, function($ctx1) {$ctx1.fill(self,"trapIter:after:",{path:path,aBlock:aBlock,end:end},$globals.TagBrush)});
  2020. //>>excludeEnd("ctx");
  2021. },
  2022. //>>excludeStart("ide", pragmas.excludeIdeData);
  2023. args: ["path", "aBlock"],
  2024. source: "trapIter: path after: aBlock\x0a\x09| end |\x0a\x09end := TagBrush fromJQuery: ('<script type=\x22application/x-beacon\x22 />' asJQuery) canvas: canvas.\x0a\x09self element parentNode insertBefore: end element reference: self element nextSibling.\x0a self trap: path read: [ :model |\x0a \x09Trapped loop: model between: self and: end do: aBlock.\x0a ]",
  2025. referencedClasses: ["TagBrush", "Trapped"],
  2026. //>>excludeEnd("ide");
  2027. messageSends: ["fromJQuery:canvas:", "asJQuery", "insertBefore:reference:", "parentNode", "element", "nextSibling", "trap:read:", "loop:between:and:do:"]
  2028. }),
  2029. $globals.TagBrush);
  2030. });