resin 0.2.2 → 0.2.3

This diff represents the content of publicly available package versions that have been released to one of the supported registries. The information contained in this diff is provided for informational purposes only and reflects changes between package versions as they appear in their respective public registries.
Files changed (117) hide show
  1. data/amber/css/amber-normalize.css +73 -73
  2. data/amber/css/amber-normalize.less +1 -1
  3. data/amber/css/amber.css +106 -106
  4. data/amber/css/helios.css +242 -0
  5. data/amber/images/hsplitter.png +0 -0
  6. data/amber/images/vsplitter.png +0 -0
  7. data/amber/js/Benchfib.deploy.js +116 -38
  8. data/amber/js/Benchfib.js +120 -42
  9. data/amber/js/Canvas.deploy.js +674 -403
  10. data/amber/js/Canvas.js +682 -411
  11. data/amber/js/Compiler-AST.deploy.js +1150 -0
  12. data/amber/js/Compiler-AST.js +1591 -0
  13. data/amber/js/Compiler-Core.deploy.js +1562 -0
  14. data/amber/js/Compiler-Core.js +1972 -0
  15. data/amber/js/Compiler-Exceptions.deploy.js +114 -0
  16. data/amber/js/Compiler-Exceptions.js +161 -0
  17. data/amber/js/Compiler-IR.deploy.js +2326 -0
  18. data/amber/js/Compiler-IR.js +3146 -0
  19. data/amber/js/Compiler-Inlining.deploy.js +1147 -0
  20. data/amber/js/Compiler-Inlining.js +1514 -0
  21. data/amber/js/Compiler-Semantic.deploy.js +1207 -0
  22. data/amber/js/Compiler-Semantic.js +1628 -0
  23. data/amber/js/Compiler-Tests.deploy.js +646 -60
  24. data/amber/js/Compiler-Tests.js +843 -82
  25. data/amber/js/Compiler.deploy.js +1097 -159
  26. data/amber/js/Compiler.js +1414 -161
  27. data/amber/js/Examples.deploy.js +31 -15
  28. data/amber/js/Examples.js +33 -17
  29. data/amber/js/Helios-Announcements.deploy.js +127 -0
  30. data/amber/js/Helios-Announcements.js +157 -0
  31. data/amber/js/Helios-Browser.deploy.js +1473 -0
  32. data/amber/js/Helios-Browser.js +1953 -0
  33. data/amber/js/Helios-Commands.deploy.js +403 -0
  34. data/amber/js/Helios-Commands.js +563 -0
  35. data/amber/js/Helios-Core.deploy.js +1070 -0
  36. data/amber/js/Helios-Core.js +1445 -0
  37. data/amber/js/Helios-Environments.deploy.js +132 -0
  38. data/amber/js/Helios-Environments.js +179 -0
  39. data/amber/js/Helios-Inspector.deploy.js +855 -0
  40. data/amber/js/Helios-Inspector.js +1155 -0
  41. data/amber/js/Helios-KeyBindings.deploy.js +753 -0
  42. data/amber/js/Helios-KeyBindings.js +1023 -0
  43. data/amber/js/Helios-Layout.deploy.js +383 -0
  44. data/amber/js/Helios-Layout.js +523 -0
  45. data/amber/js/Helios-Workspace.deploy.js +799 -0
  46. data/amber/js/Helios-Workspace.js +1074 -0
  47. data/amber/js/IDE.deploy.js +2541 -1490
  48. data/amber/js/IDE.js +2721 -1660
  49. data/amber/js/Importer-Exporter.deploy.js +671 -0
  50. data/amber/js/Importer-Exporter.js +816 -0
  51. data/amber/js/Kernel-Announcements.deploy.js +137 -20
  52. data/amber/js/Kernel-Announcements.js +176 -22
  53. data/amber/js/Kernel-Classes.deploy.js +555 -168
  54. data/amber/js/Kernel-Classes.js +662 -205
  55. data/amber/js/Kernel-Collections.deploy.js +1403 -618
  56. data/amber/js/Kernel-Collections.js +1545 -690
  57. data/amber/js/Kernel-Exceptions.deploy.js +109 -45
  58. data/amber/js/Kernel-Exceptions.js +123 -49
  59. data/amber/js/Kernel-Methods.deploy.js +196 -81
  60. data/amber/js/Kernel-Methods.js +214 -89
  61. data/amber/js/Kernel-Objects.deploy.js +1542 -1117
  62. data/amber/js/Kernel-Objects.js +1593 -1148
  63. data/amber/js/Kernel-Tests.deploy.js +1725 -772
  64. data/amber/js/Kernel-Tests.js +2301 -1123
  65. data/amber/js/Kernel-Transcript.deploy.js +23 -25
  66. data/amber/js/Kernel-Transcript.js +24 -26
  67. data/amber/js/SUnit.deploy.js +204 -131
  68. data/amber/js/SUnit.js +222 -139
  69. data/amber/js/Spaces.deploy.js +240 -0
  70. data/amber/js/Spaces.js +326 -0
  71. data/amber/js/amber.js +26 -7
  72. data/amber/js/boot.js +65 -47
  73. data/amber/js/init.js +1 -1
  74. data/amber/js/lib/CodeMirror/amber.css +21 -21
  75. data/amber/js/lib/CodeMirror/codemirror.css +119 -13
  76. data/amber/js/lib/CodeMirror/codemirror.js +2219 -1220
  77. data/amber/js/lib/CodeMirror/smalltalk.js +134 -129
  78. data/amber/js/lib/bootstrap/css/bootstrap.css +5837 -0
  79. data/amber/js/lib/bootstrap/css/bootstrap.min.css +841 -0
  80. data/amber/js/lib/bootstrap/img/glyphicons-halflings-white.png +0 -0
  81. data/amber/js/lib/bootstrap/img/glyphicons-halflings.png +0 -0
  82. data/amber/js/lib/bootstrap/js/bootstrap.js +2038 -0
  83. data/amber/js/lib/bootstrap/js/bootstrap.min.js +7 -0
  84. data/amber/js/lib/jQuery/jquery-1.8.2.min.js +2 -0
  85. data/amber/js/lib/jQuery/jquery-ui-1.8.24.custom.min.js +125 -0
  86. data/amber/st/Compiler-AST.st +505 -0
  87. data/amber/st/Compiler-Core.st +835 -0
  88. data/amber/st/Compiler-Exceptions.st +87 -0
  89. data/amber/st/Compiler-IR.st +1097 -0
  90. data/amber/st/Compiler-Inlining.st +650 -0
  91. data/amber/st/Compiler-Semantic.st +558 -0
  92. data/amber/st/Compiler-Tests.st +285 -381
  93. data/amber/st/Compiler.st +725 -2
  94. data/amber/st/Helios-Announcements.st +104 -0
  95. data/amber/st/Helios-Browser.st +708 -0
  96. data/amber/st/Helios-Commands.st +223 -0
  97. data/amber/st/Helios-Core.st +532 -0
  98. data/amber/st/Helios-Environments.st +98 -0
  99. data/amber/st/Helios-Inspector.st +367 -0
  100. data/amber/st/Helios-KeyBindings.st +337 -0
  101. data/amber/st/Helios-Layout.st +199 -0
  102. data/amber/st/Helios-Workspace.st +367 -0
  103. data/amber/st/IDE.st +75 -53
  104. data/amber/st/Importer-Exporter.st +386 -0
  105. data/amber/st/Kernel-Announcements.st +92 -0
  106. data/amber/st/Kernel-Classes.st +137 -15
  107. data/amber/st/Kernel-Collections.st +137 -47
  108. data/amber/st/Kernel-Exceptions.st +14 -0
  109. data/amber/st/Kernel-Methods.st +9 -1
  110. data/amber/st/Kernel-Objects.st +29 -5
  111. data/amber/st/Kernel-Tests.st +545 -199
  112. data/amber/st/SUnit.st +10 -0
  113. data/amber/st/Spaces.st +142 -0
  114. data/lib/resin/app.rb +1 -1
  115. metadata +86 -31
  116. data/amber/js/lib/jQuery/jquery-1.4.4.min.js +0 -167
  117. data/amber/js/lib/jQuery/jquery-1.6.4.min.js +0 -4
@@ -6,10 +6,11 @@ smalltalk.addMethod(
6
6
  smalltalk.method({
7
7
  selector: "applyTo:arguments:",
8
8
  category: 'evaluating',
9
- fn: function (anObject, aCollection){
9
+ fn: function (anObject,aCollection){
10
10
  var self=this;
11
11
  return self.apply(anObject, aCollection);
12
- return self;},
12
+ ;
13
+ return self},
13
14
  args: ["anObject", "aCollection"],
14
15
  source: "applyTo: anObject arguments: aCollection\x0a\x09<return self.apply(anObject, aCollection)>",
15
16
  messageSends: [],
@@ -25,7 +26,8 @@ category: 'accessing',
25
26
  fn: function (){
26
27
  var self=this;
27
28
  return self.toString();
28
- return self;},
29
+ ;
30
+ return self},
29
31
  args: [],
30
32
  source: "compiledSource\x0a\x09<return self.toString()>",
31
33
  messageSends: [],
@@ -40,13 +42,25 @@ selector: "ensure:",
40
42
  category: 'evaluating',
41
43
  fn: function (aBlock){
42
44
  var self=this;
43
- var success=nil;
44
- (success=false);
45
- return smalltalk.send((function(){smalltalk.send(self, "_value", []);(success=true);return smalltalk.send(aBlock, "_value", []);}), "_on_do_", [(smalltalk.Error || Error), (function(ex){((($receiver = success).klass === smalltalk.Boolean) ? (! $receiver ? (function(){return smalltalk.send(aBlock, "_value", []);})() : nil) : smalltalk.send($receiver, "_ifFalse_", [(function(){return smalltalk.send(aBlock, "_value", []);})]));return smalltalk.send(ex, "_signal", []);})]);
46
- return self;},
45
+ var $1;
46
+ var success;
47
+ success=false;
48
+ $1=smalltalk.send((function(){
49
+ smalltalk.send(self,"_value",[]);
50
+ success=true;
51
+ success;
52
+ return smalltalk.send(aBlock,"_value",[]);
53
+ }),"_on_do_",[(smalltalk.Error || Error),(function(ex){
54
+ if(! smalltalk.assert(success)){
55
+ smalltalk.send(aBlock,"_value",[]);
56
+ };
57
+ return smalltalk.send(ex,"_signal",[]);
58
+ })]);
59
+ return $1;
60
+ },
47
61
  args: ["aBlock"],
48
62
  source: "ensure: aBlock\x0a\x09| success |\x0a\x09success := false.\x0a\x09^[self value. success := true. aBlock value]\x0a\x09\x09on: Error\x0a\x09\x09do: [:ex |\x0a\x09\x09\x09success ifFalse: [aBlock value].\x0a\x09\x09\x09ex signal]",
49
- messageSends: ["on:do:", "value", "ifFalse:", "signal"],
63
+ messageSends: ["on:do:", "ifFalse:", "value", "signal"],
50
64
  referencedClasses: ["Error"]
51
65
  }),
52
66
  smalltalk.BlockClosure);
@@ -59,7 +73,8 @@ category: 'evaluating',
59
73
  fn: function (){
60
74
  var self=this;
61
75
  return new self();
62
- return self;},
76
+ ;
77
+ return self},
63
78
  args: [],
64
79
  source: "new\x0a\x09\x22Use the receiver as a JS constructor. \x0a\x09*Do not* use this method to instanciate Smalltalk objects!\x22\x0a\x09<return new self()>",
65
80
  messageSends: [],
@@ -75,7 +90,8 @@ category: 'evaluating',
75
90
  fn: function (anObject){
76
91
  var self=this;
77
92
  return new self(anObject);
78
- return self;},
93
+ ;
94
+ return self},
79
95
  args: ["anObject"],
80
96
  source: "newValue: anObject\x0a\x09\x22Use the receiver as a JS constructor. \x0a\x09*Do not* use this method to instanciate Smalltalk objects!\x22\x0a\x09<return new self(anObject)>",
81
97
  messageSends: [],
@@ -88,10 +104,11 @@ smalltalk.addMethod(
88
104
  smalltalk.method({
89
105
  selector: "newValue:value:",
90
106
  category: 'evaluating',
91
- fn: function (anObject, anObject2){
107
+ fn: function (anObject,anObject2){
92
108
  var self=this;
93
109
  return new self(anObject, anObject2);
94
- return self;},
110
+ ;
111
+ return self},
95
112
  args: ["anObject", "anObject2"],
96
113
  source: "newValue: anObject value: anObject2\x0a\x09\x22Use the receiver as a JS constructor. \x0a\x09*Do not* use this method to instanciate Smalltalk objects!\x22\x0a\x09<return new self(anObject, anObject2)>",
97
114
  messageSends: [],
@@ -104,10 +121,11 @@ smalltalk.addMethod(
104
121
  smalltalk.method({
105
122
  selector: "newValue:value:value:",
106
123
  category: 'evaluating',
107
- fn: function (anObject, anObject2, anObject3){
124
+ fn: function (anObject,anObject2,anObject3){
108
125
  var self=this;
109
126
  return new self(anObject, anObject2);
110
- return self;},
127
+ ;
128
+ return self},
111
129
  args: ["anObject", "anObject2", "anObject3"],
112
130
  source: "newValue: anObject value: anObject2 value: anObject3\x0a\x09\x22Use the receiver as a JS constructor. \x0a\x09*Do not* use this method to instanciate Smalltalk objects!\x22\x0a\x09<return new self(anObject, anObject2)>",
113
131
  messageSends: [],
@@ -123,7 +141,8 @@ category: 'accessing',
123
141
  fn: function (){
124
142
  var self=this;
125
143
  return self.length;
126
- return self;},
144
+ ;
145
+ return self},
127
146
  args: [],
128
147
  source: "numArgs\x0a\x09<return self.length>",
129
148
  messageSends: [],
@@ -136,13 +155,22 @@ smalltalk.addMethod(
136
155
  smalltalk.method({
137
156
  selector: "on:do:",
138
157
  category: 'error handling',
139
- fn: function (anErrorClass, aBlock){
140
- var self=this;
141
- return smalltalk.send(self, "_try_catch_", [self, (function(error){return ((($receiver = smalltalk.send(error, "_isKindOf_", [anErrorClass])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(aBlock, "_value_", [error]);})() : (function(){return smalltalk.send(error, "_signal", []);})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return smalltalk.send(aBlock, "_value_", [error]);}), (function(){return smalltalk.send(error, "_signal", []);})]));})]);
142
- return self;},
158
+ fn: function (anErrorClass,aBlock){
159
+ var self=this;
160
+ var $2,$1;
161
+ $1=smalltalk.send(self,"_try_catch_",[self,(function(error){
162
+ $2=smalltalk.send(error,"_isKindOf_",[anErrorClass]);
163
+ if(smalltalk.assert($2)){
164
+ return smalltalk.send(aBlock,"_value_",[error]);
165
+ } else {
166
+ return smalltalk.send(error,"_signal",[]);
167
+ };
168
+ })]);
169
+ return $1;
170
+ },
143
171
  args: ["anErrorClass", "aBlock"],
144
172
  source: "on: anErrorClass do: aBlock\x0a\x09^self try: self catch: [:error |\x0a\x09 (error isKindOf: anErrorClass) \x0a\x09 ifTrue: [aBlock value: error]\x0a\x09 ifFalse: [error signal]]",
145
- messageSends: ["try:catch:", "ifTrue:ifFalse:", "isKindOf:", "value:", "signal"],
173
+ messageSends: ["try:catch:", "ifTrue:ifFalse:", "value:", "signal", "isKindOf:"],
146
174
  referencedClasses: []
147
175
  }),
148
176
  smalltalk.BlockClosure);
@@ -154,8 +182,10 @@ selector: "timeToRun",
154
182
  category: 'evaluating',
155
183
  fn: function (){
156
184
  var self=this;
157
- return smalltalk.send((smalltalk.Date || Date), "_millisecondsToRun_", [self]);
158
- return self;},
185
+ var $1;
186
+ $1=smalltalk.send((smalltalk.Date || Date),"_millisecondsToRun_",[self]);
187
+ return $1;
188
+ },
159
189
  args: [],
160
190
  source: "timeToRun\x0a\x09\x22Answer the number of milliseconds taken to execute this block.\x22\x0a\x0a\x09^ Date millisecondsToRun: self",
161
191
  messageSends: ["millisecondsToRun:"],
@@ -171,7 +201,8 @@ category: 'evaluating',
171
201
  fn: function (){
172
202
  var self=this;
173
203
  return self();;
174
- return self;},
204
+ ;
205
+ return self},
175
206
  args: [],
176
207
  source: "value\x0a\x09\x22inlined in the Compiler\x22\x0a\x09<return self();>",
177
208
  messageSends: [],
@@ -187,7 +218,8 @@ category: 'evaluating',
187
218
  fn: function (anArg){
188
219
  var self=this;
189
220
  return self(anArg);;
190
- return self;},
221
+ ;
222
+ return self},
191
223
  args: ["anArg"],
192
224
  source: "value: anArg\x0a\x09\x22inlined in the Compiler\x22\x0a\x09<return self(anArg);>",
193
225
  messageSends: [],
@@ -200,10 +232,11 @@ smalltalk.addMethod(
200
232
  smalltalk.method({
201
233
  selector: "value:value:",
202
234
  category: 'evaluating',
203
- fn: function (firstArg, secondArg){
235
+ fn: function (firstArg,secondArg){
204
236
  var self=this;
205
237
  return self(firstArg, secondArg);;
206
- return self;},
238
+ ;
239
+ return self},
207
240
  args: ["firstArg", "secondArg"],
208
241
  source: "value: firstArg value: secondArg\x0a\x09\x22inlined in the Compiler\x22\x0a\x09<return self(firstArg, secondArg);>",
209
242
  messageSends: [],
@@ -216,10 +249,11 @@ smalltalk.addMethod(
216
249
  smalltalk.method({
217
250
  selector: "value:value:value:",
218
251
  category: 'evaluating',
219
- fn: function (firstArg, secondArg, thirdArg){
252
+ fn: function (firstArg,secondArg,thirdArg){
220
253
  var self=this;
221
254
  return self(firstArg, secondArg, thirdArg);;
222
- return self;},
255
+ ;
256
+ return self},
223
257
  args: ["firstArg", "secondArg", "thirdArg"],
224
258
  source: "value: firstArg value: secondArg value: thirdArg\x0a\x09\x22inlined in the Compiler\x22\x0a\x09<return self(firstArg, secondArg, thirdArg);>",
225
259
  messageSends: [],
@@ -235,7 +269,8 @@ category: 'timeout/interval',
235
269
  fn: function (aNumber){
236
270
  var self=this;
237
271
  return setInterval(self, aNumber);
238
- return self;},
272
+ ;
273
+ return self},
239
274
  args: ["aNumber"],
240
275
  source: "valueWithInterval: aNumber\x0a\x09<return setInterval(self, aNumber)>",
241
276
  messageSends: [],
@@ -251,7 +286,8 @@ category: 'evaluating',
251
286
  fn: function (aCollection){
252
287
  var self=this;
253
288
  return self.apply(null, aCollection);;
254
- return self;},
289
+ ;
290
+ return self},
255
291
  args: ["aCollection"],
256
292
  source: "valueWithPossibleArguments: aCollection\x0a\x09<return self.apply(null, aCollection);>",
257
293
  messageSends: [],
@@ -267,7 +303,8 @@ category: 'timeout/interval',
267
303
  fn: function (aNumber){
268
304
  var self=this;
269
305
  return setTimeout(self, aNumber);
270
- return self;},
306
+ ;
307
+ return self},
271
308
  args: ["aNumber"],
272
309
  source: "valueWithTimeout: aNumber\x0a\x09<return setTimeout(self, aNumber)>",
273
310
  messageSends: [],
@@ -282,8 +319,9 @@ selector: "whileFalse",
282
319
  category: 'controlling',
283
320
  fn: function (){
284
321
  var self=this;
285
- smalltalk.send(self, "_whileFalse_", [(function(){return nil;})]);
286
- return self;},
322
+ smalltalk.send(self,"_whileFalse_",[(function(){
323
+ })]);
324
+ return self},
287
325
  args: [],
288
326
  source: "whileFalse\x0a\x09\x22inlined in the Compiler\x22\x0a\x09self whileFalse: []",
289
327
  messageSends: ["whileFalse:"],
@@ -299,7 +337,8 @@ category: 'controlling',
299
337
  fn: function (aBlock){
300
338
  var self=this;
301
339
  while(!self()) {aBlock()};
302
- return self;},
340
+ ;
341
+ return self},
303
342
  args: ["aBlock"],
304
343
  source: "whileFalse: aBlock\x0a\x09\x22inlined in the Compiler\x22\x0a\x09<while(!self()) {aBlock()}>",
305
344
  messageSends: [],
@@ -314,8 +353,9 @@ selector: "whileTrue",
314
353
  category: 'controlling',
315
354
  fn: function (){
316
355
  var self=this;
317
- smalltalk.send(self, "_whileTrue_", [(function(){return nil;})]);
318
- return self;},
356
+ smalltalk.send(self,"_whileTrue_",[(function(){
357
+ })]);
358
+ return self},
319
359
  args: [],
320
360
  source: "whileTrue\x0a\x09\x22inlined in the Compiler\x22\x0a\x09self whileTrue: []",
321
361
  messageSends: ["whileTrue:"],
@@ -331,7 +371,8 @@ category: 'controlling',
331
371
  fn: function (aBlock){
332
372
  var self=this;
333
373
  while(self()) {aBlock()};
334
- return self;},
374
+ ;
375
+ return self},
335
376
  args: ["aBlock"],
336
377
  source: "whileTrue: aBlock\x0a\x09\x22inlined in the Compiler\x22\x0a\x09<while(self()) {aBlock()}>",
337
378
  messageSends: [],
@@ -351,7 +392,8 @@ category: 'accessing',
351
392
  fn: function (){
352
393
  var self=this;
353
394
  return self.args || [];
354
- return self;},
395
+ ;
396
+ return self},
355
397
  args: [],
356
398
  source: "arguments\x0a\x09<return self.args || []>",
357
399
  messageSends: [],
@@ -366,8 +408,15 @@ selector: "category",
366
408
  category: 'accessing',
367
409
  fn: function (){
368
410
  var self=this;
369
- return (($receiver = smalltalk.send(self, "_basicAt_", ["category"])) == nil || $receiver == undefined) ? (function(){return "";})() : $receiver;
370
- return self;},
411
+ var $2,$1;
412
+ $2=smalltalk.send(self,"_basicAt_",["category"]);
413
+ if(($receiver = $2) == nil || $receiver == undefined){
414
+ $1="";
415
+ } else {
416
+ $1=$2;
417
+ };
418
+ return $1;
419
+ },
371
420
  args: [],
372
421
  source: "category\x0a\x09^(self basicAt: 'category') ifNil: ['']",
373
422
  messageSends: ["ifNil:", "basicAt:"],
@@ -382,8 +431,8 @@ selector: "category:",
382
431
  category: 'accessing',
383
432
  fn: function (aString){
384
433
  var self=this;
385
- smalltalk.send(self, "_basicAt_put_", ["category", aString]);
386
- return self;},
434
+ smalltalk.send(self,"_basicAt_put_",["category",aString]);
435
+ return self},
387
436
  args: ["aString"],
388
437
  source: "category: aString\x0a\x09self basicAt: 'category' put: aString",
389
438
  messageSends: ["basicAt:put:"],
@@ -398,8 +447,10 @@ selector: "fn",
398
447
  category: 'accessing',
399
448
  fn: function (){
400
449
  var self=this;
401
- return smalltalk.send(self, "_basicAt_", ["fn"]);
402
- return self;},
450
+ var $1;
451
+ $1=smalltalk.send(self,"_basicAt_",["fn"]);
452
+ return $1;
453
+ },
403
454
  args: [],
404
455
  source: "fn\x0a\x09^self basicAt: 'fn'",
405
456
  messageSends: ["basicAt:"],
@@ -414,8 +465,8 @@ selector: "fn:",
414
465
  category: 'accessing',
415
466
  fn: function (aBlock){
416
467
  var self=this;
417
- smalltalk.send(self, "_basicAt_put_", ["fn", aBlock]);
418
- return self;},
468
+ smalltalk.send(self,"_basicAt_put_",["fn",aBlock]);
469
+ return self},
419
470
  args: ["aBlock"],
420
471
  source: "fn: aBlock\x0a\x09self basicAt: 'fn' put: aBlock",
421
472
  messageSends: ["basicAt:put:"],
@@ -430,8 +481,10 @@ selector: "messageSends",
430
481
  category: 'accessing',
431
482
  fn: function (){
432
483
  var self=this;
433
- return smalltalk.send(self, "_basicAt_", ["messageSends"]);
434
- return self;},
484
+ var $1;
485
+ $1=smalltalk.send(self,"_basicAt_",["messageSends"]);
486
+ return $1;
487
+ },
435
488
  args: [],
436
489
  source: "messageSends\x0a\x09^self basicAt: 'messageSends'",
437
490
  messageSends: ["basicAt:"],
@@ -446,8 +499,10 @@ selector: "methodClass",
446
499
  category: 'accessing',
447
500
  fn: function (){
448
501
  var self=this;
449
- return smalltalk.send(self, "_basicAt_", ["methodClass"]);
450
- return self;},
502
+ var $1;
503
+ $1=smalltalk.send(self,"_basicAt_",["methodClass"]);
504
+ return $1;
505
+ },
451
506
  args: [],
452
507
  source: "methodClass\x0a\x09^self basicAt: 'methodClass'",
453
508
  messageSends: ["basicAt:"],
@@ -455,6 +510,24 @@ referencedClasses: []
455
510
  }),
456
511
  smalltalk.CompiledMethod);
457
512
 
513
+ smalltalk.addMethod(
514
+ "_protocol",
515
+ smalltalk.method({
516
+ selector: "protocol",
517
+ category: 'accessing',
518
+ fn: function (){
519
+ var self=this;
520
+ var $1;
521
+ $1=smalltalk.send(self,"_category",[]);
522
+ return $1;
523
+ },
524
+ args: [],
525
+ source: "protocol\x0a\x09^ self category",
526
+ messageSends: ["category"],
527
+ referencedClasses: []
528
+ }),
529
+ smalltalk.CompiledMethod);
530
+
458
531
  smalltalk.addMethod(
459
532
  "_referencedClasses",
460
533
  smalltalk.method({
@@ -462,8 +535,10 @@ selector: "referencedClasses",
462
535
  category: 'accessing',
463
536
  fn: function (){
464
537
  var self=this;
465
- return smalltalk.send(self, "_basicAt_", ["referencedClasses"]);
466
- return self;},
538
+ var $1;
539
+ $1=smalltalk.send(self,"_basicAt_",["referencedClasses"]);
540
+ return $1;
541
+ },
467
542
  args: [],
468
543
  source: "referencedClasses\x0a\x09^self basicAt: 'referencedClasses'",
469
544
  messageSends: ["basicAt:"],
@@ -478,8 +553,10 @@ selector: "selector",
478
553
  category: 'accessing',
479
554
  fn: function (){
480
555
  var self=this;
481
- return smalltalk.send(self, "_basicAt_", ["selector"]);
482
- return self;},
556
+ var $1;
557
+ $1=smalltalk.send(self,"_basicAt_",["selector"]);
558
+ return $1;
559
+ },
483
560
  args: [],
484
561
  source: "selector\x0a\x09^self basicAt: 'selector'",
485
562
  messageSends: ["basicAt:"],
@@ -494,8 +571,8 @@ selector: "selector:",
494
571
  category: 'accessing',
495
572
  fn: function (aString){
496
573
  var self=this;
497
- smalltalk.send(self, "_basicAt_put_", ["selector", aString]);
498
- return self;},
574
+ smalltalk.send(self,"_basicAt_put_",["selector",aString]);
575
+ return self},
499
576
  args: ["aString"],
500
577
  source: "selector: aString\x0a\x09self basicAt: 'selector' put: aString",
501
578
  messageSends: ["basicAt:put:"],
@@ -510,8 +587,15 @@ selector: "source",
510
587
  category: 'accessing',
511
588
  fn: function (){
512
589
  var self=this;
513
- return (($receiver = smalltalk.send(self, "_basicAt_", ["source"])) == nil || $receiver == undefined) ? (function(){return "";})() : $receiver;
514
- return self;},
590
+ var $2,$1;
591
+ $2=smalltalk.send(self,"_basicAt_",["source"]);
592
+ if(($receiver = $2) == nil || $receiver == undefined){
593
+ $1="";
594
+ } else {
595
+ $1=$2;
596
+ };
597
+ return $1;
598
+ },
515
599
  args: [],
516
600
  source: "source\x0a\x09^(self basicAt: 'source') ifNil: ['']",
517
601
  messageSends: ["ifNil:", "basicAt:"],
@@ -526,8 +610,8 @@ selector: "source:",
526
610
  category: 'accessing',
527
611
  fn: function (aString){
528
612
  var self=this;
529
- smalltalk.send(self, "_basicAt_put_", ["source", aString]);
530
- return self;},
613
+ smalltalk.send(self,"_basicAt_put_",["source",aString]);
614
+ return self},
531
615
  args: ["aString"],
532
616
  source: "source: aString\x0a\x09self basicAt: 'source' put: aString",
533
617
  messageSends: ["basicAt:put:"],
@@ -546,8 +630,8 @@ selector: "arguments",
546
630
  category: 'accessing',
547
631
  fn: function (){
548
632
  var self=this;
549
- return self['@arguments'];
550
- return self;},
633
+ return self["@arguments"];
634
+ },
551
635
  args: [],
552
636
  source: "arguments\x0a\x09^arguments",
553
637
  messageSends: [],
@@ -562,8 +646,8 @@ selector: "arguments:",
562
646
  category: 'accessing',
563
647
  fn: function (anArray){
564
648
  var self=this;
565
- (self['@arguments']=anArray);
566
- return self;},
649
+ self["@arguments"]=anArray;
650
+ return self},
567
651
  args: ["anArray"],
568
652
  source: "arguments: anArray\x0a\x09arguments := anArray",
569
653
  messageSends: [],
@@ -578,8 +662,16 @@ selector: "printString",
578
662
  category: 'printing',
579
663
  fn: function (){
580
664
  var self=this;
581
- return smalltalk.send((smalltalk.String || String), "_streamContents_", [(function(aStream){return (function($rec){smalltalk.send($rec, "_nextPutAll_", [smalltalk.send(self, "_printString", [], smalltalk.Message.superclass || nil)]);smalltalk.send($rec, "_nextPutAll_", ["("]);smalltalk.send($rec, "_nextPutAll_", [self['@selector']]);return smalltalk.send($rec, "_nextPutAll_", [")"]);})(aStream);})]);
582
- return self;},
665
+ var $2,$1;
666
+ $1=smalltalk.send((smalltalk.String || String),"_streamContents_",[(function(aStream){
667
+ smalltalk.send(aStream,"_nextPutAll_",[smalltalk.send(self,"_printString",[],smalltalk.Object)]);
668
+ smalltalk.send(aStream,"_nextPutAll_",["("]);
669
+ smalltalk.send(aStream,"_nextPutAll_",[self["@selector"]]);
670
+ $2=smalltalk.send(aStream,"_nextPutAll_",[")"]);
671
+ return $2;
672
+ })]);
673
+ return $1;
674
+ },
583
675
  args: [],
584
676
  source: "printString\x0a\x09^ String streamContents: [:aStream| \x0a \x09\x09\x09\x09aStream \x0a \x09\x09\x09\x09\x09nextPutAll: super printString;\x0a \x09\x09\x09\x09\x09nextPutAll: '(';\x0a \x09\x09\x09\x09\x09nextPutAll: selector;\x0a \x09\x09\x09\x09\x09nextPutAll: ')' \x09\x09\x09\x09]",
585
677
  messageSends: ["streamContents:", "nextPutAll:", "printString"],
@@ -594,8 +686,8 @@ selector: "selector",
594
686
  category: 'accessing',
595
687
  fn: function (){
596
688
  var self=this;
597
- return self['@selector'];
598
- return self;},
689
+ return self["@selector"];
690
+ },
599
691
  args: [],
600
692
  source: "selector\x0a\x09^selector",
601
693
  messageSends: [],
@@ -610,8 +702,8 @@ selector: "selector:",
610
702
  category: 'accessing',
611
703
  fn: function (aString){
612
704
  var self=this;
613
- (self['@selector']=aString);
614
- return self;},
705
+ self["@selector"]=aString;
706
+ return self},
615
707
  args: ["aString"],
616
708
  source: "selector: aString\x0a\x09selector := aString",
617
709
  messageSends: [],
@@ -626,11 +718,13 @@ selector: "sendTo:",
626
718
  category: 'printing',
627
719
  fn: function (anObject){
628
720
  var self=this;
629
- smalltalk.send(smalltalk.send((smalltalk.Smalltalk || Smalltalk), "_current", []), "_send_to_arguments_", [smalltalk.send(self, "_selector", []), anObject, smalltalk.send(self, "_arguments", [])]);
630
- return self;},
721
+ var $1;
722
+ $1=smalltalk.send(smalltalk.send((smalltalk.Smalltalk || Smalltalk),"_current",[]),"_send_to_arguments_",[smalltalk.send(self,"_selector",[]),anObject,smalltalk.send(self,"_arguments",[])]);
723
+ return $1;
724
+ },
631
725
  args: ["anObject"],
632
- source: "sendTo: anObject\x0a\x09Smalltalk current send: self selector to: anObject arguments: self arguments",
633
- messageSends: ["send:to:arguments:", "current", "selector", "arguments"],
726
+ source: "sendTo: anObject\x0a\x09^ Smalltalk current send: self selector to: anObject arguments: self arguments",
727
+ messageSends: ["send:to:arguments:", "selector", "arguments", "current"],
634
728
  referencedClasses: ["Smalltalk"]
635
729
  }),
636
730
  smalltalk.Message);
@@ -641,13 +735,19 @@ smalltalk.addMethod(
641
735
  smalltalk.method({
642
736
  selector: "selector:arguments:",
643
737
  category: 'instance creation',
644
- fn: function (aString, anArray){
645
- var self=this;
646
- return (function($rec){smalltalk.send($rec, "_selector_", [aString]);smalltalk.send($rec, "_arguments_", [anArray]);return smalltalk.send($rec, "_yourself", []);})(smalltalk.send(self, "_new", []));
647
- return self;},
738
+ fn: function (aString,anArray){
739
+ var self=this;
740
+ var $2,$3,$1;
741
+ $2=smalltalk.send(self,"_new",[]);
742
+ smalltalk.send($2,"_selector_",[aString]);
743
+ smalltalk.send($2,"_arguments_",[anArray]);
744
+ $3=smalltalk.send($2,"_yourself",[]);
745
+ $1=$3;
746
+ return $1;
747
+ },
648
748
  args: ["aString", "anArray"],
649
749
  source: "selector: aString arguments: anArray\x0a\x09^self new\x0a\x09\x09selector: aString;\x0a\x09\x09arguments: anArray;\x0a\x09\x09yourself",
650
- messageSends: ["selector:", "arguments:", "yourself", "new"],
750
+ messageSends: ["selector:", "new", "arguments:", "yourself"],
651
751
  referencedClasses: []
652
752
  }),
653
753
  smalltalk.Message.klass);
@@ -662,11 +762,13 @@ selector: "asString",
662
762
  category: 'accessing',
663
763
  fn: function (){
664
764
  var self=this;
665
- return smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(self, "_receiver", []), "_class", []), "_printString", []), "__comma", [" >> "]), "__comma", [smalltalk.send(self, "_selector", [])]);
666
- return self;},
765
+ var $1;
766
+ $1=smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(self,"_receiver",[]),"_class",[]),"_printString",[]),"__comma",[" >> "]),"__comma",[smalltalk.send(self,"_selector",[])]);
767
+ return $1;
768
+ },
667
769
  args: [],
668
770
  source: "asString\x0a\x09^self receiver class printString, ' >> ', self selector",
669
- messageSends: [",", "printString", "class", "receiver", "selector"],
771
+ messageSends: [",", "selector", "printString", "class", "receiver"],
670
772
  referencedClasses: []
671
773
  }),
672
774
  smalltalk.MethodContext);
@@ -679,7 +781,8 @@ category: 'accessing',
679
781
  fn: function (){
680
782
  var self=this;
681
783
  return self.homeContext;
682
- return self;},
784
+ ;
785
+ return self},
683
786
  args: [],
684
787
  source: "home\x0a\x09<return self.homeContext>",
685
788
  messageSends: [],
@@ -687,6 +790,23 @@ referencedClasses: []
687
790
  }),
688
791
  smalltalk.MethodContext);
689
792
 
793
+ smalltalk.addMethod(
794
+ "_pc",
795
+ smalltalk.method({
796
+ selector: "pc",
797
+ category: 'accessing',
798
+ fn: function (){
799
+ var self=this;
800
+ return self.pc;
801
+ ;
802
+ return self},
803
+ args: [],
804
+ source: "pc\x0a\x09<return self.pc>",
805
+ messageSends: [],
806
+ referencedClasses: []
807
+ }),
808
+ smalltalk.MethodContext);
809
+
690
810
  smalltalk.addMethod(
691
811
  "_printString",
692
812
  smalltalk.method({
@@ -694,11 +814,13 @@ selector: "printString",
694
814
  category: 'accessing',
695
815
  fn: function (){
696
816
  var self=this;
697
- return smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(self, "_printString", [], smalltalk.MethodContext.superclass || nil), "__comma", ["("]), "__comma", [smalltalk.send(self, "_asString", [])]), "__comma", [")"]);
698
- return self;},
817
+ var $1;
818
+ $1=smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(self,"_printString",[],smalltalk.Object),"__comma",["("]),"__comma",[smalltalk.send(self,"_asString",[])]),"__comma",[")"]);
819
+ return $1;
820
+ },
699
821
  args: [],
700
822
  source: "printString\x0a\x09^super printString, '(', self asString, ')'",
701
- messageSends: [",", "printString", "asString"],
823
+ messageSends: [",", "asString", "printString"],
702
824
  referencedClasses: []
703
825
  }),
704
826
  smalltalk.MethodContext);
@@ -711,7 +833,8 @@ category: 'accessing',
711
833
  fn: function (){
712
834
  var self=this;
713
835
  return self.receiver;
714
- return self;},
836
+ ;
837
+ return self},
715
838
  args: [],
716
839
  source: "receiver\x0a\x09<return self.receiver>",
717
840
  messageSends: [],
@@ -727,7 +850,8 @@ category: 'accessing',
727
850
  fn: function (){
728
851
  var self=this;
729
852
  return smalltalk.convertSelector(self.selector);
730
- return self;},
853
+ ;
854
+ return self},
731
855
  args: [],
732
856
  source: "selector\x0a\x09<return smalltalk.convertSelector(self.selector)>",
733
857
  messageSends: [],
@@ -743,7 +867,8 @@ category: 'accessing',
743
867
  fn: function (){
744
868
  var self=this;
745
869
  return self.temps;
746
- return self;},
870
+ ;
871
+ return self},
747
872
  args: [],
748
873
  source: "temps\x0a\x09<return self.temps>",
749
874
  messageSends: [],