resin 0.2.1 → 0.2.2

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 (60) hide show
  1. data/README.markdown +2 -0
  2. data/amber/bin/nodecompile.js +3 -3
  3. data/amber/css/amber.css +47 -23
  4. data/amber/images/off.amber.png +0 -0
  5. data/amber/images/offHover.amber.png +0 -0
  6. data/amber/images/sprite.amber.png +0 -0
  7. data/amber/images/tinylogo.amber.png +0 -0
  8. data/amber/js/Benchfib.deploy.js +34 -34
  9. data/amber/js/Benchfib.js +49 -49
  10. data/amber/js/Canvas.deploy.js +937 -937
  11. data/amber/js/Canvas.js +1622 -1622
  12. data/amber/js/Compiler-Tests.deploy.js +97 -0
  13. data/amber/js/Compiler-Tests.js +137 -0
  14. data/amber/js/Compiler.deploy.js +1030 -924
  15. data/amber/js/Compiler.js +1613 -1467
  16. data/amber/js/Documentation.deploy.js +417 -417
  17. data/amber/js/Documentation.js +728 -728
  18. data/amber/js/Examples.deploy.js +24 -13
  19. data/amber/js/Examples.js +36 -19
  20. data/amber/js/IDE.deploy.js +1583 -1527
  21. data/amber/js/IDE.js +2586 -2510
  22. data/amber/js/Kernel-Announcements.deploy.js +19 -19
  23. data/amber/js/Kernel-Announcements.js +28 -28
  24. data/amber/js/Kernel-Classes.deploy.js +332 -229
  25. data/amber/js/Kernel-Classes.js +532 -384
  26. data/amber/js/Kernel-Collections.deploy.js +1516 -1712
  27. data/amber/js/Kernel-Collections.js +2436 -2712
  28. data/amber/js/Kernel-Exceptions.deploy.js +85 -62
  29. data/amber/js/Kernel-Exceptions.js +131 -98
  30. data/amber/js/Kernel-Methods.deploy.js +326 -378
  31. data/amber/js/Kernel-Methods.js +473 -525
  32. data/amber/js/Kernel-Objects.deploy.js +1777 -2428
  33. data/amber/js/Kernel-Objects.js +2599 -3426
  34. data/amber/js/Kernel-Tests.deploy.js +871 -772
  35. data/amber/js/Kernel-Tests.js +1207 -1083
  36. data/amber/js/Kernel-Transcript.deploy.js +57 -57
  37. data/amber/js/Kernel-Transcript.js +94 -94
  38. data/amber/js/SUnit.deploy.js +116 -116
  39. data/amber/js/SUnit.js +211 -211
  40. data/amber/js/amber.js +10 -11
  41. data/amber/js/boot.js +132 -156
  42. data/amber/js/init.js +2 -2
  43. data/amber/js/parser.js +2095 -3014
  44. data/amber/js/parser.pegjs +1 -1
  45. data/amber/st/Benchfib.st +22 -22
  46. data/amber/st/Canvas.st +471 -471
  47. data/amber/st/Compiler-Tests.st +471 -0
  48. data/amber/st/Compiler.st +858 -794
  49. data/amber/st/Examples.st +22 -5
  50. data/amber/st/IDE.st +1326 -1291
  51. data/amber/st/Kernel-Announcements.st +2 -2
  52. data/amber/st/Kernel-Classes.st +148 -90
  53. data/amber/st/Kernel-Collections.st +950 -1061
  54. data/amber/st/Kernel-Exceptions.st +33 -25
  55. data/amber/st/Kernel-Methods.st +151 -151
  56. data/amber/st/Kernel-Objects.st +891 -1036
  57. data/amber/st/Kernel-Tests.st +622 -544
  58. data/amber/st/Kernel-Transcript.st +38 -38
  59. data/amber/st/SUnit.st +53 -53
  60. metadata +27 -20
data/amber/js/Kernel-Exceptions.deploy.js CHANGED
@@ -1,79 +1,102 @@
1
1
  smalltalk.addPackage('Kernel-Exceptions', {});
2
2
  smalltalk.addClass('Error', smalltalk.Object, ['messageText'], 'Kernel-Exceptions');
3
3
  smalltalk.addMethod(
4
- '_messageText',
4
+ "_context",
5
5
  smalltalk.method({
6
- selector: 'messageText',
6
+ selector: "context",
7
7
  fn: function (){
8
8
  var self=this;
9
- return self['@messageText'];
9
+ return self.context;
10
10
  return self;}
11
11
  }),
12
12
  smalltalk.Error);
13
13
 
14
14
  smalltalk.addMethod(
15
- '_messageText_',
15
+ "_isSmalltalkError",
16
16
  smalltalk.method({
17
- selector: 'messageText:',
18
- fn: function (aString){
17
+ selector: "isSmalltalkError",
18
+ fn: function (){
19
19
  var self=this;
20
- (self['@messageText']=aString);
20
+ return self.smalltalkError === true;
21
21
  return self;}
22
22
  }),
23
23
  smalltalk.Error);
24
24
 
25
25
  smalltalk.addMethod(
26
- '_signal',
26
+ "_jsStack",
27
27
  smalltalk.method({
28
- selector: 'signal',
28
+ selector: "jsStack",
29
29
  fn: function (){
30
30
  var self=this;
31
- self.context = smalltalk.getThisContext(); self.smalltalkError = true; throw(self);
31
+ return self.stack;
32
32
  return self;}
33
33
  }),
34
34
  smalltalk.Error);
35
35
 
36
36
  smalltalk.addMethod(
37
- '_context',
37
+ "_messageText",
38
38
  smalltalk.method({
39
- selector: 'context',
39
+ selector: "messageText",
40
40
  fn: function (){
41
41
  var self=this;
42
- return self.context;
42
+ return self['@messageText'];
43
43
  return self;}
44
44
  }),
45
45
  smalltalk.Error);
46
46
 
47
47
  smalltalk.addMethod(
48
- '_jsStack',
48
+ "_messageText_",
49
49
  smalltalk.method({
50
- selector: 'jsStack',
51
- fn: function (){
50
+ selector: "messageText:",
51
+ fn: function (aString){
52
52
  var self=this;
53
- return self.stack;
53
+ (self['@messageText']=aString);
54
54
  return self;}
55
55
  }),
56
56
  smalltalk.Error);
57
57
 
58
58
  smalltalk.addMethod(
59
- '_isSmalltalkError',
59
+ "_signal",
60
60
  smalltalk.method({
61
- selector: 'isSmalltalkError',
61
+ selector: "signal",
62
62
  fn: function (){
63
63
  var self=this;
64
- return self.smalltalkError === true;
64
+ self.context = smalltalk.getThisContext(); self.smalltalkError = true; throw(self);
65
+ return self;}
66
+ }),
67
+ smalltalk.Error);
68
+
69
+ smalltalk.addMethod(
70
+ "_signal_",
71
+ smalltalk.method({
72
+ selector: "signal:",
73
+ fn: function (aString){
74
+ var self=this;
75
+ smalltalk.send(self, "_messageText_", [aString]);
76
+ smalltalk.send(self, "_signal", []);
65
77
  return self;}
66
78
  }),
67
79
  smalltalk.Error);
68
80
 
69
81
 
70
82
  smalltalk.addMethod(
71
- '_signal_',
83
+ "_signal",
84
+ smalltalk.method({
85
+ selector: "signal",
86
+ fn: function (){
87
+ var self=this;
88
+ return smalltalk.send(smalltalk.send(self, "_new", []), "_signal", []);
89
+ return self;}
90
+ }),
91
+ smalltalk.Error.klass);
92
+
93
+ smalltalk.addMethod(
94
+ "_signal_",
72
95
  smalltalk.method({
73
- selector: 'signal:',
96
+ selector: "signal:",
74
97
  fn: function (aString){
75
98
  var self=this;
76
- return (function($rec){smalltalk.send($rec, "_messageText_", [aString]);return smalltalk.send($rec, "_signal", []);})(smalltalk.send(self, "_new", []));
99
+ return smalltalk.send(smalltalk.send(self, "_new", []), "_signal_", [aString]);
77
100
  return self;}
78
101
  }),
79
102
  smalltalk.Error.klass);
@@ -81,9 +104,9 @@ smalltalk.Error.klass);
81
104
 
82
105
  smalltalk.addClass('MessageNotUnderstood', smalltalk.Error, ['message', 'receiver'], 'Kernel-Exceptions');
83
106
  smalltalk.addMethod(
84
- '_message',
107
+ "_message",
85
108
  smalltalk.method({
86
- selector: 'message',
109
+ selector: "message",
87
110
  fn: function (){
88
111
  var self=this;
89
112
  return self['@message'];
@@ -92,9 +115,9 @@ return self;}
92
115
  smalltalk.MessageNotUnderstood);
93
116
 
94
117
  smalltalk.addMethod(
95
- '_message_',
118
+ "_message_",
96
119
  smalltalk.method({
97
- selector: 'message:',
120
+ selector: "message:",
98
121
  fn: function (aMessage){
99
122
  var self=this;
100
123
  (self['@message']=aMessage);
@@ -103,34 +126,34 @@ return self;}
103
126
  smalltalk.MessageNotUnderstood);
104
127
 
105
128
  smalltalk.addMethod(
106
- '_receiver',
129
+ "_messageText",
107
130
  smalltalk.method({
108
- selector: 'receiver',
131
+ selector: "messageText",
109
132
  fn: function (){
110
133
  var self=this;
111
- return self['@receiver'];
134
+ return smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(self, "_receiver", []), "_asString", []), "__comma", [" does not understand #"]), "__comma", [smalltalk.send(smalltalk.send(self, "_message", []), "_selector", [])]);
112
135
  return self;}
113
136
  }),
114
137
  smalltalk.MessageNotUnderstood);
115
138
 
116
139
  smalltalk.addMethod(
117
- '_receiver_',
140
+ "_receiver",
118
141
  smalltalk.method({
119
- selector: 'receiver:',
120
- fn: function (anObject){
142
+ selector: "receiver",
143
+ fn: function (){
121
144
  var self=this;
122
- (self['@receiver']=anObject);
145
+ return self['@receiver'];
123
146
  return self;}
124
147
  }),
125
148
  smalltalk.MessageNotUnderstood);
126
149
 
127
150
  smalltalk.addMethod(
128
- '_messageText',
151
+ "_receiver_",
129
152
  smalltalk.method({
130
- selector: 'messageText',
131
- fn: function (){
153
+ selector: "receiver:",
154
+ fn: function (anObject){
132
155
  var self=this;
133
- return smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(self, "_receiver", []), "_asString", []), "__comma", [unescape("%20does%20not%20understand%20%23")]), "__comma", [smalltalk.send(smalltalk.send(self, "_message", []), "_selector", [])]);
156
+ (self['@receiver']=anObject);
134
157
  return self;}
135
158
  }),
136
159
  smalltalk.MessageNotUnderstood);
@@ -139,9 +162,9 @@ smalltalk.MessageNotUnderstood);
139
162
 
140
163
  smalltalk.addClass('ErrorHandler', smalltalk.Object, [], 'Kernel-Exceptions');
141
164
  smalltalk.addMethod(
142
- '_handleError_',
165
+ "_handleError_",
143
166
  smalltalk.method({
144
- selector: 'handleError:',
167
+ selector: "handleError:",
145
168
  fn: function (anError){
146
169
  var self=this;
147
170
  (($receiver = smalltalk.send(anError, "_context", [])) != nil && $receiver != undefined) ? (function(){return smalltalk.send(self, "_logErrorContext_", [smalltalk.send(anError, "_context", [])]);})() : nil;
@@ -151,32 +174,32 @@ return self;}
151
174
  smalltalk.ErrorHandler);
152
175
 
153
176
  smalltalk.addMethod(
154
- '_logContext_',
177
+ "_log_",
155
178
  smalltalk.method({
156
- selector: 'logContext:',
157
- fn: function (aContext){
179
+ selector: "log:",
180
+ fn: function (aString){
158
181
  var self=this;
159
- (($receiver = smalltalk.send(aContext, "_home", [])) != nil && $receiver != undefined) ? (function(){return smalltalk.send(self, "_logContext_", [smalltalk.send(aContext, "_home", [])]);})() : nil;
160
- smalltalk.send(self, "_log_", [smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(aContext, "_receiver", []), "_asString", []), "__comma", [unescape("%3E%3E")]), "__comma", [smalltalk.send(aContext, "_selector", [])])]);
182
+ smalltalk.send((typeof console == 'undefined' ? nil : console), "_log_", [aString]);
161
183
  return self;}
162
184
  }),
163
185
  smalltalk.ErrorHandler);
164
186
 
165
187
  smalltalk.addMethod(
166
- '_logErrorContext_',
188
+ "_logContext_",
167
189
  smalltalk.method({
168
- selector: 'logErrorContext:',
190
+ selector: "logContext:",
169
191
  fn: function (aContext){
170
192
  var self=this;
171
- (($receiver = aContext) != nil && $receiver != undefined) ? (function(){return (($receiver = smalltalk.send(aContext, "_home", [])) != nil && $receiver != undefined) ? (function(){return smalltalk.send(self, "_logContext_", [smalltalk.send(aContext, "_home", [])]);})() : nil;})() : nil;
193
+ (($receiver = smalltalk.send(aContext, "_home", [])) != nil && $receiver != undefined) ? (function(){return smalltalk.send(self, "_logContext_", [smalltalk.send(aContext, "_home", [])]);})() : nil;
194
+ smalltalk.send(self, "_log_", [smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(aContext, "_receiver", []), "_asString", []), "__comma", [">>"]), "__comma", [smalltalk.send(aContext, "_selector", [])])]);
172
195
  return self;}
173
196
  }),
174
197
  smalltalk.ErrorHandler);
175
198
 
176
199
  smalltalk.addMethod(
177
- '_logError_',
200
+ "_logError_",
178
201
  smalltalk.method({
179
- selector: 'logError:',
202
+ selector: "logError:",
180
203
  fn: function (anError){
181
204
  var self=this;
182
205
  smalltalk.send(self, "_log_", [smalltalk.send(anError, "_messageText", [])]);
@@ -185,12 +208,12 @@ return self;}
185
208
  smalltalk.ErrorHandler);
186
209
 
187
210
  smalltalk.addMethod(
188
- '_log_',
211
+ "_logErrorContext_",
189
212
  smalltalk.method({
190
- selector: 'log:',
191
- fn: function (aString){
213
+ selector: "logErrorContext:",
214
+ fn: function (aContext){
192
215
  var self=this;
193
- smalltalk.send((typeof console == 'undefined' ? nil : console), "_log_", [aString]);
216
+ (($receiver = aContext) != nil && $receiver != undefined) ? (function(){return (($receiver = smalltalk.send(aContext, "_home", [])) != nil && $receiver != undefined) ? (function(){return smalltalk.send(self, "_logContext_", [smalltalk.send(aContext, "_home", [])]);})() : nil;})() : nil;
194
217
  return self;}
195
218
  }),
196
219
  smalltalk.ErrorHandler);
@@ -198,9 +221,9 @@ smalltalk.ErrorHandler);
198
221
 
199
222
  smalltalk.ErrorHandler.klass.iVarNames = ['current'];
200
223
  smalltalk.addMethod(
201
- '_current',
224
+ "_current",
202
225
  smalltalk.method({
203
- selector: 'current',
226
+ selector: "current",
204
227
  fn: function (){
205
228
  var self=this;
206
229
  return (($receiver = self['@current']) == nil || $receiver == undefined) ? (function(){return (self['@current']=smalltalk.send(self, "_new", []));})() : $receiver;
@@ -209,9 +232,9 @@ return self;}
209
232
  smalltalk.ErrorHandler.klass);
210
233
 
211
234
  smalltalk.addMethod(
212
- '_initialize',
235
+ "_initialize",
213
236
  smalltalk.method({
214
- selector: 'initialize',
237
+ selector: "initialize",
215
238
  fn: function (){
216
239
  var self=this;
217
240
  smalltalk.send(self, "_register", []);
@@ -220,9 +243,9 @@ return self;}
220
243
  smalltalk.ErrorHandler.klass);
221
244
 
222
245
  smalltalk.addMethod(
223
- '_register',
246
+ "_register",
224
247
  smalltalk.method({
225
- selector: 'register',
248
+ selector: "register",
226
249
  fn: function (){
227
250
  var self=this;
228
251
  smalltalk.send((smalltalk.ErrorHandler || ErrorHandler), "_setCurrent_", [smalltalk.send(self, "_new", [])]);
@@ -231,9 +254,9 @@ return self;}
231
254
  smalltalk.ErrorHandler.klass);
232
255
 
233
256
  smalltalk.addMethod(
234
- '_setCurrent_',
257
+ "_setCurrent_",
235
258
  smalltalk.method({
236
- selector: 'setCurrent:',
259
+ selector: "setCurrent:",
237
260
  fn: function (anHandler){
238
261
  var self=this;
239
262
  (self['@current']=anHandler);
data/amber/js/Kernel-Exceptions.js CHANGED
@@ -1,114 +1,147 @@
1
1
  smalltalk.addPackage('Kernel-Exceptions', {});
2
2
  smalltalk.addClass('Error', smalltalk.Object, ['messageText'], 'Kernel-Exceptions');
3
3
  smalltalk.addMethod(
4
- unescape('_messageText'),
4
+ "_context",
5
5
  smalltalk.method({
6
- selector: unescape('messageText'),
6
+ selector: "context",
7
7
  category: 'accessing',
8
8
  fn: function (){
9
9
  var self=this;
10
- return self['@messageText'];
10
+ return self.context;
11
11
  return self;},
12
12
  args: [],
13
- source: unescape('messageText%0A%09%5EmessageText'),
13
+ source: "context\x0a\x09<return self.context>",
14
14
  messageSends: [],
15
15
  referencedClasses: []
16
16
  }),
17
17
  smalltalk.Error);
18
18
 
19
19
  smalltalk.addMethod(
20
- unescape('_messageText_'),
20
+ "_isSmalltalkError",
21
21
  smalltalk.method({
22
- selector: unescape('messageText%3A'),
23
- category: 'accessing',
24
- fn: function (aString){
22
+ selector: "isSmalltalkError",
23
+ category: 'testing',
24
+ fn: function (){
25
25
  var self=this;
26
- (self['@messageText']=aString);
26
+ return self.smalltalkError === true;
27
27
  return self;},
28
- args: ["aString"],
29
- source: unescape('messageText%3A%20aString%0A%09messageText%20%3A%3D%20aString'),
28
+ args: [],
29
+ source: "isSmalltalkError\x0a\x09<return self.smalltalkError === true>",
30
30
  messageSends: [],
31
31
  referencedClasses: []
32
32
  }),
33
33
  smalltalk.Error);
34
34
 
35
35
  smalltalk.addMethod(
36
- unescape('_signal'),
36
+ "_jsStack",
37
37
  smalltalk.method({
38
- selector: unescape('signal'),
39
- category: 'signaling',
38
+ selector: "jsStack",
39
+ category: 'accessing',
40
40
  fn: function (){
41
41
  var self=this;
42
- self.context = smalltalk.getThisContext(); self.smalltalkError = true; throw(self);
42
+ return self.stack;
43
43
  return self;},
44
44
  args: [],
45
- source: unescape('signal%0A%09%3Cself.context%20%3D%20smalltalk.getThisContext%28%29%3B%20self.smalltalkError%20%3D%20true%3B%20throw%28self%29%3E'),
45
+ source: "jsStack\x0a\x09<return self.stack>",
46
46
  messageSends: [],
47
47
  referencedClasses: []
48
48
  }),
49
49
  smalltalk.Error);
50
50
 
51
51
  smalltalk.addMethod(
52
- unescape('_context'),
52
+ "_messageText",
53
53
  smalltalk.method({
54
- selector: unescape('context'),
54
+ selector: "messageText",
55
55
  category: 'accessing',
56
56
  fn: function (){
57
57
  var self=this;
58
- return self.context;
58
+ return self['@messageText'];
59
59
  return self;},
60
60
  args: [],
61
- source: unescape('context%0A%09%3Creturn%20self.context%3E'),
61
+ source: "messageText\x0a\x09^messageText",
62
62
  messageSends: [],
63
63
  referencedClasses: []
64
64
  }),
65
65
  smalltalk.Error);
66
66
 
67
67
  smalltalk.addMethod(
68
- unescape('_jsStack'),
68
+ "_messageText_",
69
69
  smalltalk.method({
70
- selector: unescape('jsStack'),
70
+ selector: "messageText:",
71
71
  category: 'accessing',
72
- fn: function (){
72
+ fn: function (aString){
73
73
  var self=this;
74
- return self.stack;
74
+ (self['@messageText']=aString);
75
75
  return self;},
76
- args: [],
77
- source: unescape('jsStack%0A%09%3Creturn%20self.stack%3E'),
76
+ args: ["aString"],
77
+ source: "messageText: aString\x0a\x09messageText := aString",
78
78
  messageSends: [],
79
79
  referencedClasses: []
80
80
  }),
81
81
  smalltalk.Error);
82
82
 
83
83
  smalltalk.addMethod(
84
- unescape('_isSmalltalkError'),
84
+ "_signal",
85
85
  smalltalk.method({
86
- selector: unescape('isSmalltalkError'),
87
- category: 'testing',
86
+ selector: "signal",
87
+ category: 'signaling',
88
88
  fn: function (){
89
89
  var self=this;
90
- return self.smalltalkError === true;
90
+ self.context = smalltalk.getThisContext(); self.smalltalkError = true; throw(self);
91
91
  return self;},
92
92
  args: [],
93
- source: unescape('isSmalltalkError%0A%09%3Creturn%20self.smalltalkError%20%3D%3D%3D%20true%3E'),
93
+ source: "signal\x0a\x09<self.context = smalltalk.getThisContext(); self.smalltalkError = true; throw(self)>",
94
94
  messageSends: [],
95
95
  referencedClasses: []
96
96
  }),
97
97
  smalltalk.Error);
98
98
 
99
+ smalltalk.addMethod(
100
+ "_signal_",
101
+ smalltalk.method({
102
+ selector: "signal:",
103
+ category: 'signaling',
104
+ fn: function (aString){
105
+ var self=this;
106
+ smalltalk.send(self, "_messageText_", [aString]);
107
+ smalltalk.send(self, "_signal", []);
108
+ return self;},
109
+ args: ["aString"],
110
+ source: "signal: aString\x0a\x09self messageText: aString.\x0a\x09self signal",
111
+ messageSends: ["messageText:", "signal"],
112
+ referencedClasses: []
113
+ }),
114
+ smalltalk.Error);
115
+
116
+
117
+ smalltalk.addMethod(
118
+ "_signal",
119
+ smalltalk.method({
120
+ selector: "signal",
121
+ category: 'instance creation',
122
+ fn: function (){
123
+ var self=this;
124
+ return smalltalk.send(smalltalk.send(self, "_new", []), "_signal", []);
125
+ return self;},
126
+ args: [],
127
+ source: "signal\x0a\x09^self new signal",
128
+ messageSends: ["signal", "new"],
129
+ referencedClasses: []
130
+ }),
131
+ smalltalk.Error.klass);
99
132
 
100
133
  smalltalk.addMethod(
101
- unescape('_signal_'),
134
+ "_signal_",
102
135
  smalltalk.method({
103
- selector: unescape('signal%3A'),
136
+ selector: "signal:",
104
137
  category: 'instance creation',
105
138
  fn: function (aString){
106
139
  var self=this;
107
- return (function($rec){smalltalk.send($rec, "_messageText_", [aString]);return smalltalk.send($rec, "_signal", []);})(smalltalk.send(self, "_new", []));
140
+ return smalltalk.send(smalltalk.send(self, "_new", []), "_signal_", [aString]);
108
141
  return self;},
109
142
  args: ["aString"],
110
- source: unescape('signal%3A%20aString%0A%09%20%20%20%20%5Eself%20new%0A%09%09messageText%3A%20aString%3B%0A%09%09signal'),
111
- messageSends: ["messageText:", "signal", "new"],
143
+ source: "signal: aString\x0a\x09 ^self new\x0a\x09\x09signal: aString",
144
+ messageSends: ["signal:", "new"],
112
145
  referencedClasses: []
113
146
  }),
114
147
  smalltalk.Error.klass);
@@ -116,81 +149,81 @@ smalltalk.Error.klass);
116
149
 
117
150
  smalltalk.addClass('MessageNotUnderstood', smalltalk.Error, ['message', 'receiver'], 'Kernel-Exceptions');
118
151
  smalltalk.addMethod(
119
- unescape('_message'),
152
+ "_message",
120
153
  smalltalk.method({
121
- selector: unescape('message'),
154
+ selector: "message",
122
155
  category: 'accessing',
123
156
  fn: function (){
124
157
  var self=this;
125
158
  return self['@message'];
126
159
  return self;},
127
160
  args: [],
128
- source: unescape('message%0A%09%5Emessage'),
161
+ source: "message\x0a\x09^message",
129
162
  messageSends: [],
130
163
  referencedClasses: []
131
164
  }),
132
165
  smalltalk.MessageNotUnderstood);
133
166
 
134
167
  smalltalk.addMethod(
135
- unescape('_message_'),
168
+ "_message_",
136
169
  smalltalk.method({
137
- selector: unescape('message%3A'),
170
+ selector: "message:",
138
171
  category: 'accessing',
139
172
  fn: function (aMessage){
140
173
  var self=this;
141
174
  (self['@message']=aMessage);
142
175
  return self;},
143
176
  args: ["aMessage"],
144
- source: unescape('message%3A%20aMessage%0A%09message%20%3A%3D%20aMessage'),
177
+ source: "message: aMessage\x0a\x09message := aMessage",
145
178
  messageSends: [],
146
179
  referencedClasses: []
147
180
  }),
148
181
  smalltalk.MessageNotUnderstood);
149
182
 
150
183
  smalltalk.addMethod(
151
- unescape('_receiver'),
184
+ "_messageText",
152
185
  smalltalk.method({
153
- selector: unescape('receiver'),
186
+ selector: "messageText",
154
187
  category: 'accessing',
155
188
  fn: function (){
156
189
  var self=this;
157
- return self['@receiver'];
190
+ return smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(self, "_receiver", []), "_asString", []), "__comma", [" does not understand #"]), "__comma", [smalltalk.send(smalltalk.send(self, "_message", []), "_selector", [])]);
158
191
  return self;},
159
192
  args: [],
160
- source: unescape('receiver%0A%09%5Ereceiver'),
161
- messageSends: [],
193
+ source: "messageText\x0a\x09^self receiver asString, ' does not understand #', self message selector",
194
+ messageSends: [",", "asString", "receiver", "selector", "message"],
162
195
  referencedClasses: []
163
196
  }),
164
197
  smalltalk.MessageNotUnderstood);
165
198
 
166
199
  smalltalk.addMethod(
167
- unescape('_receiver_'),
200
+ "_receiver",
168
201
  smalltalk.method({
169
- selector: unescape('receiver%3A'),
202
+ selector: "receiver",
170
203
  category: 'accessing',
171
- fn: function (anObject){
204
+ fn: function (){
172
205
  var self=this;
173
- (self['@receiver']=anObject);
206
+ return self['@receiver'];
174
207
  return self;},
175
- args: ["anObject"],
176
- source: unescape('receiver%3A%20anObject%0A%09receiver%20%3A%3D%20anObject'),
208
+ args: [],
209
+ source: "receiver\x0a\x09^receiver",
177
210
  messageSends: [],
178
211
  referencedClasses: []
179
212
  }),
180
213
  smalltalk.MessageNotUnderstood);
181
214
 
182
215
  smalltalk.addMethod(
183
- unescape('_messageText'),
216
+ "_receiver_",
184
217
  smalltalk.method({
185
- selector: unescape('messageText'),
218
+ selector: "receiver:",
186
219
  category: 'accessing',
187
- fn: function (){
220
+ fn: function (anObject){
188
221
  var self=this;
189
- return smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(self, "_receiver", []), "_asString", []), "__comma", [unescape("%20does%20not%20understand%20%23")]), "__comma", [smalltalk.send(smalltalk.send(self, "_message", []), "_selector", [])]);
222
+ (self['@receiver']=anObject);
190
223
  return self;},
191
- args: [],
192
- source: unescape('messageText%0A%09%5Eself%20receiver%20asString%2C%20%27%20does%20not%20understand%20%23%27%2C%20self%20message%20selector'),
193
- messageSends: [unescape("%2C"), "asString", "receiver", "selector", "message"],
224
+ args: ["anObject"],
225
+ source: "receiver: anObject\x0a\x09receiver := anObject",
226
+ messageSends: [],
194
227
  referencedClasses: []
195
228
  }),
196
229
  smalltalk.MessageNotUnderstood);
@@ -199,9 +232,9 @@ smalltalk.MessageNotUnderstood);
199
232
 
200
233
  smalltalk.addClass('ErrorHandler', smalltalk.Object, [], 'Kernel-Exceptions');
201
234
  smalltalk.addMethod(
202
- unescape('_handleError_'),
235
+ "_handleError_",
203
236
  smalltalk.method({
204
- selector: unescape('handleError%3A'),
237
+ selector: "handleError:",
205
238
  category: 'error handling',
206
239
  fn: function (anError){
207
240
  var self=this;
@@ -209,73 +242,73 @@ var self=this;
209
242
  smalltalk.send(self, "_logError_", [anError]);
210
243
  return self;},
211
244
  args: ["anError"],
212
- source: unescape('handleError%3A%20anError%0A%09anError%20context%20ifNotNil%3A%20%5Bself%20logErrorContext%3A%20anError%20context%5D.%0A%09self%20logError%3A%20anError'),
245
+ source: "handleError: anError\x0a\x09anError context ifNotNil: [self logErrorContext: anError context].\x0a\x09self logError: anError",
213
246
  messageSends: ["ifNotNil:", "context", "logErrorContext:", "logError:"],
214
247
  referencedClasses: []
215
248
  }),
216
249
  smalltalk.ErrorHandler);
217
250
 
218
251
  smalltalk.addMethod(
219
- unescape('_logContext_'),
252
+ "_log_",
220
253
  smalltalk.method({
221
- selector: unescape('logContext%3A'),
254
+ selector: "log:",
222
255
  category: 'private',
223
- fn: function (aContext){
256
+ fn: function (aString){
224
257
  var self=this;
225
- (($receiver = smalltalk.send(aContext, "_home", [])) != nil && $receiver != undefined) ? (function(){return smalltalk.send(self, "_logContext_", [smalltalk.send(aContext, "_home", [])]);})() : nil;
226
- smalltalk.send(self, "_log_", [smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(aContext, "_receiver", []), "_asString", []), "__comma", [unescape("%3E%3E")]), "__comma", [smalltalk.send(aContext, "_selector", [])])]);
258
+ smalltalk.send((typeof console == 'undefined' ? nil : console), "_log_", [aString]);
227
259
  return self;},
228
- args: ["aContext"],
229
- source: unescape('logContext%3A%20aContext%0A%09aContext%20home%20ifNotNil%3A%20%5B%0A%09%09self%20logContext%3A%20aContext%20home%5D.%0A%09self%20log%3A%20aContext%20receiver%20asString%2C%20%27%3E%3E%27%2C%20aContext%20selector'),
230
- messageSends: ["ifNotNil:", "home", "logContext:", "log:", unescape("%2C"), "asString", "receiver", "selector"],
260
+ args: ["aString"],
261
+ source: "log: aString\x0a\x09console log: aString",
262
+ messageSends: ["log:"],
231
263
  referencedClasses: []
232
264
  }),
233
265
  smalltalk.ErrorHandler);
234
266
 
235
267
  smalltalk.addMethod(
236
- unescape('_logErrorContext_'),
268
+ "_logContext_",
237
269
  smalltalk.method({
238
- selector: unescape('logErrorContext%3A'),
270
+ selector: "logContext:",
239
271
  category: 'private',
240
272
  fn: function (aContext){
241
273
  var self=this;
242
- (($receiver = aContext) != nil && $receiver != undefined) ? (function(){return (($receiver = smalltalk.send(aContext, "_home", [])) != nil && $receiver != undefined) ? (function(){return smalltalk.send(self, "_logContext_", [smalltalk.send(aContext, "_home", [])]);})() : nil;})() : nil;
274
+ (($receiver = smalltalk.send(aContext, "_home", [])) != nil && $receiver != undefined) ? (function(){return smalltalk.send(self, "_logContext_", [smalltalk.send(aContext, "_home", [])]);})() : nil;
275
+ smalltalk.send(self, "_log_", [smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(aContext, "_receiver", []), "_asString", []), "__comma", [">>"]), "__comma", [smalltalk.send(aContext, "_selector", [])])]);
243
276
  return self;},
244
277
  args: ["aContext"],
245
- source: unescape('logErrorContext%3A%20aContext%0A%09aContext%20ifNotNil%3A%20%5B%0A%09%09aContext%20home%20ifNotNil%3A%20%5B%0A%09%09%09self%20logContext%3A%20aContext%20home%5D%5D'),
246
- messageSends: ["ifNotNil:", "home", "logContext:"],
278
+ source: "logContext: aContext\x0a\x09aContext home ifNotNil: [\x0a\x09\x09self logContext: aContext home].\x0a\x09self log: aContext receiver asString, '>>', aContext selector",
279
+ messageSends: ["ifNotNil:", "home", "logContext:", "log:", ",", "asString", "receiver", "selector"],
247
280
  referencedClasses: []
248
281
  }),
249
282
  smalltalk.ErrorHandler);
250
283
 
251
284
  smalltalk.addMethod(
252
- unescape('_logError_'),
285
+ "_logError_",
253
286
  smalltalk.method({
254
- selector: unescape('logError%3A'),
287
+ selector: "logError:",
255
288
  category: 'private',
256
289
  fn: function (anError){
257
290
  var self=this;
258
291
  smalltalk.send(self, "_log_", [smalltalk.send(anError, "_messageText", [])]);
259
292
  return self;},
260
293
  args: ["anError"],
261
- source: unescape('logError%3A%20anError%0A%09self%20log%3A%20anError%20messageText'),
294
+ source: "logError: anError\x0a\x09self log: anError messageText",
262
295
  messageSends: ["log:", "messageText"],
263
296
  referencedClasses: []
264
297
  }),
265
298
  smalltalk.ErrorHandler);
266
299
 
267
300
  smalltalk.addMethod(
268
- unescape('_log_'),
301
+ "_logErrorContext_",
269
302
  smalltalk.method({
270
- selector: unescape('log%3A'),
303
+ selector: "logErrorContext:",
271
304
  category: 'private',
272
- fn: function (aString){
305
+ fn: function (aContext){
273
306
  var self=this;
274
- smalltalk.send((typeof console == 'undefined' ? nil : console), "_log_", [aString]);
307
+ (($receiver = aContext) != nil && $receiver != undefined) ? (function(){return (($receiver = smalltalk.send(aContext, "_home", [])) != nil && $receiver != undefined) ? (function(){return smalltalk.send(self, "_logContext_", [smalltalk.send(aContext, "_home", [])]);})() : nil;})() : nil;
275
308
  return self;},
276
- args: ["aString"],
277
- source: unescape('log%3A%20aString%0A%09console%20log%3A%20aString'),
278
- messageSends: ["log:"],
309
+ args: ["aContext"],
310
+ source: "logErrorContext: aContext\x0a\x09aContext ifNotNil: [\x0a\x09\x09aContext home ifNotNil: [\x0a\x09\x09\x09self logContext: aContext home]]",
311
+ messageSends: ["ifNotNil:", "home", "logContext:"],
279
312
  referencedClasses: []
280
313
  }),
281
314
  smalltalk.ErrorHandler);
@@ -283,64 +316,64 @@ smalltalk.ErrorHandler);
283
316
 
284
317
  smalltalk.ErrorHandler.klass.iVarNames = ['current'];
285
318
  smalltalk.addMethod(
286
- unescape('_current'),
319
+ "_current",
287
320
  smalltalk.method({
288
- selector: unescape('current'),
321
+ selector: "current",
289
322
  category: 'accessing',
290
323
  fn: function (){
291
324
  var self=this;
292
325
  return (($receiver = self['@current']) == nil || $receiver == undefined) ? (function(){return (self['@current']=smalltalk.send(self, "_new", []));})() : $receiver;
293
326
  return self;},
294
327
  args: [],
295
- source: unescape('current%0A%09%5Ecurrent%20ifNil%3A%20%5Bcurrent%20%3A%3D%20self%20new%5D'),
328
+ source: "current\x0a\x09^current ifNil: [current := self new]",
296
329
  messageSends: ["ifNil:", "new"],
297
330
  referencedClasses: []
298
331
  }),
299
332
  smalltalk.ErrorHandler.klass);
300
333
 
301
334
  smalltalk.addMethod(
302
- unescape('_initialize'),
335
+ "_initialize",
303
336
  smalltalk.method({
304
- selector: unescape('initialize'),
337
+ selector: "initialize",
305
338
  category: 'initialization',
306
339
  fn: function (){
307
340
  var self=this;
308
341
  smalltalk.send(self, "_register", []);
309
342
  return self;},
310
343
  args: [],
311
- source: unescape('initialize%0A%09self%20register'),
344
+ source: "initialize\x0a\x09self register",
312
345
  messageSends: ["register"],
313
346
  referencedClasses: []
314
347
  }),
315
348
  smalltalk.ErrorHandler.klass);
316
349
 
317
350
  smalltalk.addMethod(
318
- unescape('_register'),
351
+ "_register",
319
352
  smalltalk.method({
320
- selector: unescape('register'),
353
+ selector: "register",
321
354
  category: 'initialization',
322
355
  fn: function (){
323
356
  var self=this;
324
357
  smalltalk.send((smalltalk.ErrorHandler || ErrorHandler), "_setCurrent_", [smalltalk.send(self, "_new", [])]);
325
358
  return self;},
326
359
  args: [],
327
- source: unescape('register%0A%09ErrorHandler%20setCurrent%3A%20self%20new'),
360
+ source: "register\x0a\x09ErrorHandler setCurrent: self new",
328
361
  messageSends: ["setCurrent:", "new"],
329
362
  referencedClasses: ["ErrorHandler"]
330
363
  }),
331
364
  smalltalk.ErrorHandler.klass);
332
365
 
333
366
  smalltalk.addMethod(
334
- unescape('_setCurrent_'),
367
+ "_setCurrent_",
335
368
  smalltalk.method({
336
- selector: unescape('setCurrent%3A'),
369
+ selector: "setCurrent:",
337
370
  category: 'accessing',
338
371
  fn: function (anHandler){
339
372
  var self=this;
340
373
  (self['@current']=anHandler);
341
374
  return self;},
342
375
  args: ["anHandler"],
343
- source: unescape('setCurrent%3A%20anHandler%0A%09current%20%3A%3D%20anHandler'),
376
+ source: "setCurrent: anHandler\x0a\x09current := anHandler",
344
377
  messageSends: [],
345
378
  referencedClasses: []
346
379
  }),