2
0

Moka-Examples.js 7.7 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249
  1. define("amber_core/Moka-Examples", ["amber_vm/smalltalk", "amber_vm/nil", "amber_vm/_st", "amber_core/Kernel-Objects", "amber_core/Moka-Core"], function(smalltalk,nil,_st){
  2. smalltalk.addPackage('Moka-Examples');
  3. smalltalk.packages["Moka-Examples"].transport = {"type":"amd","amdNamespace":"amber_core"};
  4. smalltalk.addClass('MKCounterBuilder', smalltalk.Object, ['counter'], 'Moka-Examples');
  5. smalltalk.addMethod(
  6. smalltalk.method({
  7. selector: "build",
  8. category: 'accessing',
  9. fn: function (){
  10. var self=this;
  11. function $MKLabelView(){return smalltalk.MKLabelView||(typeof MKLabelView=="undefined"?nil:MKLabelView)}
  12. function $MKButtonView(){return smalltalk.MKButtonView||(typeof MKButtonView=="undefined"?nil:MKButtonView)}
  13. function $MKInputView(){return smalltalk.MKInputView||(typeof MKInputView=="undefined"?nil:MKInputView)}
  14. function $MKCheckboxView(){return smalltalk.MKCheckboxView||(typeof MKCheckboxView=="undefined"?nil:MKCheckboxView)}
  15. return smalltalk.withContext(function($ctx1) {
  16. var $2,$1,$4,$3,$5,$7,$6,$9,$8,$10,$11;
  17. $2=self._counter();
  18. $ctx1.sendIdx["counter"]=1;
  19. $1=_st($MKLabelView())._model_aspect_($2,"count");
  20. $ctx1.sendIdx["model:aspect:"]=1;
  21. _st($1)._render();
  22. $ctx1.sendIdx["render"]=1;
  23. $4=self._counter();
  24. $ctx1.sendIdx["counter"]=2;
  25. $3=_st($MKButtonView())._model_aspect_($4,"increase");
  26. $ctx1.sendIdx["model:aspect:"]=2;
  27. _st($3)._label_("Increase");
  28. $ctx1.sendIdx["label:"]=1;
  29. $5=_st($3)._render();
  30. $ctx1.sendIdx["render"]=2;
  31. $7=self._counter();
  32. $ctx1.sendIdx["counter"]=3;
  33. $6=_st($MKInputView())._model_aspect_($7,"text");
  34. $ctx1.sendIdx["model:aspect:"]=3;
  35. _st($6)._render();
  36. $ctx1.sendIdx["render"]=3;
  37. $9=self._counter();
  38. $ctx1.sendIdx["counter"]=4;
  39. $8=_st($MKCheckboxView())._model_aspect_($9,"checked");
  40. $ctx1.sendIdx["model:aspect:"]=4;
  41. _st($8)._render();
  42. $ctx1.sendIdx["render"]=4;
  43. $10=_st($MKButtonView())._model_aspect_(self._counter(),"decrease");
  44. _st($10)._label_("Decrease");
  45. $11=_st($10)._render();
  46. return self}, function($ctx1) {$ctx1.fill(self,"build",{},smalltalk.MKCounterBuilder)})},
  47. args: [],
  48. source: "build\x0a\x09(MKLabelView model: self counter aspect: #count) render.\x0a\x09(MKButtonView model: self counter aspect: #increase) \x0a\x09\x09label: 'Increase';\x0a\x09\x09render.\x0a\x09(MKInputView model: self counter aspect: #text)\x0a\x09\x09render.\x0a\x09(MKCheckboxView model: self counter aspect: #checked)\x0a\x09\x09render.\x0a\x09(MKButtonView model: self counter aspect: #decrease) \x0a\x09\x09label: 'Decrease';\x0a\x09\x09render",
  49. messageSends: ["render", "model:aspect:", "counter", "label:"],
  50. referencedClasses: ["MKLabelView", "MKButtonView", "MKInputView", "MKCheckboxView"]
  51. }),
  52. smalltalk.MKCounterBuilder);
  53. smalltalk.addMethod(
  54. smalltalk.method({
  55. selector: "counter",
  56. category: 'accessing',
  57. fn: function (){
  58. var self=this;
  59. function $MKCounterModel(){return smalltalk.MKCounterModel||(typeof MKCounterModel=="undefined"?nil:MKCounterModel)}
  60. return smalltalk.withContext(function($ctx1) {
  61. var $2,$1;
  62. $2=self["@counter"];
  63. if(($receiver = $2) == nil || $receiver == null){
  64. self["@counter"]=_st($MKCounterModel())._new();
  65. $1=self["@counter"];
  66. } else {
  67. $1=$2;
  68. };
  69. return $1;
  70. }, function($ctx1) {$ctx1.fill(self,"counter",{},smalltalk.MKCounterBuilder)})},
  71. args: [],
  72. source: "counter\x0a\x09^ counter ifNil: [ counter := MKCounterModel new ]",
  73. messageSends: ["ifNil:", "new"],
  74. referencedClasses: ["MKCounterModel"]
  75. }),
  76. smalltalk.MKCounterBuilder);
  77. smalltalk.addMethod(
  78. smalltalk.method({
  79. selector: "initialize",
  80. category: 'initialization',
  81. fn: function (){
  82. var self=this;
  83. return smalltalk.withContext(function($ctx1) {
  84. _st(self._new())._build();
  85. return self}, function($ctx1) {$ctx1.fill(self,"initialize",{},smalltalk.MKCounterBuilder.klass)})},
  86. args: [],
  87. source: "initialize\x0a\x09self new build",
  88. messageSends: ["build", "new"],
  89. referencedClasses: []
  90. }),
  91. smalltalk.MKCounterBuilder.klass);
  92. smalltalk.addClass('MKCounterModel', smalltalk.MKModel, ['count', 'text', 'checked'], 'Moka-Examples');
  93. smalltalk.addMethod(
  94. smalltalk.method({
  95. selector: "checked",
  96. category: 'actions',
  97. fn: function (){
  98. var self=this;
  99. return smalltalk.withContext(function($ctx1) {
  100. var $2,$1;
  101. $2=self["@checked"];
  102. if(($receiver = $2) == nil || $receiver == null){
  103. $1=false;
  104. } else {
  105. $1=$2;
  106. };
  107. return $1;
  108. }, function($ctx1) {$ctx1.fill(self,"checked",{},smalltalk.MKCounterModel)})},
  109. args: [],
  110. source: "checked\x0a\x09^ checked ifNil: [ false ]",
  111. messageSends: ["ifNil:"],
  112. referencedClasses: []
  113. }),
  114. smalltalk.MKCounterModel);
  115. smalltalk.addMethod(
  116. smalltalk.method({
  117. selector: "checked:",
  118. category: 'actions',
  119. fn: function (aBoolean){
  120. var self=this;
  121. return smalltalk.withContext(function($ctx1) {
  122. self["@checked"]=aBoolean;
  123. self._changed_("checked");
  124. return self}, function($ctx1) {$ctx1.fill(self,"checked:",{aBoolean:aBoolean},smalltalk.MKCounterModel)})},
  125. args: ["aBoolean"],
  126. source: "checked: aBoolean\x0a\x09checked := aBoolean.\x0a\x09self changed: 'checked'",
  127. messageSends: ["changed:"],
  128. referencedClasses: []
  129. }),
  130. smalltalk.MKCounterModel);
  131. smalltalk.addMethod(
  132. smalltalk.method({
  133. selector: "count",
  134. category: 'actions',
  135. fn: function (){
  136. var self=this;
  137. return smalltalk.withContext(function($ctx1) {
  138. var $1;
  139. $1=_st(self["@count"])._asString();
  140. return $1;
  141. }, function($ctx1) {$ctx1.fill(self,"count",{},smalltalk.MKCounterModel)})},
  142. args: [],
  143. source: "count\x0a\x09^ count asString",
  144. messageSends: ["asString"],
  145. referencedClasses: []
  146. }),
  147. smalltalk.MKCounterModel);
  148. smalltalk.addMethod(
  149. smalltalk.method({
  150. selector: "decrease",
  151. category: 'actions',
  152. fn: function (){
  153. var self=this;
  154. return smalltalk.withContext(function($ctx1) {
  155. self["@count"]=_st(self["@count"]).__minus((1));
  156. self._changed_("count");
  157. return self}, function($ctx1) {$ctx1.fill(self,"decrease",{},smalltalk.MKCounterModel)})},
  158. args: [],
  159. source: "decrease\x0a\x09count := count - 1.\x0a\x09self changed: #count",
  160. messageSends: ["-", "changed:"],
  161. referencedClasses: []
  162. }),
  163. smalltalk.MKCounterModel);
  164. smalltalk.addMethod(
  165. smalltalk.method({
  166. selector: "increase",
  167. category: 'actions',
  168. fn: function (){
  169. var self=this;
  170. return smalltalk.withContext(function($ctx1) {
  171. self["@count"]=_st(self["@count"]).__plus((1));
  172. self._changed_("count");
  173. return self}, function($ctx1) {$ctx1.fill(self,"increase",{},smalltalk.MKCounterModel)})},
  174. args: [],
  175. source: "increase\x0a\x09count := count + 1.\x0a\x09self changed: #count",
  176. messageSends: ["+", "changed:"],
  177. referencedClasses: []
  178. }),
  179. smalltalk.MKCounterModel);
  180. smalltalk.addMethod(
  181. smalltalk.method({
  182. selector: "initialize",
  183. category: 'initialization',
  184. fn: function (){
  185. var self=this;
  186. return smalltalk.withContext(function($ctx1) {
  187. smalltalk.MKCounterModel.superclass.fn.prototype._initialize.apply(_st(self), []);
  188. self["@count"]=(0);
  189. return self}, function($ctx1) {$ctx1.fill(self,"initialize",{},smalltalk.MKCounterModel)})},
  190. args: [],
  191. source: "initialize\x0a\x09super initialize.\x0a\x09count := 0",
  192. messageSends: ["initialize"],
  193. referencedClasses: []
  194. }),
  195. smalltalk.MKCounterModel);
  196. smalltalk.addMethod(
  197. smalltalk.method({
  198. selector: "text",
  199. category: 'actions',
  200. fn: function (){
  201. var self=this;
  202. return smalltalk.withContext(function($ctx1) {
  203. var $2,$1;
  204. $2=self["@text"];
  205. if(($receiver = $2) == nil || $receiver == null){
  206. $1="";
  207. } else {
  208. $1=$2;
  209. };
  210. return $1;
  211. }, function($ctx1) {$ctx1.fill(self,"text",{},smalltalk.MKCounterModel)})},
  212. args: [],
  213. source: "text\x0a\x09^ text ifNil: [ '' ]",
  214. messageSends: ["ifNil:"],
  215. referencedClasses: []
  216. }),
  217. smalltalk.MKCounterModel);
  218. smalltalk.addMethod(
  219. smalltalk.method({
  220. selector: "text:",
  221. category: 'actions',
  222. fn: function (aString){
  223. var self=this;
  224. return smalltalk.withContext(function($ctx1) {
  225. self["@text"]=aString;
  226. self._changed_("text");
  227. return self}, function($ctx1) {$ctx1.fill(self,"text:",{aString:aString},smalltalk.MKCounterModel)})},
  228. args: ["aString"],
  229. source: "text: aString\x0a\x09text := aString.\x0a\x09self changed: 'text'",
  230. messageSends: ["changed:"],
  231. referencedClasses: []
  232. }),
  233. smalltalk.MKCounterModel);
  234. });