|
|
@@ -1,13 +1,16 @@
|
|
|
+define("gh_herby_trapped/Trapped-Frontend", ["amber_vm/smalltalk", "amber_vm/nil", "amber_vm/_st", "amber/Kernel-Objects", "amber/Canvas", "amber/Kernel-Collections"], function(smalltalk,nil,_st){
|
|
|
smalltalk.addPackage('Trapped-Frontend');
|
|
|
+smalltalk.packages["Trapped-Frontend"].transport = {"type":"amd","amdNamespace":"gh_herby_trapped"};
|
|
|
+
|
|
|
smalltalk.addClass('TrappedBinder', smalltalk.Object, ['brush'], 'Trapped-Frontend');
|
|
|
smalltalk.addMethod(
|
|
|
-"_brush_",
|
|
|
smalltalk.method({
|
|
|
selector: "brush:",
|
|
|
category: 'accessing',
|
|
|
fn: function (aTagBrush){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
self["@brush"]=aTagBrush;
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+self["@brush"]=aTagBrush;
|
|
|
return self}, function($ctx1) {$ctx1.fill(self,"brush:",{aTagBrush:aTagBrush},smalltalk.TrappedBinder)})},
|
|
|
args: ["aTagBrush"],
|
|
|
source: "brush: aTagBrush\x0a\x09brush := aTagBrush",
|
|
|
@@ -17,13 +20,13 @@ referencedClasses: []
|
|
|
smalltalk.TrappedBinder);
|
|
|
|
|
|
smalltalk.addMethod(
|
|
|
-"_installFor_",
|
|
|
smalltalk.method({
|
|
|
selector: "installFor:",
|
|
|
category: 'action',
|
|
|
fn: function (path){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
_st(self["@brush"])._trap_read_(path,_st(self)._showBlock());
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+_st(self["@brush"])._trap_read_(path,self._showBlock());
|
|
|
return self}, function($ctx1) {$ctx1.fill(self,"installFor:",{path:path},smalltalk.TrappedBinder)})},
|
|
|
args: ["path"],
|
|
|
source: "installFor: path\x0a\x09brush trap: path read: self showBlock",
|
|
|
@@ -33,13 +36,13 @@ referencedClasses: []
|
|
|
smalltalk.TrappedBinder);
|
|
|
|
|
|
smalltalk.addMethod(
|
|
|
-"_prim_",
|
|
|
smalltalk.method({
|
|
|
selector: "prim:",
|
|
|
category: 'converting',
|
|
|
fn: function (anObject){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
return anObject.valueOf();
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+return anObject.valueOf();
|
|
|
return self}, function($ctx1) {$ctx1.fill(self,"prim:",{anObject:anObject},smalltalk.TrappedBinder)})},
|
|
|
args: ["anObject"],
|
|
|
source: "prim: anObject\x0a\x09<return anObject.valueOf()>",
|
|
|
@@ -49,21 +52,23 @@ referencedClasses: []
|
|
|
smalltalk.TrappedBinder);
|
|
|
|
|
|
smalltalk.addMethod(
|
|
|
-"_showBlock",
|
|
|
smalltalk.method({
|
|
|
selector: "showBlock",
|
|
|
category: 'action',
|
|
|
fn: function (){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
var $2,$4,$6,$5,$3,$1;
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+var $2,$4,$6,$5,$3,$1;
|
|
|
$1=(function(model){
|
|
|
-return smalltalk.withContext(function($ctx2) {
$2=self["@brush"];
|
|
|
+return smalltalk.withContext(function($ctx2) {
|
|
|
+$2=self["@brush"];
|
|
|
_st($2)._empty();
|
|
|
$4=$2;
|
|
|
$6=model;
|
|
|
if(($receiver = $6) == nil || $receiver == undefined){
|
|
|
$5=(function(){
|
|
|
-return smalltalk.withContext(function($ctx3) {
}, function($ctx3) {$ctx3.fillBlock({},$ctx1)})});
|
|
|
+return smalltalk.withContext(function($ctx3) {
|
|
|
+}, function($ctx3) {$ctx3.fillBlock({},$ctx2)})});
|
|
|
} else {
|
|
|
$5=$6;
|
|
|
};
|
|
|
@@ -83,19 +88,22 @@ smalltalk.TrappedBinder);
|
|
|
|
|
|
smalltalk.addClass('TrappedCheckedBinder', smalltalk.TrappedBinder, [], 'Trapped-Frontend');
|
|
|
smalltalk.addMethod(
|
|
|
-"_installFor_",
|
|
|
smalltalk.method({
|
|
|
selector: "installFor:",
|
|
|
category: 'action',
|
|
|
fn: function (path){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
smalltalk.TrappedBinder.fn.prototype._installFor_.apply(_st(self), [path]);
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+smalltalk.TrappedCheckedBinder.superclass.fn.prototype._installFor_.apply(_st(self), [path]);
|
|
|
_st(path)._trapDescend_((function(snap){
|
|
|
-return smalltalk.withContext(function($ctx2) {
return _st(self["@brush"])._onChange_((function(){
|
|
|
-return smalltalk.withContext(function($ctx3) {
return _st(snap)._modify_((function(){
|
|
|
-return smalltalk.withContext(function($ctx4) {
return _st(_st(_st(self["@brush"])._asJQuery())._attr_("checked"))._notNil();
|
|
|
-}, function($ctx4) {$ctx4.fillBlock({},$ctx1)})}));
|
|
|
-}, function($ctx3) {$ctx3.fillBlock({},$ctx1)})}));
|
|
|
+return smalltalk.withContext(function($ctx2) {
|
|
|
+return _st(self["@brush"])._onChange_((function(){
|
|
|
+return smalltalk.withContext(function($ctx3) {
|
|
|
+return _st(snap)._modify_((function(){
|
|
|
+return smalltalk.withContext(function($ctx4) {
|
|
|
+return _st(_st(_st(self["@brush"])._asJQuery())._attr_("checked"))._notNil();
|
|
|
+}, function($ctx4) {$ctx4.fillBlock({},$ctx3)})}));
|
|
|
+}, function($ctx3) {$ctx3.fillBlock({},$ctx2)})}));
|
|
|
}, function($ctx2) {$ctx2.fillBlock({snap:snap},$ctx1)})}));
|
|
|
return self}, function($ctx1) {$ctx1.fill(self,"installFor:",{path:path},smalltalk.TrappedCheckedBinder)})},
|
|
|
args: ["path"],
|
|
|
@@ -106,19 +114,23 @@ referencedClasses: []
|
|
|
smalltalk.TrappedCheckedBinder);
|
|
|
|
|
|
smalltalk.addMethod(
|
|
|
-"_showBlock",
|
|
|
smalltalk.method({
|
|
|
selector: "showBlock",
|
|
|
category: 'action',
|
|
|
fn: function (){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
var $1;
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+var $2,$4,$3,$1;
|
|
|
$1=(function(model){
|
|
|
-return smalltalk.withContext(function($ctx2) {
return _st(_st(self["@brush"])._asJQuery())._attr_put_("checked",_st(model)._ifNotNil_ifNil_((function(){
|
|
|
-return smalltalk.withContext(function($ctx3) {
return _st(self)._prim_(model);
|
|
|
-}, function($ctx3) {$ctx3.fillBlock({},$ctx1)})}),(function(){
|
|
|
-return smalltalk.withContext(function($ctx3) {
return false;
|
|
|
-}, function($ctx3) {$ctx3.fillBlock({},$ctx1)})})));
|
|
|
+return smalltalk.withContext(function($ctx2) {
|
|
|
+$2=_st(self["@brush"])._asJQuery();
|
|
|
+$4=model;
|
|
|
+if(($receiver = $4) == nil || $receiver == undefined){
|
|
|
+$3=false;
|
|
|
+} else {
|
|
|
+$3=self._prim_(model);
|
|
|
+};
|
|
|
+return _st($2)._attr_put_("checked",$3);
|
|
|
}, function($ctx2) {$ctx2.fillBlock({model:model},$ctx1)})});
|
|
|
return $1;
|
|
|
}, function($ctx1) {$ctx1.fill(self,"showBlock",{},smalltalk.TrappedCheckedBinder)})},
|
|
|
@@ -133,19 +145,22 @@ smalltalk.TrappedCheckedBinder);
|
|
|
|
|
|
smalltalk.addClass('TrappedValBinder', smalltalk.TrappedBinder, [], 'Trapped-Frontend');
|
|
|
smalltalk.addMethod(
|
|
|
-"_installFor_",
|
|
|
smalltalk.method({
|
|
|
selector: "installFor:",
|
|
|
category: 'action',
|
|
|
fn: function (path){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
smalltalk.TrappedBinder.fn.prototype._installFor_.apply(_st(self), [path]);
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+smalltalk.TrappedValBinder.superclass.fn.prototype._installFor_.apply(_st(self), [path]);
|
|
|
_st(path)._trapDescend_((function(snap){
|
|
|
-return smalltalk.withContext(function($ctx2) {
return _st(self["@brush"])._onChange_((function(){
|
|
|
-return smalltalk.withContext(function($ctx3) {
return _st(snap)._modify_((function(){
|
|
|
-return smalltalk.withContext(function($ctx4) {
return _st(_st(self["@brush"])._asJQuery())._val();
|
|
|
-}, function($ctx4) {$ctx4.fillBlock({},$ctx1)})}));
|
|
|
-}, function($ctx3) {$ctx3.fillBlock({},$ctx1)})}));
|
|
|
+return smalltalk.withContext(function($ctx2) {
|
|
|
+return _st(self["@brush"])._onChange_((function(){
|
|
|
+return smalltalk.withContext(function($ctx3) {
|
|
|
+return _st(snap)._modify_((function(){
|
|
|
+return smalltalk.withContext(function($ctx4) {
|
|
|
+return _st(_st(self["@brush"])._asJQuery())._val();
|
|
|
+}, function($ctx4) {$ctx4.fillBlock({},$ctx3)})}));
|
|
|
+}, function($ctx3) {$ctx3.fillBlock({},$ctx2)})}));
|
|
|
}, function($ctx2) {$ctx2.fillBlock({snap:snap},$ctx1)})}));
|
|
|
return self}, function($ctx1) {$ctx1.fill(self,"installFor:",{path:path},smalltalk.TrappedValBinder)})},
|
|
|
args: ["path"],
|
|
|
@@ -156,20 +171,25 @@ referencedClasses: []
|
|
|
smalltalk.TrappedValBinder);
|
|
|
|
|
|
smalltalk.addMethod(
|
|
|
-"_showBlock",
|
|
|
smalltalk.method({
|
|
|
selector: "showBlock",
|
|
|
category: 'action',
|
|
|
fn: function (){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
var $1;
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+var $2,$4,$3,$1;
|
|
|
$1=(function(model){
|
|
|
-return smalltalk.withContext(function($ctx2) {
return _st(_st(self["@brush"])._asJQuery())._val_(_st(model)._ifNotNil_ifNil_((function(){
|
|
|
-return smalltalk.withContext(function($ctx3) {
return _st(self)._prim_(model);
|
|
|
-}, function($ctx3) {$ctx3.fillBlock({},$ctx1)})}),(function(){
|
|
|
-return smalltalk.withContext(function($ctx3) {
return (function(){
|
|
|
-return smalltalk.withContext(function($ctx4) {
}, function($ctx4) {$ctx4.fillBlock({},$ctx1)})});
|
|
|
-}, function($ctx3) {$ctx3.fillBlock({},$ctx1)})})));
|
|
|
+return smalltalk.withContext(function($ctx2) {
|
|
|
+$2=_st(self["@brush"])._asJQuery();
|
|
|
+$4=model;
|
|
|
+if(($receiver = $4) == nil || $receiver == undefined){
|
|
|
+$3=(function(){
|
|
|
+return smalltalk.withContext(function($ctx3) {
|
|
|
+}, function($ctx3) {$ctx3.fillBlock({},$ctx2)})});
|
|
|
+} else {
|
|
|
+$3=self._prim_(model);
|
|
|
+};
|
|
|
+return _st($2)._val_($3);
|
|
|
}, function($ctx2) {$ctx2.fillBlock({model:model},$ctx1)})});
|
|
|
return $1;
|
|
|
}, function($ctx1) {$ctx1.fill(self,"showBlock",{},smalltalk.TrappedValBinder)})},
|
|
|
@@ -183,15 +203,15 @@ smalltalk.TrappedValBinder);
|
|
|
|
|
|
|
|
|
smalltalk.addClass('TrappedDumbView', smalltalk.Widget, [], 'Trapped-Frontend');
|
|
|
-smalltalk.TrappedDumbView.comment="I just read and show an actual path."
|
|
|
+smalltalk.TrappedDumbView.comment="I just read and show an actual path.";
|
|
|
smalltalk.addMethod(
|
|
|
-"_renderOn_",
|
|
|
smalltalk.method({
|
|
|
selector: "renderOn:",
|
|
|
category: 'rendering',
|
|
|
fn: function (html){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
_st(_st(html)._root())._trap_([]);
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+_st(_st(html)._root())._trap_([]);
|
|
|
return self}, function($ctx1) {$ctx1.fill(self,"renderOn:",{html:html},smalltalk.TrappedDumbView)})},
|
|
|
args: ["html"],
|
|
|
source: "renderOn: html\x0a\x09html root trap: #()",
|
|
|
@@ -204,14 +224,14 @@ smalltalk.TrappedDumbView);
|
|
|
|
|
|
smalltalk.addClass('TrappedSingleton', smalltalk.Object, [], 'Trapped-Frontend');
|
|
|
smalltalk.addMethod(
|
|
|
-"_start_",
|
|
|
smalltalk.method({
|
|
|
selector: "start:",
|
|
|
category: 'action',
|
|
|
fn: function (args){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
var $1;
|
|
|
-$1=_st(self)._subclassResponsibility();
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+var $1;
|
|
|
+$1=self._subclassResponsibility();
|
|
|
return $1;
|
|
|
}, function($ctx1) {$ctx1.fill(self,"start:",{args:args},smalltalk.TrappedSingleton)})},
|
|
|
args: ["args"],
|
|
|
@@ -224,16 +244,16 @@ smalltalk.TrappedSingleton);
|
|
|
|
|
|
smalltalk.TrappedSingleton.klass.iVarNames = ['current'];
|
|
|
smalltalk.addMethod(
|
|
|
-"_current",
|
|
|
smalltalk.method({
|
|
|
selector: "current",
|
|
|
category: 'accessing',
|
|
|
fn: function (){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
var $2,$1;
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+var $2,$1;
|
|
|
$2=self["@current"];
|
|
|
if(($receiver = $2) == nil || $receiver == undefined){
|
|
|
-self["@current"]=_st(self)._new();
|
|
|
+self["@current"]=self._new();
|
|
|
$1=self["@current"];
|
|
|
} else {
|
|
|
$1=$2;
|
|
|
@@ -248,13 +268,13 @@ referencedClasses: []
|
|
|
smalltalk.TrappedSingleton.klass);
|
|
|
|
|
|
smalltalk.addMethod(
|
|
|
-"_start_",
|
|
|
smalltalk.method({
|
|
|
selector: "start:",
|
|
|
category: 'action',
|
|
|
fn: function (args){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
_st(_st(self)._current())._start_(args);
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+_st(self._current())._start_(args);
|
|
|
return self}, function($ctx1) {$ctx1.fill(self,"start:",{args:args},smalltalk.TrappedSingleton.klass)})},
|
|
|
args: ["args"],
|
|
|
source: "start: args\x0a\x09self current start: args",
|
|
|
@@ -266,33 +286,37 @@ smalltalk.TrappedSingleton.klass);
|
|
|
|
|
|
smalltalk.addClass('Trapped', smalltalk.TrappedSingleton, ['registry'], 'Trapped-Frontend');
|
|
|
smalltalk.addMethod(
|
|
|
-"_binder_",
|
|
|
smalltalk.method({
|
|
|
selector: "binder:",
|
|
|
category: 'binders',
|
|
|
fn: function (aTagBrush){
|
|
|
var self=this;
|
|
|
var binder,tag;
|
|
|
-return smalltalk.withContext(function($ctx1) {
var $1,$2,$3,$4,$6,$7,$5;
|
|
|
+function $TrappedCheckedBinder(){return smalltalk.TrappedCheckedBinder||(typeof TrappedCheckedBinder=="undefined"?nil:TrappedCheckedBinder)}
|
|
|
+function $TrappedValBinder(){return smalltalk.TrappedValBinder||(typeof TrappedValBinder=="undefined"?nil:TrappedValBinder)}
|
|
|
+function $TrappedBinder(){return smalltalk.TrappedBinder||(typeof TrappedBinder=="undefined"?nil:TrappedBinder)}
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+var $1,$2,$3,$4,$6,$7,$5;
|
|
|
tag=_st(_st(aTagBrush)._element())._nodeName();
|
|
|
$1=_st(tag).__eq("INPUT");
|
|
|
if(smalltalk.assert($1)){
|
|
|
+var type;
|
|
|
type=_st(_st(aTagBrush)._asJQuery())._attr_("type");
|
|
|
type;
|
|
|
$2=_st(type).__eq("checkbox");
|
|
|
if(smalltalk.assert($2)){
|
|
|
-binder=_st((smalltalk.TrappedCheckedBinder || TrappedCheckedBinder))._new();
|
|
|
+binder=_st($TrappedCheckedBinder())._new();
|
|
|
binder;
|
|
|
};
|
|
|
$3=_st(type).__eq("text");
|
|
|
if(smalltalk.assert($3)){
|
|
|
-binder=_st((smalltalk.TrappedValBinder || TrappedValBinder))._new();
|
|
|
+binder=_st($TrappedValBinder())._new();
|
|
|
binder;
|
|
|
};
|
|
|
};
|
|
|
$4=binder;
|
|
|
if(($receiver = $4) == nil || $receiver == undefined){
|
|
|
-binder=_st((smalltalk.TrappedBinder || TrappedBinder))._new();
|
|
|
+binder=_st($TrappedBinder())._new();
|
|
|
binder;
|
|
|
} else {
|
|
|
$4;
|
|
|
@@ -311,13 +335,13 @@ referencedClasses: ["TrappedCheckedBinder", "TrappedValBinder", "TrappedBinder"]
|
|
|
smalltalk.Trapped);
|
|
|
|
|
|
smalltalk.addMethod(
|
|
|
-"_byName_",
|
|
|
smalltalk.method({
|
|
|
selector: "byName:",
|
|
|
category: 'accessing',
|
|
|
fn: function (aString){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
var $1;
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+var $1;
|
|
|
$1=_st(self["@registry"])._at_(aString);
|
|
|
return $1;
|
|
|
}, function($ctx1) {$ctx1.fill(self,"byName:",{aString:aString},smalltalk.Trapped)})},
|
|
|
@@ -329,21 +353,24 @@ referencedClasses: []
|
|
|
smalltalk.Trapped);
|
|
|
|
|
|
smalltalk.addMethod(
|
|
|
-"_descend_snapshotDo_",
|
|
|
smalltalk.method({
|
|
|
selector: "descend:snapshotDo:",
|
|
|
category: 'action',
|
|
|
fn: function (anArray,aBlock){
|
|
|
var self=this;
|
|
|
var tpsc;
|
|
|
-return smalltalk.withContext(function($ctx1) {
tpsc=_st((smalltalk.TrappedPathStack || TrappedPathStack))._current();
|
|
|
+function $TrappedPathStack(){return smalltalk.TrappedPathStack||(typeof TrappedPathStack=="undefined"?nil:TrappedPathStack)}
|
|
|
+function $TrappedSnapshot(){return smalltalk.TrappedSnapshot||(typeof TrappedSnapshot=="undefined"?nil:TrappedSnapshot)}
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+tpsc=_st($TrappedPathStack())._current();
|
|
|
_st(tpsc)._append_do_(anArray,(function(){
|
|
|
var path,model;
|
|
|
-return smalltalk.withContext(function($ctx2) {
path=_st(_st(tpsc)._elements())._copy();
|
|
|
+return smalltalk.withContext(function($ctx2) {
|
|
|
+path=_st(_st(tpsc)._elements())._copy();
|
|
|
path;
|
|
|
-model=_st(self)._byName_(_st(path)._first());
|
|
|
+model=self._byName_(_st(path)._first());
|
|
|
model;
|
|
|
-return _st(aBlock)._value_(_st(_st((smalltalk.TrappedSnapshot || TrappedSnapshot))._new())._path_model_(path,model));
|
|
|
+return _st(aBlock)._value_(_st(_st($TrappedSnapshot())._new())._path_model_(path,model));
|
|
|
}, function($ctx2) {$ctx2.fillBlock({path:path,model:model},$ctx1)})}));
|
|
|
return self}, function($ctx1) {$ctx1.fill(self,"descend:snapshotDo:",{anArray:anArray,aBlock:aBlock,tpsc:tpsc},smalltalk.Trapped)})},
|
|
|
args: ["anArray", "aBlock"],
|
|
|
@@ -354,14 +381,14 @@ referencedClasses: ["TrappedPathStack", "TrappedSnapshot"]
|
|
|
smalltalk.Trapped);
|
|
|
|
|
|
smalltalk.addMethod(
|
|
|
-"_initialize",
|
|
|
smalltalk.method({
|
|
|
selector: "initialize",
|
|
|
category: 'initialization',
|
|
|
fn: function (){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
smalltalk.TrappedSingleton.fn.prototype._initialize.apply(_st(self), []);
|
|
|
-self["@registry"]=smalltalk.HashedCollection._fromPairs_([]);
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+smalltalk.Trapped.superclass.fn.prototype._initialize.apply(_st(self), []);
|
|
|
+self["@registry"]=smalltalk.HashedCollection._from_([]);
|
|
|
return self}, function($ctx1) {$ctx1.fill(self,"initialize",{},smalltalk.Trapped)})},
|
|
|
args: [],
|
|
|
source: "initialize\x0a\x09super initialize.\x0a\x09registry := #{}.",
|
|
|
@@ -371,13 +398,13 @@ referencedClasses: []
|
|
|
smalltalk.Trapped);
|
|
|
|
|
|
smalltalk.addMethod(
|
|
|
-"_register_",
|
|
|
smalltalk.method({
|
|
|
selector: "register:",
|
|
|
category: 'accessing',
|
|
|
fn: function (aListKeyedEntity){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
_st(self)._register_name_(aListKeyedEntity,_st(_st(aListKeyedEntity)._class())._name());
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+self._register_name_(aListKeyedEntity,_st(_st(aListKeyedEntity)._class())._name());
|
|
|
return self}, function($ctx1) {$ctx1.fill(self,"register:",{aListKeyedEntity:aListKeyedEntity},smalltalk.Trapped)})},
|
|
|
args: ["aListKeyedEntity"],
|
|
|
source: "register: aListKeyedEntity\x0a\x09self register: aListKeyedEntity name: aListKeyedEntity class name",
|
|
|
@@ -387,13 +414,13 @@ referencedClasses: []
|
|
|
smalltalk.Trapped);
|
|
|
|
|
|
smalltalk.addMethod(
|
|
|
-"_register_name_",
|
|
|
smalltalk.method({
|
|
|
selector: "register:name:",
|
|
|
category: 'accessing',
|
|
|
fn: function (aListKeyedEntity,aString){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
_st(self["@registry"])._at_put_(aString,aListKeyedEntity);
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+_st(self["@registry"])._at_put_(aString,aListKeyedEntity);
|
|
|
return self}, function($ctx1) {$ctx1.fill(self,"register:name:",{aListKeyedEntity:aListKeyedEntity,aString:aString},smalltalk.Trapped)})},
|
|
|
args: ["aListKeyedEntity", "aString"],
|
|
|
source: "register: aListKeyedEntity name: aString\x0a\x09registry at: aString put: aListKeyedEntity",
|
|
|
@@ -403,19 +430,23 @@ referencedClasses: []
|
|
|
smalltalk.Trapped);
|
|
|
|
|
|
smalltalk.addMethod(
|
|
|
-"_start_",
|
|
|
smalltalk.method({
|
|
|
selector: "start:",
|
|
|
category: 'action',
|
|
|
fn: function (args){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
var $1;
|
|
|
+function $Trapped(){return smalltalk.Trapped||(typeof Trapped=="undefined"?nil:Trapped)}
|
|
|
+function $Smalltalk(){return smalltalk.Smalltalk||(typeof Smalltalk=="undefined"?nil:Smalltalk)}
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+var $1;
|
|
|
_st(args)._do_((function(each){
|
|
|
-return smalltalk.withContext(function($ctx2) {
return _st(self)._register_(each);
|
|
|
+return smalltalk.withContext(function($ctx2) {
|
|
|
+return self._register_(each);
|
|
|
}, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1)})}));
|
|
|
-_st(_st("[data-trap]")._asJQuery())._each_((function(index,elem){
|
|
|
+_st("[data-trap]"._asJQuery())._each_((function(index,elem){
|
|
|
var trap,jq,viewName,modelName,tokens,path;
|
|
|
-return smalltalk.withContext(function($ctx2) {
jq=_st(elem)._asJQuery();
|
|
|
+return smalltalk.withContext(function($ctx2) {
|
|
|
+jq=_st(elem)._asJQuery();
|
|
|
jq;
|
|
|
trap=_st(jq)._attr_("data-trap");
|
|
|
trap;
|
|
|
@@ -429,16 +460,18 @@ tokens;
|
|
|
viewName=_st(tokens)._first();
|
|
|
viewName;
|
|
|
tokens=_st(_st(_st(tokens)._second())._tokenize_(" "))._select_((function(each){
|
|
|
-return smalltalk.withContext(function($ctx3) {
return _st(each)._notEmpty();
|
|
|
-}, function($ctx3) {$ctx3.fillBlock({each:each},$ctx1)})}));
|
|
|
+return smalltalk.withContext(function($ctx3) {
|
|
|
+return _st(each)._notEmpty();
|
|
|
+}, function($ctx3) {$ctx3.fillBlock({each:each},$ctx2)})}));
|
|
|
tokens;
|
|
|
modelName=_st(tokens)._first();
|
|
|
modelName;
|
|
|
-path=_st((smalltalk.Trapped || Trapped))._parse_(_st(tokens)._allButFirst());
|
|
|
+path=_st($Trapped())._parse_(_st(tokens)._allButFirst());
|
|
|
path;
|
|
|
return _st(_st([modelName]).__comma(path))._trapDescend_((function(){
|
|
|
-return smalltalk.withContext(function($ctx3) {
return _st(_st(_st(_st((smalltalk.Smalltalk || Smalltalk))._current())._at_(viewName))._new())._appendToJQuery_(jq);
|
|
|
-}, function($ctx3) {$ctx3.fillBlock({},$ctx1)})}));
|
|
|
+return smalltalk.withContext(function($ctx3) {
|
|
|
+return _st(_st(_st(_st($Smalltalk())._current())._at_(viewName))._new())._appendToJQuery_(jq);
|
|
|
+}, function($ctx3) {$ctx3.fillBlock({},$ctx2)})}));
|
|
|
}, function($ctx2) {$ctx2.fillBlock({index:index,elem:elem,trap:trap,jq:jq,viewName:viewName,modelName:modelName,tokens:tokens,path:path},$ctx1)})}));
|
|
|
return self}, function($ctx1) {$ctx1.fill(self,"start:",{args:args},smalltalk.Trapped)})},
|
|
|
args: ["args"],
|
|
|
@@ -450,56 +483,58 @@ smalltalk.Trapped);
|
|
|
|
|
|
|
|
|
smalltalk.addMethod(
|
|
|
-"_envelope_loop_before_tag_do_",
|
|
|
smalltalk.method({
|
|
|
selector: "envelope:loop:before:tag:do:",
|
|
|
category: 'private',
|
|
|
fn: function (envelope,model,endjq,aSymbol,aBlock){
|
|
|
var self=this;
|
|
|
var envjq;
|
|
|
-return smalltalk.withContext(function($ctx1) {
envjq=_st(envelope)._asJQuery();
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+envjq=_st(envelope)._asJQuery();
|
|
|
_st(model)._withIndexDo_((function(item,i){
|
|
|
-return smalltalk.withContext(function($ctx2) {
_st(envelope)._with_((function(html){
|
|
|
-return smalltalk.withContext(function($ctx3) {
return _st(_st(html)._perform_(aSymbol))._trap_read_([i],aBlock);
|
|
|
-}, function($ctx3) {$ctx3.fillBlock({html:html},$ctx1)})}));
|
|
|
+return smalltalk.withContext(function($ctx2) {
|
|
|
+_st(envelope)._with_((function(html){
|
|
|
+return smalltalk.withContext(function($ctx3) {
|
|
|
+return _st(_st(html)._perform_(aSymbol))._trap_read_([i],aBlock);
|
|
|
+}, function($ctx3) {$ctx3.fillBlock({html:html},$ctx2)})}));
|
|
|
return _st(_st(_st(envjq)._children())._detach())._insertBefore_(endjq);
|
|
|
}, function($ctx2) {$ctx2.fillBlock({item:item,i:i},$ctx1)})}));
|
|
|
_st(envjq)._remove();
|
|
|
return self}, function($ctx1) {$ctx1.fill(self,"envelope:loop:before:tag:do:",{envelope:envelope,model:model,endjq:endjq,aSymbol:aSymbol,aBlock:aBlock,envjq:envjq},smalltalk.Trapped.klass)})},
|
|
|
args: ["envelope", "model", "endjq", "aSymbol", "aBlock"],
|
|
|
-source: "envelope: envelope loop: model before: endjq tag: aSymbol do: aBlock\x0a \x09| envjq |\x0a envjq := envelope asJQuery.\x0a model withIndexDo: [ :item :i |\x0a envelope with: [ :html | (html perform: aSymbol) trap: {i} read: aBlock ].\x0a envjq children detach insertBefore: endjq.\x0a ].\x0a envjq remove\x0a",
|
|
|
+source: "envelope: envelope loop: model before: endjq tag: aSymbol do: aBlock\x0a \x09| envjq |\x0a envjq := envelope asJQuery.\x0a model withIndexDo: [ :item :i |\x0a envelope with: [ :html | (html perform: aSymbol) trap: {i} read: aBlock ].\x0a envjq children detach insertBefore: endjq.\x0a ].\x0a envjq remove",
|
|
|
messageSends: ["asJQuery", "withIndexDo:", "with:", "trap:read:", "perform:", "insertBefore:", "detach", "children", "remove"],
|
|
|
referencedClasses: []
|
|
|
}),
|
|
|
smalltalk.Trapped.klass);
|
|
|
|
|
|
smalltalk.addMethod(
|
|
|
-"_loop_between_and_tag_do_",
|
|
|
smalltalk.method({
|
|
|
selector: "loop:between:and:tag:do:",
|
|
|
category: 'private',
|
|
|
fn: function (model,start,end,aSymbol,aBlock){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
var $1;
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+var $1;
|
|
|
_st(_st(_st(start)._asJQuery())._nextUntil_(_st(end)._element()))._remove();
|
|
|
_st(start)._with_((function(html){
|
|
|
-return smalltalk.withContext(function($ctx2) {
$1=model;
|
|
|
+return smalltalk.withContext(function($ctx2) {
|
|
|
+$1=model;
|
|
|
if(($receiver = $1) == nil || $receiver == undefined){
|
|
|
return $1;
|
|
|
} else {
|
|
|
-return _st(self)._envelope_loop_before_tag_do_(_st(html)._div(),model,_st(end)._asJQuery(),aSymbol,aBlock);
|
|
|
+return self._envelope_loop_before_tag_do_(_st(html)._div(),model,_st(end)._asJQuery(),aSymbol,aBlock);
|
|
|
};
|
|
|
}, function($ctx2) {$ctx2.fillBlock({html:html},$ctx1)})}));
|
|
|
return self}, function($ctx1) {$ctx1.fill(self,"loop:between:and:tag:do:",{model:model,start:start,end:end,aSymbol:aSymbol,aBlock:aBlock},smalltalk.Trapped.klass)})},
|
|
|
args: ["model", "start", "end", "aSymbol", "aBlock"],
|
|
|
-source: "loop: model between: start and: end tag: aSymbol do: aBlock\x0a (start asJQuery nextUntil: end element) remove.\x0a start with: [ :html | model ifNotNil: [\x0a \x09self envelope: html div loop: model before: end asJQuery tag: aSymbol do: aBlock\x0a\x09]]\x0a",
|
|
|
+source: "loop: model between: start and: end tag: aSymbol do: aBlock\x0a (start asJQuery nextUntil: end element) remove.\x0a start with: [ :html | model ifNotNil: [\x0a \x09self envelope: html div loop: model before: end asJQuery tag: aSymbol do: aBlock\x0a\x09]]",
|
|
|
messageSends: ["remove", "nextUntil:", "element", "asJQuery", "with:", "ifNotNil:", "envelope:loop:before:tag:do:", "div"],
|
|
|
referencedClasses: []
|
|
|
}),
|
|
|
smalltalk.Trapped.klass);
|
|
|
|
|
|
smalltalk.addMethod(
|
|
|
-"_parse_",
|
|
|
smalltalk.method({
|
|
|
selector: "parse:",
|
|
|
category: 'accessing',
|
|
|
@@ -536,13 +571,13 @@ smalltalk.Trapped.klass);
|
|
|
|
|
|
smalltalk.addClass('TrappedPathStack', smalltalk.TrappedSingleton, ['elements'], 'Trapped-Frontend');
|
|
|
smalltalk.addMethod(
|
|
|
-"_append_do_",
|
|
|
smalltalk.method({
|
|
|
selector: "append:do:",
|
|
|
category: 'descending',
|
|
|
fn: function (anArray,aBlock){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
_st(self)._with_do_(_st(self["@elements"]).__comma(anArray),aBlock);
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+self._with_do_(_st(self["@elements"]).__comma(anArray),aBlock);
|
|
|
return self}, function($ctx1) {$ctx1.fill(self,"append:do:",{anArray:anArray,aBlock:aBlock},smalltalk.TrappedPathStack)})},
|
|
|
args: ["anArray", "aBlock"],
|
|
|
source: "append: anArray do: aBlock\x0a self with: elements, anArray do: aBlock",
|
|
|
@@ -552,13 +587,13 @@ referencedClasses: []
|
|
|
smalltalk.TrappedPathStack);
|
|
|
|
|
|
smalltalk.addMethod(
|
|
|
-"_elements",
|
|
|
smalltalk.method({
|
|
|
selector: "elements",
|
|
|
category: 'accessing',
|
|
|
fn: function (){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
var $1;
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+var $1;
|
|
|
$1=self["@elements"];
|
|
|
return $1;
|
|
|
}, function($ctx1) {$ctx1.fill(self,"elements",{},smalltalk.TrappedPathStack)})},
|
|
|
@@ -570,13 +605,13 @@ referencedClasses: []
|
|
|
smalltalk.TrappedPathStack);
|
|
|
|
|
|
smalltalk.addMethod(
|
|
|
-"_initialize",
|
|
|
smalltalk.method({
|
|
|
selector: "initialize",
|
|
|
category: 'initialization',
|
|
|
fn: function (){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
smalltalk.TrappedSingleton.fn.prototype._initialize.apply(_st(self), []);
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+smalltalk.TrappedPathStack.superclass.fn.prototype._initialize.apply(_st(self), []);
|
|
|
self["@elements"]=[];
|
|
|
return self}, function($ctx1) {$ctx1.fill(self,"initialize",{},smalltalk.TrappedPathStack)})},
|
|
|
args: [],
|
|
|
@@ -587,20 +622,22 @@ referencedClasses: []
|
|
|
smalltalk.TrappedPathStack);
|
|
|
|
|
|
smalltalk.addMethod(
|
|
|
-"_with_do_",
|
|
|
smalltalk.method({
|
|
|
selector: "with:do:",
|
|
|
category: 'descending',
|
|
|
fn: function (anArray,aBlock){
|
|
|
var self=this;
|
|
|
var old;
|
|
|
-return smalltalk.withContext(function($ctx1) {
old=self["@elements"];
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+old=self["@elements"];
|
|
|
_st((function(){
|
|
|
-return smalltalk.withContext(function($ctx2) {
self["@elements"]=anArray;
|
|
|
+return smalltalk.withContext(function($ctx2) {
|
|
|
+self["@elements"]=anArray;
|
|
|
self["@elements"];
|
|
|
return _st(aBlock)._value();
|
|
|
}, function($ctx2) {$ctx2.fillBlock({},$ctx1)})}))._ensure_((function(){
|
|
|
-return smalltalk.withContext(function($ctx2) {
self["@elements"]=old;
|
|
|
+return smalltalk.withContext(function($ctx2) {
|
|
|
+self["@elements"]=old;
|
|
|
return self["@elements"];
|
|
|
}, function($ctx2) {$ctx2.fillBlock({},$ctx1)})}));
|
|
|
return self}, function($ctx1) {$ctx1.fill(self,"with:do:",{anArray:anArray,aBlock:aBlock,old:old},smalltalk.TrappedPathStack)})},
|
|
|
@@ -615,14 +652,16 @@ smalltalk.TrappedPathStack);
|
|
|
|
|
|
smalltalk.addClass('TrappedSnapshot', smalltalk.Object, ['path', 'model'], 'Trapped-Frontend');
|
|
|
smalltalk.addMethod(
|
|
|
-"_do_",
|
|
|
smalltalk.method({
|
|
|
selector: "do:",
|
|
|
category: 'action',
|
|
|
fn: function (aBlock){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
_st(_st((smalltalk.TrappedPathStack || TrappedPathStack))._current())._with_do_(self["@path"],(function(){
|
|
|
-return smalltalk.withContext(function($ctx2) {
return _st(aBlock)._value_(self["@model"]);
|
|
|
+function $TrappedPathStack(){return smalltalk.TrappedPathStack||(typeof TrappedPathStack=="undefined"?nil:TrappedPathStack)}
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+_st(_st($TrappedPathStack())._current())._with_do_(self["@path"],(function(){
|
|
|
+return smalltalk.withContext(function($ctx2) {
|
|
|
+return _st(aBlock)._value_(self["@model"]);
|
|
|
}, function($ctx2) {$ctx2.fillBlock({},$ctx1)})}));
|
|
|
return self}, function($ctx1) {$ctx1.fill(self,"do:",{aBlock:aBlock},smalltalk.TrappedSnapshot)})},
|
|
|
args: ["aBlock"],
|
|
|
@@ -633,13 +672,13 @@ referencedClasses: ["TrappedPathStack"]
|
|
|
smalltalk.TrappedSnapshot);
|
|
|
|
|
|
smalltalk.addMethod(
|
|
|
-"_model",
|
|
|
smalltalk.method({
|
|
|
selector: "model",
|
|
|
category: 'accessing',
|
|
|
fn: function (){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
var $1;
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+var $1;
|
|
|
$1=self["@model"];
|
|
|
return $1;
|
|
|
}, function($ctx1) {$ctx1.fill(self,"model",{},smalltalk.TrappedSnapshot)})},
|
|
|
@@ -651,13 +690,13 @@ referencedClasses: []
|
|
|
smalltalk.TrappedSnapshot);
|
|
|
|
|
|
smalltalk.addMethod(
|
|
|
-"_modify_",
|
|
|
smalltalk.method({
|
|
|
selector: "modify:",
|
|
|
category: 'action',
|
|
|
fn: function (aBlock){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
_st(_st(self)._model())._modify_do_(_st(_st(self)._path())._allButFirst(),aBlock);
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+_st(self._model())._modify_do_(_st(self._path())._allButFirst(),aBlock);
|
|
|
return self}, function($ctx1) {$ctx1.fill(self,"modify:",{aBlock:aBlock},smalltalk.TrappedSnapshot)})},
|
|
|
args: ["aBlock"],
|
|
|
source: "modify: aBlock\x0a\x09self model modify: self path allButFirst do: aBlock",
|
|
|
@@ -667,13 +706,13 @@ referencedClasses: []
|
|
|
smalltalk.TrappedSnapshot);
|
|
|
|
|
|
smalltalk.addMethod(
|
|
|
-"_path",
|
|
|
smalltalk.method({
|
|
|
selector: "path",
|
|
|
category: 'accessing',
|
|
|
fn: function (){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
var $1;
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+var $1;
|
|
|
$1=self["@path"];
|
|
|
return $1;
|
|
|
}, function($ctx1) {$ctx1.fill(self,"path",{},smalltalk.TrappedSnapshot)})},
|
|
|
@@ -685,13 +724,13 @@ referencedClasses: []
|
|
|
smalltalk.TrappedSnapshot);
|
|
|
|
|
|
smalltalk.addMethod(
|
|
|
-"_path_model_",
|
|
|
smalltalk.method({
|
|
|
selector: "path:model:",
|
|
|
category: 'accessing',
|
|
|
fn: function (anArray,aTrappedMW){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
self["@path"]=anArray;
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+self["@path"]=anArray;
|
|
|
self["@model"]=aTrappedMW;
|
|
|
return self}, function($ctx1) {$ctx1.fill(self,"path:model:",{anArray:anArray,aTrappedMW:aTrappedMW},smalltalk.TrappedSnapshot)})},
|
|
|
args: ["anArray", "aTrappedMW"],
|
|
|
@@ -702,16 +741,16 @@ referencedClasses: []
|
|
|
smalltalk.TrappedSnapshot);
|
|
|
|
|
|
|
|
|
-
|
|
|
smalltalk.addMethod(
|
|
|
-"_trapDescend_",
|
|
|
smalltalk.method({
|
|
|
selector: "trapDescend:",
|
|
|
category: '*Trapped-Frontend',
|
|
|
fn: function (aBlock){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
_st(_st((smalltalk.Trapped || Trapped))._current())._descend_snapshotDo_(self,aBlock);
|
|
|
-return self}, function($ctx1) {$ctx1.fill(self,"trapDescend:",{aBlock:aBlock}, smalltalk.Array)})},
|
|
|
+function $Trapped(){return smalltalk.Trapped||(typeof Trapped=="undefined"?nil:Trapped)}
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+_st(_st($Trapped())._current())._descend_snapshotDo_(self,aBlock);
|
|
|
+return self}, function($ctx1) {$ctx1.fill(self,"trapDescend:",{aBlock:aBlock},smalltalk.Array)})},
|
|
|
args: ["aBlock"],
|
|
|
source: "trapDescend: aBlock\x0a\x09Trapped current descend: self snapshotDo: aBlock",
|
|
|
messageSends: ["descend:snapshotDo:", "current"],
|
|
|
@@ -720,23 +759,26 @@ referencedClasses: ["Trapped"]
|
|
|
smalltalk.Array);
|
|
|
|
|
|
smalltalk.addMethod(
|
|
|
-"_trapIter_tag_do_",
|
|
|
smalltalk.method({
|
|
|
selector: "trapIter:tag:do:",
|
|
|
category: '*Trapped-Frontend',
|
|
|
fn: function (path,aSymbol,aBlock){
|
|
|
var self=this;
|
|
|
var start,end;
|
|
|
-return smalltalk.withContext(function($ctx1) {
_st(self)._with_((function(html){
|
|
|
-return smalltalk.withContext(function($ctx2) {
start=_st(html)._script();
|
|
|
+function $Trapped(){return smalltalk.Trapped||(typeof Trapped=="undefined"?nil:Trapped)}
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+self._with_((function(html){
|
|
|
+return smalltalk.withContext(function($ctx2) {
|
|
|
+start=_st(html)._script();
|
|
|
start;
|
|
|
end=_st(html)._script();
|
|
|
return end;
|
|
|
}, function($ctx2) {$ctx2.fillBlock({html:html},$ctx1)})}));
|
|
|
_st(start)._trap_read_(path,(function(model){
|
|
|
-return smalltalk.withContext(function($ctx2) {
return _st((smalltalk.Trapped || Trapped))._loop_between_and_tag_do_(model,start,end,aSymbol,aBlock);
|
|
|
+return smalltalk.withContext(function($ctx2) {
|
|
|
+return _st($Trapped())._loop_between_and_tag_do_(model,start,end,aSymbol,aBlock);
|
|
|
}, function($ctx2) {$ctx2.fillBlock({model:model},$ctx1)})}));
|
|
|
-return self}, function($ctx1) {$ctx1.fill(self,"trapIter:tag:do:",{path:path,aSymbol:aSymbol,aBlock:aBlock,start:start,end:end}, smalltalk.HTMLCanvas)})},
|
|
|
+return self}, function($ctx1) {$ctx1.fill(self,"trapIter:tag:do:",{path:path,aSymbol:aSymbol,aBlock:aBlock,start:start,end:end},smalltalk.HTMLCanvas)})},
|
|
|
args: ["path", "aSymbol", "aBlock"],
|
|
|
source: "trapIter: path tag: aSymbol do: aBlock\x0a\x09| start end |\x0a self with: [ :html | start := html script. end := html script ].\x0a start trap: path read: [ :model |\x0a \x09Trapped loop: model between: start and: end tag: aSymbol do: aBlock.\x0a ]",
|
|
|
messageSends: ["with:", "script", "trap:read:", "loop:between:and:tag:do:"],
|
|
|
@@ -745,14 +787,15 @@ referencedClasses: ["Trapped"]
|
|
|
smalltalk.HTMLCanvas);
|
|
|
|
|
|
smalltalk.addMethod(
|
|
|
-"_trap_",
|
|
|
smalltalk.method({
|
|
|
selector: "trap:",
|
|
|
category: '*Trapped-Frontend',
|
|
|
fn: function (path){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
_st(_st(_st((smalltalk.Trapped || Trapped))._current())._binder_(self))._installFor_(path);
|
|
|
-return self}, function($ctx1) {$ctx1.fill(self,"trap:",{path:path}, smalltalk.TagBrush)})},
|
|
|
+function $Trapped(){return smalltalk.Trapped||(typeof Trapped=="undefined"?nil:Trapped)}
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+_st(_st(_st($Trapped())._current())._binder_(self))._installFor_(path);
|
|
|
+return self}, function($ctx1) {$ctx1.fill(self,"trap:",{path:path},smalltalk.TagBrush)})},
|
|
|
args: ["path"],
|
|
|
source: "trap: path\x0a\x09(Trapped current binder: self) installFor: path",
|
|
|
messageSends: ["installFor:", "binder:", "current"],
|
|
|
@@ -761,32 +804,32 @@ referencedClasses: ["Trapped"]
|
|
|
smalltalk.TagBrush);
|
|
|
|
|
|
smalltalk.addMethod(
|
|
|
-"_trap_read_",
|
|
|
smalltalk.method({
|
|
|
selector: "trap:read:",
|
|
|
category: '*Trapped-Frontend',
|
|
|
fn: function (path,aBlock){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
var $1,$3,$4,$6,$5,$2;
|
|
|
-$1=path;
|
|
|
-$2=(function(snap){
|
|
|
-return smalltalk.withContext(function($ctx2) {
$3=_st(snap)._model();
|
|
|
-$4=_st(_st(snap)._path())._allButFirst();
|
|
|
-$5=(function(data){
|
|
|
-return smalltalk.withContext(function($ctx3) {
$6=_st(_st(_st(_st(self)._asJQuery())._closest_("html"))._toArray())._isEmpty();
|
|
|
-if(smalltalk.assert($6)){
|
|
|
-_st((smalltalk.KeyedPubSubUnsubscribe || KeyedPubSubUnsubscribe))._signal();
|
|
|
+function $KeyedPubSubUnsubscribe(){return smalltalk.KeyedPubSubUnsubscribe||(typeof KeyedPubSubUnsubscribe=="undefined"?nil:KeyedPubSubUnsubscribe)}
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+var $1;
|
|
|
+_st(path)._trapDescend_((function(snap){
|
|
|
+return smalltalk.withContext(function($ctx2) {
|
|
|
+return _st(_st(snap)._model())._watch_do_(_st(_st(snap)._path())._allButFirst(),(function(data){
|
|
|
+return smalltalk.withContext(function($ctx3) {
|
|
|
+$1=_st(_st(_st(self._asJQuery())._closest_("html"))._toArray())._isEmpty();
|
|
|
+if(smalltalk.assert($1)){
|
|
|
+_st($KeyedPubSubUnsubscribe())._signal();
|
|
|
};
|
|
|
return _st(snap)._do_((function(){
|
|
|
-return smalltalk.withContext(function($ctx4) {
return _st(self)._with_((function(html){
|
|
|
-return smalltalk.withContext(function($ctx5) {
return _st(aBlock)._value_value_(data,html);
|
|
|
-}, function($ctx5) {$ctx5.fillBlock({html:html},$ctx1)})}));
|
|
|
-}, function($ctx4) {$ctx4.fillBlock({},$ctx1)})}));
|
|
|
-}, function($ctx3) {$ctx3.fillBlock({data:data},$ctx1)})});
|
|
|
-return _st($3)._watch_do_($4,$5);
|
|
|
-}, function($ctx2) {$ctx2.fillBlock({snap:snap},$ctx1)})});
|
|
|
-_st($1)._trapDescend_($2);
|
|
|
-return self}, function($ctx1) {$ctx1.fill(self,"trap:read:",{path:path,aBlock:aBlock}, smalltalk.TagBrush)})},
|
|
|
+return smalltalk.withContext(function($ctx4) {
|
|
|
+return self._with_((function(html){
|
|
|
+return smalltalk.withContext(function($ctx5) {
|
|
|
+return _st(aBlock)._value_value_(data,html);
|
|
|
+}, function($ctx5) {$ctx5.fillBlock({html:html},$ctx4)})}));
|
|
|
+}, function($ctx4) {$ctx4.fillBlock({},$ctx3)})}));
|
|
|
+}, function($ctx3) {$ctx3.fillBlock({data:data},$ctx2)})}));
|
|
|
+}, function($ctx2) {$ctx2.fillBlock({snap:snap},$ctx1)})}));
|
|
|
+return self}, function($ctx1) {$ctx1.fill(self,"trap:read:",{path:path,aBlock:aBlock},smalltalk.TagBrush)})},
|
|
|
args: ["path", "aBlock"],
|
|
|
source: "trap: path read: aBlock\x0a\x09path trapDescend: [ :snap |\x0a snap model watch: snap path allButFirst do: [ :data |\x0a (self asJQuery closest: 'html') toArray isEmpty ifTrue: [ KeyedPubSubUnsubscribe signal ].\x0a \x09snap do: [ self with: [ :html | aBlock value: data value: html ] ]\x0a \x09]\x0a ]",
|
|
|
messageSends: ["trapDescend:", "watch:do:", "allButFirst", "path", "ifTrue:", "signal", "isEmpty", "toArray", "closest:", "asJQuery", "do:", "with:", "value:value:", "model"],
|
|
|
@@ -795,16 +838,17 @@ referencedClasses: ["KeyedPubSubUnsubscribe"]
|
|
|
smalltalk.TagBrush);
|
|
|
|
|
|
smalltalk.addMethod(
|
|
|
-"_trap_toggle_",
|
|
|
smalltalk.method({
|
|
|
selector: "trap:toggle:",
|
|
|
category: '*Trapped-Frontend',
|
|
|
fn: function (path,aBlock){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
_st(self)._trap_toggle_ifNotPresent_(path,aBlock,(function(){
|
|
|
-return smalltalk.withContext(function($ctx2) {
return _st(_st(self)._asJQuery())._hide();
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+self._trap_toggle_ifNotPresent_(path,aBlock,(function(){
|
|
|
+return smalltalk.withContext(function($ctx2) {
|
|
|
+return _st(self._asJQuery())._hide();
|
|
|
}, function($ctx2) {$ctx2.fillBlock({},$ctx1)})}));
|
|
|
-return self}, function($ctx1) {$ctx1.fill(self,"trap:toggle:",{path:path,aBlock:aBlock}, smalltalk.TagBrush)})},
|
|
|
+return self}, function($ctx1) {$ctx1.fill(self,"trap:toggle:",{path:path,aBlock:aBlock},smalltalk.TagBrush)})},
|
|
|
args: ["path", "aBlock"],
|
|
|
source: "trap: path toggle: aBlock\x0a self trap: path toggle: aBlock ifNotPresent: [ self asJQuery hide ]",
|
|
|
messageSends: ["trap:toggle:ifNotPresent:", "hide", "asJQuery"],
|
|
|
@@ -813,38 +857,35 @@ referencedClasses: []
|
|
|
smalltalk.TagBrush);
|
|
|
|
|
|
smalltalk.addMethod(
|
|
|
-"_trap_toggle_ifNotPresent_",
|
|
|
smalltalk.method({
|
|
|
selector: "trap:toggle:ifNotPresent:",
|
|
|
category: '*Trapped-Frontend',
|
|
|
fn: function (path,aBlock,anotherBlock){
|
|
|
var self=this;
|
|
|
var shown;
|
|
|
-return smalltalk.withContext(function($ctx1) {
var $1,$2,$4,$6,$7,$9,$8,$5,$3;
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+var $1,$2,$3,$5,$4;
|
|
|
shown=nil;
|
|
|
-$1=self;
|
|
|
-$2=path;
|
|
|
-$3=(function(data,html){
|
|
|
-return smalltalk.withContext(function($ctx2) {
$4=_st(shown).__eq(_st(data)._notNil());
|
|
|
-$5=(function(){
|
|
|
-return smalltalk.withContext(function($ctx3) {
shown=_st(data)._notNil();
|
|
|
+self._trap_read_(path,(function(data,html){
|
|
|
+return smalltalk.withContext(function($ctx2) {
|
|
|
+$1=_st(shown).__eq(_st(data)._notNil());
|
|
|
+if(! smalltalk.assert($1)){
|
|
|
+shown=_st(data)._notNil();
|
|
|
shown;
|
|
|
-$6=_st(self)._asJQuery();
|
|
|
-_st($6)._empty();
|
|
|
-$7=_st($6)._show();
|
|
|
-$7;
|
|
|
-$9=shown;
|
|
|
-if(smalltalk.assert($9)){
|
|
|
-$8=aBlock;
|
|
|
+$2=self._asJQuery();
|
|
|
+_st($2)._empty();
|
|
|
+$3=_st($2)._show();
|
|
|
+$3;
|
|
|
+$5=shown;
|
|
|
+if(smalltalk.assert($5)){
|
|
|
+$4=aBlock;
|
|
|
} else {
|
|
|
-$8=anotherBlock;
|
|
|
+$4=anotherBlock;
|
|
|
+};
|
|
|
+return _st($4)._value_value_(data,html);
|
|
|
};
|
|
|
-return _st($8)._value_value_(data,html);
|
|
|
-}, function($ctx3) {$ctx3.fillBlock({},$ctx1)})});
|
|
|
-return _st($4)._ifFalse_($5);
|
|
|
-}, function($ctx2) {$ctx2.fillBlock({data:data,html:html},$ctx1)})});
|
|
|
-_st($1)._trap_read_($2,$3);
|
|
|
-return self}, function($ctx1) {$ctx1.fill(self,"trap:toggle:ifNotPresent:",{path:path,aBlock:aBlock,anotherBlock:anotherBlock,shown:shown}, smalltalk.TagBrush)})},
|
|
|
+}, function($ctx2) {$ctx2.fillBlock({data:data,html:html},$ctx1)})}));
|
|
|
+return self}, function($ctx1) {$ctx1.fill(self,"trap:toggle:ifNotPresent:",{path:path,aBlock:aBlock,anotherBlock:anotherBlock,shown:shown},smalltalk.TagBrush)})},
|
|
|
args: ["path", "aBlock", "anotherBlock"],
|
|
|
source: "trap: path toggle: aBlock ifNotPresent: anotherBlock\x0a | shown |\x0a shown := nil.\x0a self trap: path read: [ :data : html |\x0a shown = data notNil ifFalse: [\x0a shown := data notNil.\x0a self asJQuery empty; show.\x0a (shown ifTrue: [aBlock] ifFalse: [anotherBlock]) value: data value: html.\x0a ]\x0a ]",
|
|
|
messageSends: ["trap:read:", "ifFalse:", "notNil", "empty", "asJQuery", "show", "value:value:", "ifTrue:ifFalse:", "="],
|
|
|
@@ -852,3 +893,4 @@ referencedClasses: []
|
|
|
}),
|
|
|
smalltalk.TagBrush);
|
|
|
|
|
|
+});
|
