123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349 |
- smalltalk.addPackage('Trapped-Frontend', {});
- smalltalk.addClass('TrappedFly', smalltalk.Object, [], 'Trapped-Frontend');
- smalltalk.addMethod(
- "_name",
- smalltalk.method({
- selector: "name",
- category: 'action',
- fn: function (){
- var self=this;
- var $1;
- $1=smalltalk.send(smalltalk.send(self,"_class",[]),"_name",[]);
- return $1;
- },
- args: [],
- source: "name\x0a\x09^ self class name",
- messageSends: ["name", "class"],
- referencedClasses: []
- }),
- smalltalk.TrappedFly);
- smalltalk.addMethod(
- "_start",
- smalltalk.method({
- selector: "start",
- category: 'action',
- fn: function (){
- var self=this;
- smalltalk.send(smalltalk.send((smalltalk.Trapped || Trapped),"_current",[]),"_register_name_",[self,smalltalk.send(self,"_name",[])]);
- return self},
- args: [],
- source: "start\x0a\x09Trapped current register: self name: self name",
- messageSends: ["register:name:", "name", "current"],
- referencedClasses: ["Trapped"]
- }),
- smalltalk.TrappedFly);
- smalltalk.addMethod(
- "_start",
- smalltalk.method({
- selector: "start",
- category: 'action',
- fn: function (){
- var self=this;
- smalltalk.send(smalltalk.send(self,"_new",[]),"_start",[]);
- return self},
- args: [],
- source: "start\x0a\x09self new start",
- messageSends: ["start", "new"],
- referencedClasses: []
- }),
- smalltalk.TrappedFly.klass);
- smalltalk.addClass('TrappedSingleton', smalltalk.Object, [], 'Trapped-Frontend');
- smalltalk.addMethod(
- "_start",
- smalltalk.method({
- selector: "start",
- category: 'action',
- fn: function (){
- var self=this;
- var $1;
- $1=smalltalk.send(self,"_subclassResponsibility",[]);
- return $1;
- },
- args: [],
- source: "start\x0a\x09^ self subclassResponsibility",
- messageSends: ["subclassResponsibility"],
- referencedClasses: []
- }),
- smalltalk.TrappedSingleton);
- smalltalk.TrappedSingleton.klass.iVarNames = ['current'];
- smalltalk.addMethod(
- "_current",
- smalltalk.method({
- selector: "current",
- category: 'accessing',
- fn: function (){
- var self=this;
- var $1;
- if(($receiver = self["@current"]) == nil || $receiver == undefined){
- self["@current"]=smalltalk.send(self,"_new",[]);
- $1=self["@current"];
- } else {
- $1=self["@current"];
- };
- return $1;
- },
- args: [],
- source: "current\x0a\x09^ current ifNil: [ current := self new ]",
- messageSends: ["ifNil:", "new"],
- referencedClasses: []
- }),
- smalltalk.TrappedSingleton.klass);
- smalltalk.addMethod(
- "_start",
- smalltalk.method({
- selector: "start",
- category: 'action',
- fn: function (){
- var self=this;
- smalltalk.send(smalltalk.send(self,"_current",[]),"_start",[]);
- return self},
- args: [],
- source: "start\x0a\x09self current start",
- messageSends: ["start", "current"],
- referencedClasses: []
- }),
- smalltalk.TrappedSingleton.klass);
- smalltalk.addClass('Trapped', smalltalk.TrappedSingleton, ['registry'], 'Trapped-Frontend');
- smalltalk.addMethod(
- "_byName_",
- smalltalk.method({
- selector: "byName:",
- category: 'accessing',
- fn: function (aString){
- var self=this;
- var $1;
- $1=smalltalk.send(self["@registry"],"_at_",[aString]);
- return $1;
- },
- args: ["aString"],
- source: "byName: aString\x0a\x09^ registry at: aString",
- messageSends: ["at:"],
- referencedClasses: []
- }),
- smalltalk.Trapped);
- smalltalk.addMethod(
- "_initialize",
- smalltalk.method({
- selector: "initialize",
- category: 'initialization',
- fn: function (){
- var self=this;
- smalltalk.send(self,"_initialize",[],smalltalk.TrappedSingleton);
- self["@registry"]=smalltalk.HashedCollection._fromPairs_([]);
- return self},
- args: [],
- source: "initialize\x0a\x09super initialize.\x0a\x09registry := #{}.",
- messageSends: ["initialize"],
- referencedClasses: []
- }),
- smalltalk.Trapped);
- smalltalk.addMethod(
- "_register_name_",
- smalltalk.method({
- selector: "register:name:",
- category: 'accessing',
- fn: function (aFly,aString){
- var self=this;
- smalltalk.send(self["@registry"],"_at_put_",[aString,aFly]);
- return self},
- args: ["aFly", "aString"],
- source: "register: aFly name: aString\x0a\x09registry at: aString put: aFly",
- messageSends: ["at:put:"],
- referencedClasses: []
- }),
- smalltalk.Trapped);
- smalltalk.addMethod(
- "_start",
- smalltalk.method({
- selector: "start",
- category: 'action',
- fn: function (){
- var self=this;
- smalltalk.send(smalltalk.send("[data-trap]","_asJQuery",[]),"_each_",[(function(index,elem){
- var trap;
- var jq;
- var viewName;
- var modelName;
- var tokens;
- jq=smalltalk.send(elem,"_asJQuery",[]);
- jq;
- trap=smalltalk.send(jq,"_attr_",["data-trap"]);
- trap;
- tokens=smalltalk.send(trap,"_tokenize_",[":"]);
- tokens;
- viewName=smalltalk.send(tokens,"_first",[]);
- viewName;
- modelName=smalltalk.send(tokens,"_second",[]);
- modelName;
- return smalltalk.send([modelName],"_trapDescend_",[(function(){
- return smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send((smalltalk.Smalltalk || Smalltalk),"_current",[]),"_at_",[viewName]),"_new",[]),"_appendToJQuery_",[jq]);
- })]);
- })]);
- return self},
- args: [],
- source: "start\x0a\x09'[data-trap]' asJQuery each: [ :index :elem |\x0a \x09| trap jq viewName modelName tokens |\x0a jq := elem asJQuery.\x0a trap := jq attr: 'data-trap'.\x0a tokens := trap tokenize: ':'.\x0a viewName := tokens first.\x0a modelName := tokens second.\x0a { modelName } trapDescend: [(Smalltalk current at: viewName) new appendToJQuery: jq].\x0a ]",
- messageSends: ["each:", "asJQuery", "attr:", "tokenize:", "first", "second", "trapDescend:", "appendToJQuery:", "new", "at:", "current"],
- referencedClasses: ["Smalltalk"]
- }),
- smalltalk.Trapped);
- smalltalk.addMethod(
- "_path",
- smalltalk.method({
- selector: "path",
- category: 'accessing',
- fn: function (){
- var self=this;
- var $1;
- $1=smalltalk.send(smalltalk.send((smalltalk.TrappedPathStack || TrappedPathStack),"_current",[]),"_elements",[]);
- return $1;
- },
- args: [],
- source: "path\x0a\x09^TrappedPathStack current elements",
- messageSends: ["elements", "current"],
- referencedClasses: ["TrappedPathStack"]
- }),
- smalltalk.Trapped.klass);
- smalltalk.addClass('TrappedPathStack', smalltalk.TrappedSingleton, ['elements'], 'Trapped-Frontend');
- smalltalk.addMethod(
- "_append_",
- smalltalk.method({
- selector: "append:",
- category: 'descending',
- fn: function (anArray){
- var self=this;
- self["@elements"]=smalltalk.send(self["@elements"],"__comma",[anArray]);
- return self},
- args: ["anArray"],
- source: "append: anArray\x0a elements := elements, anArray",
- messageSends: [","],
- referencedClasses: []
- }),
- smalltalk.TrappedPathStack);
- smalltalk.addMethod(
- "_elements",
- smalltalk.method({
- selector: "elements",
- category: 'accessing',
- fn: function (){
- var self=this;
- return self["@elements"];
- },
- args: [],
- source: "elements\x0a\x09^elements",
- messageSends: [],
- referencedClasses: []
- }),
- smalltalk.TrappedPathStack);
- smalltalk.addMethod(
- "_initialize",
- smalltalk.method({
- selector: "initialize",
- category: 'initialization',
- fn: function (){
- var self=this;
- self["@elements"]=[];
- return self},
- args: [],
- source: "initialize\x0a\x09elements := #().",
- messageSends: [],
- referencedClasses: []
- }),
- smalltalk.TrappedPathStack);
- smalltalk.addMethod(
- "_with_do_",
- smalltalk.method({
- selector: "with:do:",
- category: 'descending',
- fn: function (anArray,aBlock){
- var self=this;
- var old;
- old=self["@elements"];
- smalltalk.send((function(){
- smalltalk.send(self,"_append_",[anArray]);
- return smalltalk.send(aBlock,"_value",[]);
- }),"_ensure_",[(function(){
- self["@elements"]=old;
- return self["@elements"];
- })]);
- return self},
- args: ["anArray", "aBlock"],
- source: "with: anArray do: aBlock\x0a\x09| old |\x0a old := elements.\x0a [ self append: anArray.\x0a\x09aBlock value ] ensure: [ elements := old ]",
- messageSends: ["ensure:", "append:", "value"],
- referencedClasses: []
- }),
- smalltalk.TrappedPathStack);
- smalltalk.addClass('TrappedView', smalltalk.Widget, [], 'Trapped-Frontend');
- smalltalk.addMethod(
- "_renderOn_",
- smalltalk.method({
- selector: "renderOn:",
- category: 'rendering',
- fn: function (html){
- var self=this;
- smalltalk.send(smalltalk.send(html,"_root",[]),"_empty",[]);
- smalltalk.send(html,"_with_",[smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(self,"_class",[]),"_name",[]),"__comma",[": "]),"__comma",[smalltalk.send((smalltalk.Trapped || Trapped),"_path",[])])]);
- return self},
- args: ["html"],
- source: "renderOn: html\x0a\x09html root empty.\x0a\x09html with: self class name, ': ', Trapped path",
- messageSends: ["empty", "root", "with:", ",", "path", "name", "class"],
- referencedClasses: ["Trapped"]
- }),
- smalltalk.TrappedView);
- smalltalk.addMethod(
- "_trapDescend_",
- smalltalk.method({
- selector: "trapDescend:",
- category: '*Trapped-Frontend',
- fn: function (aBlock){
- var self=this;
- smalltalk.send(smalltalk.send((smalltalk.TrappedPathStack || TrappedPathStack),"_current",[]),"_with_do_",[self,aBlock]);
- return self},
- args: ["aBlock"],
- source: "trapDescend: aBlock\x0a\x09TrappedPathStack current with: self do: aBlock",
- messageSends: ["with:do:", "current"],
- referencedClasses: ["TrappedPathStack"]
- }),
- smalltalk.Array);
- smalltalk.addMethod(
- "_trapDescend_",
- smalltalk.method({
- selector: "trapDescend:",
- category: '*Trapped-Frontend',
- fn: function (aBlock){
- var self=this;
- smalltalk.send(smalltalk.send((smalltalk.TrappedPathStack || TrappedPathStack),"_current",[]),"_with_do_",[self,aBlock]);
- return self},
- args: ["aBlock"],
- source: "trapDescend: aBlock\x0a\x09TrappedPathStack current with: self do: aBlock",
- messageSends: ["with:do:", "current"],
- referencedClasses: ["TrappedPathStack"]
- }),
- smalltalk.Array);
|