resin 0.0.1 → 0.0.2
Sign up to get free protection for your applications and to get access to all the features.
- data/amber/images/amber.svg +706 -0
- data/amber/js/Canvas.deploy.js +1311 -400
- data/amber/js/Canvas.js +1750 -424
- data/amber/js/Compiler.deploy.js +615 -615
- data/amber/js/Compiler.js +1367 -1367
- data/amber/js/IDE.deploy.js +1381 -1345
- data/amber/js/IDE.js +1949 -1903
- data/amber/js/Kernel-Announcements.deploy.js +37 -37
- data/amber/js/Kernel-Announcements.js +52 -52
- data/amber/js/Kernel-Collections.deploy.js +961 -950
- data/amber/js/Kernel-Collections.js +2064 -2053
- data/amber/js/Kernel-Methods.deploy.js +323 -260
- data/amber/js/Kernel-Methods.js +395 -327
- data/amber/js/Kernel-Objects.deploy.js +1846 -1104
- data/amber/js/Kernel-Objects.js +2142 -1194
- data/amber/js/boot.js +44 -29
- data/amber/js/parser.js +234 -17
- data/amber/js/parser.pegjs +9 -6
- data/amber/st/Canvas.st +474 -146
- data/amber/st/Compiler.st +418 -417
- data/amber/st/IDE.st +803 -772
- data/amber/st/Kernel-Announcements.st +27 -27
- data/amber/st/Kernel-Collections.st +289 -268
- data/amber/st/Kernel-Methods.st +104 -100
- data/amber/st/Kernel-Objects.st +277 -80
- metadata +18 -17
data/amber/js/Compiler.deploy.js
CHANGED
@@ -1,44 +1,184 @@
|
|
1
1
|
smalltalk.addPackage('Compiler', {});
|
2
|
-
smalltalk.addClass('
|
2
|
+
smalltalk.addClass('NodeVisitor', smalltalk.Object, [], 'Compiler');
|
3
3
|
smalltalk.addMethod(
|
4
|
-
unescape('
|
4
|
+
unescape('_visit_'),
|
5
5
|
smalltalk.method({
|
6
|
-
selector: unescape('
|
7
|
-
fn: function (
|
6
|
+
selector: unescape('visit%3A'),
|
7
|
+
fn: function (aNode){
|
8
8
|
var self=this;
|
9
|
-
(self
|
9
|
+
smalltalk.send(aNode, "_accept_", [self]);
|
10
10
|
return self;}
|
11
11
|
}),
|
12
|
-
smalltalk.
|
12
|
+
smalltalk.NodeVisitor);
|
13
13
|
|
14
14
|
smalltalk.addMethod(
|
15
|
-
unescape('
|
15
|
+
unescape('_visitNode_'),
|
16
16
|
smalltalk.method({
|
17
|
-
selector: unescape('
|
18
|
-
fn: function (){
|
17
|
+
selector: unescape('visitNode%3A'),
|
18
|
+
fn: function (aNode){
|
19
19
|
var self=this;
|
20
|
-
|
21
|
-
|
22
|
-
var chunk=nil;
|
23
|
-
(result=smalltalk.send("", "_writeStream", []));
|
24
|
-
(function(){while((function(){(char_=smalltalk.send(self['@stream'], "_next", []));return smalltalk.send(char_, "_notNil", []);})()) {(function(){((($receiver = smalltalk.send(char_, "__eq", [unescape("%21")])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return ((($receiver = smalltalk.send(smalltalk.send(self['@stream'], "_peek", []), "__eq", [unescape("%21")])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(self['@stream'], "_next", []);})() : (function(){return (function(){throw({name: 'stReturn', selector: '_nextChunk', fn: function(){return smalltalk.send(smalltalk.send(result, "_contents", []), "_trimBoth", [])}})})();})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return smalltalk.send(self['@stream'], "_next", []);}), (function(){return (function(){throw({name: 'stReturn', selector: '_nextChunk', fn: function(){return smalltalk.send(smalltalk.send(result, "_contents", []), "_trimBoth", [])}})})();})]));})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return ((($receiver = smalltalk.send(smalltalk.send(self['@stream'], "_peek", []), "__eq", [unescape("%21")])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(self['@stream'], "_next", []);})() : (function(){return (function(){throw({name: 'stReturn', selector: '_nextChunk', fn: function(){return smalltalk.send(smalltalk.send(result, "_contents", []), "_trimBoth", [])}})})();})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return smalltalk.send(self['@stream'], "_next", []);}), (function(){return (function(){throw({name: 'stReturn', selector: '_nextChunk', fn: function(){return smalltalk.send(smalltalk.send(result, "_contents", []), "_trimBoth", [])}})})();})]));})]));return smalltalk.send(result, "_nextPut_", [char_]);})()}})();
|
25
|
-
(function(){throw({name: 'stReturn', selector: '_nextChunk', fn: function(){return nil}})})();
|
26
|
-
return self;
|
27
|
-
} catch(e) {if(e.name === 'stReturn' && e.selector === '_nextChunk'){return e.fn()} throw(e)}}
|
20
|
+
|
21
|
+
return self;}
|
28
22
|
}),
|
29
|
-
smalltalk.
|
23
|
+
smalltalk.NodeVisitor);
|
24
|
+
|
25
|
+
smalltalk.addMethod(
|
26
|
+
unescape('_visitMethodNode_'),
|
27
|
+
smalltalk.method({
|
28
|
+
selector: unescape('visitMethodNode%3A'),
|
29
|
+
fn: function (aNode){
|
30
|
+
var self=this;
|
31
|
+
smalltalk.send(self, "_visitNode_", [aNode]);
|
32
|
+
return self;}
|
33
|
+
}),
|
34
|
+
smalltalk.NodeVisitor);
|
30
35
|
|
36
|
+
smalltalk.addMethod(
|
37
|
+
unescape('_visitSequenceNode_'),
|
38
|
+
smalltalk.method({
|
39
|
+
selector: unescape('visitSequenceNode%3A'),
|
40
|
+
fn: function (aNode){
|
41
|
+
var self=this;
|
42
|
+
smalltalk.send(self, "_visitNode_", [aNode]);
|
43
|
+
return self;}
|
44
|
+
}),
|
45
|
+
smalltalk.NodeVisitor);
|
31
46
|
|
32
47
|
smalltalk.addMethod(
|
33
|
-
unescape('
|
48
|
+
unescape('_visitBlockSequenceNode_'),
|
34
49
|
smalltalk.method({
|
35
|
-
selector: unescape('
|
36
|
-
fn: function (
|
50
|
+
selector: unescape('visitBlockSequenceNode%3A'),
|
51
|
+
fn: function (aNode){
|
37
52
|
var self=this;
|
38
|
-
|
53
|
+
smalltalk.send(self, "_visitSequenceNode_", [aNode]);
|
39
54
|
return self;}
|
40
55
|
}),
|
41
|
-
smalltalk.
|
56
|
+
smalltalk.NodeVisitor);
|
57
|
+
|
58
|
+
smalltalk.addMethod(
|
59
|
+
unescape('_visitBlockNode_'),
|
60
|
+
smalltalk.method({
|
61
|
+
selector: unescape('visitBlockNode%3A'),
|
62
|
+
fn: function (aNode){
|
63
|
+
var self=this;
|
64
|
+
smalltalk.send(self, "_visitNode_", [aNode]);
|
65
|
+
return self;}
|
66
|
+
}),
|
67
|
+
smalltalk.NodeVisitor);
|
68
|
+
|
69
|
+
smalltalk.addMethod(
|
70
|
+
unescape('_visitReturnNode_'),
|
71
|
+
smalltalk.method({
|
72
|
+
selector: unescape('visitReturnNode%3A'),
|
73
|
+
fn: function (aNode){
|
74
|
+
var self=this;
|
75
|
+
smalltalk.send(self, "_visitNode_", [aNode]);
|
76
|
+
return self;}
|
77
|
+
}),
|
78
|
+
smalltalk.NodeVisitor);
|
79
|
+
|
80
|
+
smalltalk.addMethod(
|
81
|
+
unescape('_visitSendNode_'),
|
82
|
+
smalltalk.method({
|
83
|
+
selector: unescape('visitSendNode%3A'),
|
84
|
+
fn: function (aNode){
|
85
|
+
var self=this;
|
86
|
+
smalltalk.send(self, "_visitNode_", [aNode]);
|
87
|
+
return self;}
|
88
|
+
}),
|
89
|
+
smalltalk.NodeVisitor);
|
90
|
+
|
91
|
+
smalltalk.addMethod(
|
92
|
+
unescape('_visitCascadeNode_'),
|
93
|
+
smalltalk.method({
|
94
|
+
selector: unescape('visitCascadeNode%3A'),
|
95
|
+
fn: function (aNode){
|
96
|
+
var self=this;
|
97
|
+
smalltalk.send(self, "_visitNode_", [aNode]);
|
98
|
+
return self;}
|
99
|
+
}),
|
100
|
+
smalltalk.NodeVisitor);
|
101
|
+
|
102
|
+
smalltalk.addMethod(
|
103
|
+
unescape('_visitValueNode_'),
|
104
|
+
smalltalk.method({
|
105
|
+
selector: unescape('visitValueNode%3A'),
|
106
|
+
fn: function (aNode){
|
107
|
+
var self=this;
|
108
|
+
smalltalk.send(self, "_visitNode_", [aNode]);
|
109
|
+
return self;}
|
110
|
+
}),
|
111
|
+
smalltalk.NodeVisitor);
|
112
|
+
|
113
|
+
smalltalk.addMethod(
|
114
|
+
unescape('_visitVariableNode_'),
|
115
|
+
smalltalk.method({
|
116
|
+
selector: unescape('visitVariableNode%3A'),
|
117
|
+
fn: function (aNode){
|
118
|
+
var self=this;
|
119
|
+
|
120
|
+
return self;}
|
121
|
+
}),
|
122
|
+
smalltalk.NodeVisitor);
|
123
|
+
|
124
|
+
smalltalk.addMethod(
|
125
|
+
unescape('_visitAssignmentNode_'),
|
126
|
+
smalltalk.method({
|
127
|
+
selector: unescape('visitAssignmentNode%3A'),
|
128
|
+
fn: function (aNode){
|
129
|
+
var self=this;
|
130
|
+
smalltalk.send(self, "_visitNode_", [aNode]);
|
131
|
+
return self;}
|
132
|
+
}),
|
133
|
+
smalltalk.NodeVisitor);
|
134
|
+
|
135
|
+
smalltalk.addMethod(
|
136
|
+
unescape('_visitClassReferenceNode_'),
|
137
|
+
smalltalk.method({
|
138
|
+
selector: unescape('visitClassReferenceNode%3A'),
|
139
|
+
fn: function (aNode){
|
140
|
+
var self=this;
|
141
|
+
(function($rec){smalltalk.send($rec, "_nextPutAll_", ["smalltalk."]);return smalltalk.send($rec, "_nextPutAll_", [smalltalk.send(aNode, "_value", [])]);})(self);
|
142
|
+
return self;}
|
143
|
+
}),
|
144
|
+
smalltalk.NodeVisitor);
|
145
|
+
|
146
|
+
smalltalk.addMethod(
|
147
|
+
unescape('_visitJSStatementNode_'),
|
148
|
+
smalltalk.method({
|
149
|
+
selector: unescape('visitJSStatementNode%3A'),
|
150
|
+
fn: function (aNode){
|
151
|
+
var self=this;
|
152
|
+
(function($rec){smalltalk.send($rec, "_nextPutAll_", [unescape("function%28%29%7B")]);smalltalk.send($rec, "_nextPutAll_", [smalltalk.send(aNode, "_source", [])]);return smalltalk.send($rec, "_nextPutAll_", [unescape("%7D%29%28%29")]);})(self);
|
153
|
+
return self;}
|
154
|
+
}),
|
155
|
+
smalltalk.NodeVisitor);
|
156
|
+
|
157
|
+
smalltalk.addMethod(
|
158
|
+
unescape('_visitDynamicArrayNode_'),
|
159
|
+
smalltalk.method({
|
160
|
+
selector: unescape('visitDynamicArrayNode%3A'),
|
161
|
+
fn: function (aNode){
|
162
|
+
var self=this;
|
163
|
+
smalltalk.send(self, "_visitNode_", [aNode]);
|
164
|
+
return self;}
|
165
|
+
}),
|
166
|
+
smalltalk.NodeVisitor);
|
167
|
+
|
168
|
+
smalltalk.addMethod(
|
169
|
+
unescape('_visitDynamicDictionaryNode_'),
|
170
|
+
smalltalk.method({
|
171
|
+
selector: unescape('visitDynamicDictionaryNode%3A'),
|
172
|
+
fn: function (aNode){
|
173
|
+
var self=this;
|
174
|
+
smalltalk.send(self, "_visitNode_", [aNode]);
|
175
|
+
return self;}
|
176
|
+
}),
|
177
|
+
smalltalk.NodeVisitor);
|
178
|
+
|
179
|
+
|
180
|
+
|
181
|
+
smalltalk.addClass('DoIt', smalltalk.Object, [], 'Compiler');
|
42
182
|
|
43
183
|
|
44
184
|
smalltalk.addClass('Importer', smalltalk.Object, [], 'Compiler');
|
@@ -130,7 +270,7 @@ selector: unescape('exportPackage%3A'),
|
|
130
270
|
fn: function (packageName){
|
131
271
|
var self=this;
|
132
272
|
var package=nil;
|
133
|
-
return smalltalk.send((smalltalk.String || String), "_streamContents_", [(function(stream){(package=smalltalk.send(smalltalk.send((smalltalk.Smalltalk || Smalltalk), "_current", []), "_packageAt_", [packageName]));smalltalk.send(self, "_exportPackageDefinitionOf_on_", [package, stream]);smalltalk.send(smalltalk.send(package, "
|
273
|
+
return smalltalk.send((smalltalk.String || String), "_streamContents_", [(function(stream){(package=smalltalk.send(smalltalk.send((smalltalk.Smalltalk || Smalltalk), "_current", []), "_packageAt_", [packageName]));smalltalk.send(self, "_exportPackageDefinitionOf_on_", [package, stream]);smalltalk.send(smalltalk.send(package, "_sortedClasses", []), "_do_", [(function(each){return smalltalk.send(stream, "_nextPutAll_", [smalltalk.send(self, "_exportClass_", [each])]);})]);return smalltalk.send(self, "_exportPackageExtensionsOf_on_", [package, stream]);})]);
|
134
274
|
return self;}
|
135
275
|
}),
|
136
276
|
smalltalk.Exporter);
|
@@ -184,169 +324,73 @@ smalltalk.Exporter);
|
|
184
324
|
|
185
325
|
|
186
326
|
|
187
|
-
smalltalk.addClass('
|
327
|
+
smalltalk.addClass('ChunkParser', smalltalk.Object, ['stream'], 'Compiler');
|
188
328
|
smalltalk.addMethod(
|
189
|
-
unescape('
|
329
|
+
unescape('_stream_'),
|
190
330
|
smalltalk.method({
|
191
|
-
selector: unescape('
|
192
|
-
fn: function (
|
331
|
+
selector: unescape('stream%3A'),
|
332
|
+
fn: function (aStream){
|
193
333
|
var self=this;
|
194
|
-
(
|
195
|
-
smalltalk.send(smalltalk.send(aClass, "_instanceVariableNames", []), "_do_separatedBy_", [(function(each){return smalltalk.send(aStream, "_nextPutAll_", [each]);}), (function(){return smalltalk.send(aStream, "_nextPutAll_", [" "]);})]);
|
196
|
-
(function($rec){smalltalk.send($rec, "_nextPutAll_", [unescape("%27")]);smalltalk.send($rec, "_lf", []);smalltalk.send($rec, "_nextPutAll_", [smalltalk.send(smalltalk.send(unescape("%09category%3A%20%27"), "__comma", [smalltalk.send(aClass, "_category", [])]), "__comma", [unescape("%27%21")])]);return smalltalk.send($rec, "_lf", []);})(aStream);
|
197
|
-
((($receiver = smalltalk.send(smalltalk.send(aClass, "_comment", []), "_notEmpty", [])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return (function($rec){smalltalk.send($rec, "_nextPutAll_", [smalltalk.send(smalltalk.send(unescape("%21"), "__comma", [smalltalk.send(self, "_classNameFor_", [aClass])]), "__comma", [unescape("%20commentStamp%21")])]);smalltalk.send($rec, "_lf", []);smalltalk.send($rec, "_nextPutAll_", [smalltalk.send(smalltalk.send(self, "_chunkEscape_", [smalltalk.send(aClass, "_comment", [])]), "__comma", [unescape("%21")])]);return smalltalk.send($rec, "_lf", []);})(aStream);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return (function($rec){smalltalk.send($rec, "_nextPutAll_", [smalltalk.send(smalltalk.send(unescape("%21"), "__comma", [smalltalk.send(self, "_classNameFor_", [aClass])]), "__comma", [unescape("%20commentStamp%21")])]);smalltalk.send($rec, "_lf", []);smalltalk.send($rec, "_nextPutAll_", [smalltalk.send(smalltalk.send(self, "_chunkEscape_", [smalltalk.send(aClass, "_comment", [])]), "__comma", [unescape("%21")])]);return smalltalk.send($rec, "_lf", []);})(aStream);})]));
|
198
|
-
smalltalk.send(aStream, "_lf", []);
|
334
|
+
(self['@stream']=aStream);
|
199
335
|
return self;}
|
200
336
|
}),
|
201
|
-
smalltalk.
|
337
|
+
smalltalk.ChunkParser);
|
202
338
|
|
203
339
|
smalltalk.addMethod(
|
204
|
-
unescape('
|
340
|
+
unescape('_nextChunk'),
|
205
341
|
smalltalk.method({
|
206
|
-
selector: unescape('
|
207
|
-
fn: function (
|
342
|
+
selector: unescape('nextChunk'),
|
343
|
+
fn: function (){
|
208
344
|
var self=this;
|
209
|
-
|
210
|
-
|
345
|
+
try{var char_=nil;
|
346
|
+
var result=nil;
|
347
|
+
var chunk=nil;
|
348
|
+
(result=smalltalk.send("", "_writeStream", []));
|
349
|
+
(function(){while((function(){(char_=smalltalk.send(self['@stream'], "_next", []));return smalltalk.send(char_, "_notNil", []);})()) {(function(){((($receiver = smalltalk.send(char_, "__eq", [unescape("%21")])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return ((($receiver = smalltalk.send(smalltalk.send(self['@stream'], "_peek", []), "__eq", [unescape("%21")])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(self['@stream'], "_next", []);})() : (function(){return (function(){throw({name: 'stReturn', selector: '_nextChunk', fn: function(){return smalltalk.send(smalltalk.send(result, "_contents", []), "_trimBoth", [])}})})();})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return smalltalk.send(self['@stream'], "_next", []);}), (function(){return (function(){throw({name: 'stReturn', selector: '_nextChunk', fn: function(){return smalltalk.send(smalltalk.send(result, "_contents", []), "_trimBoth", [])}})})();})]));})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return ((($receiver = smalltalk.send(smalltalk.send(self['@stream'], "_peek", []), "__eq", [unescape("%21")])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(self['@stream'], "_next", []);})() : (function(){return (function(){throw({name: 'stReturn', selector: '_nextChunk', fn: function(){return smalltalk.send(smalltalk.send(result, "_contents", []), "_trimBoth", [])}})})();})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return smalltalk.send(self['@stream'], "_next", []);}), (function(){return (function(){throw({name: 'stReturn', selector: '_nextChunk', fn: function(){return smalltalk.send(smalltalk.send(result, "_contents", []), "_trimBoth", [])}})})();})]));})]));return smalltalk.send(result, "_nextPut_", [char_]);})()}})();
|
350
|
+
(function(){throw({name: 'stReturn', selector: '_nextChunk', fn: function(){return nil}})})();
|
351
|
+
return self;
|
352
|
+
} catch(e) {if(e.name === 'stReturn' && e.selector === '_nextChunk'){return e.fn()} throw(e)}}
|
211
353
|
}),
|
212
|
-
smalltalk.
|
354
|
+
smalltalk.ChunkParser);
|
355
|
+
|
213
356
|
|
214
357
|
smalltalk.addMethod(
|
215
|
-
unescape('
|
358
|
+
unescape('_on_'),
|
216
359
|
smalltalk.method({
|
217
|
-
selector: unescape('
|
218
|
-
fn: function (
|
360
|
+
selector: unescape('on%3A'),
|
361
|
+
fn: function (aStream){
|
219
362
|
var self=this;
|
220
|
-
|
363
|
+
return smalltalk.send(smalltalk.send(self, "_new", []), "_stream_", [aStream]);
|
221
364
|
return self;}
|
222
365
|
}),
|
223
|
-
smalltalk.
|
366
|
+
smalltalk.ChunkParser.klass);
|
367
|
+
|
224
368
|
|
369
|
+
smalltalk.addClass('Node', smalltalk.Object, ['nodes'], 'Compiler');
|
225
370
|
smalltalk.addMethod(
|
226
|
-
unescape('
|
371
|
+
unescape('_nodes'),
|
227
372
|
smalltalk.method({
|
228
|
-
selector: unescape('
|
229
|
-
fn: function (
|
373
|
+
selector: unescape('nodes'),
|
374
|
+
fn: function (){
|
230
375
|
var self=this;
|
231
|
-
((
|
376
|
+
return (($receiver = self['@nodes']) == nil || $receiver == undefined) ? (function(){return (self['@nodes']=smalltalk.send((smalltalk.Array || Array), "_new", []));})() : $receiver;
|
232
377
|
return self;}
|
233
378
|
}),
|
234
|
-
smalltalk.
|
379
|
+
smalltalk.Node);
|
235
380
|
|
236
381
|
smalltalk.addMethod(
|
237
|
-
unescape('
|
382
|
+
unescape('_nodes_'),
|
238
383
|
smalltalk.method({
|
239
|
-
selector: unescape('
|
240
|
-
fn: function (
|
384
|
+
selector: unescape('nodes%3A'),
|
385
|
+
fn: function (aCollection){
|
241
386
|
var self=this;
|
242
|
-
|
387
|
+
(self['@nodes']=aCollection);
|
243
388
|
return self;}
|
244
389
|
}),
|
245
|
-
smalltalk.
|
390
|
+
smalltalk.Node);
|
246
391
|
|
247
392
|
smalltalk.addMethod(
|
248
|
-
unescape('
|
249
|
-
smalltalk.method({
|
250
|
-
selector: unescape('chunkEscape%3A'),
|
251
|
-
fn: function (aString){
|
252
|
-
var self=this;
|
253
|
-
return smalltalk.send(smalltalk.send(aString, "_replace_with_", [unescape("%21"), unescape("%21%21")]), "_trimBoth", []);
|
254
|
-
return self;}
|
255
|
-
}),
|
256
|
-
smalltalk.ChunkExporter);
|
257
|
-
|
258
|
-
smalltalk.addMethod(
|
259
|
-
unescape('_exportMethods_category_of_on_'),
|
260
|
-
smalltalk.method({
|
261
|
-
selector: unescape('exportMethods%3Acategory%3Aof%3Aon%3A'),
|
262
|
-
fn: function (methods, category, aClass, aStream){
|
263
|
-
var self=this;
|
264
|
-
(function($rec){smalltalk.send($rec, "_nextPutAll_", [smalltalk.send(unescape("%21"), "__comma", [smalltalk.send(self, "_classNameFor_", [aClass])])]);return smalltalk.send($rec, "_nextPutAll_", [smalltalk.send(smalltalk.send(unescape("%20methodsFor%3A%20%27"), "__comma", [category]), "__comma", [unescape("%27%21")])]);})(aStream);
|
265
|
-
smalltalk.send(methods, "_do_", [(function(each){return smalltalk.send(self, "_exportMethod_of_on_", [each, aClass, aStream]);})]);
|
266
|
-
(function($rec){smalltalk.send($rec, "_nextPutAll_", [unescape("%20%21")]);smalltalk.send($rec, "_lf", []);return smalltalk.send($rec, "_lf", []);})(aStream);
|
267
|
-
return self;}
|
268
|
-
}),
|
269
|
-
smalltalk.ChunkExporter);
|
270
|
-
|
271
|
-
smalltalk.addMethod(
|
272
|
-
unescape('_exportPackageExtensionsOf_on_'),
|
273
|
-
smalltalk.method({
|
274
|
-
selector: unescape('exportPackageExtensionsOf%3Aon%3A'),
|
275
|
-
fn: function (package, aStream){
|
276
|
-
var self=this;
|
277
|
-
var name=nil;
|
278
|
-
(name=smalltalk.send(package, "_name", []));
|
279
|
-
smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send((smalltalk.Smalltalk || Smalltalk), "_current", []), "_classes", []), "__comma", [smalltalk.send(smalltalk.send(smalltalk.send((smalltalk.Smalltalk || Smalltalk), "_current", []), "_classes", []), "_collect_", [(function(each){return smalltalk.send(each, "_class", []);})])]), "_do_", [(function(each){return smalltalk.send(each, "_protocolsDo_", [(function(category, methods){return ((($receiver = smalltalk.send(category, "__eq", [smalltalk.send(unescape("*"), "__comma", [name])])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(self, "_exportMethods_category_of_on_", [methods, category, each, aStream]);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return smalltalk.send(self, "_exportMethods_category_of_on_", [methods, category, each, aStream]);})]));})]);})]);
|
280
|
-
return self;}
|
281
|
-
}),
|
282
|
-
smalltalk.ChunkExporter);
|
283
|
-
|
284
|
-
smalltalk.addMethod(
|
285
|
-
unescape('_exportPackageDefinitionOf_on_'),
|
286
|
-
smalltalk.method({
|
287
|
-
selector: unescape('exportPackageDefinitionOf%3Aon%3A'),
|
288
|
-
fn: function (package, aStream){
|
289
|
-
var self=this;
|
290
|
-
(function($rec){smalltalk.send($rec, "_nextPutAll_", [smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(unescape("Smalltalk%20current%20createPackage%3A%20%27"), "__comma", [smalltalk.send(package, "_name", [])]), "__comma", [unescape("%27%20properties%3A%20")]), "__comma", [smalltalk.send(smalltalk.send(package, "_properties", []), "_storeString", [])]), "__comma", [unescape("%21")])]);return smalltalk.send($rec, "_lf", []);})(aStream);
|
291
|
-
return self;}
|
292
|
-
}),
|
293
|
-
smalltalk.ChunkExporter);
|
294
|
-
|
295
|
-
|
296
|
-
|
297
|
-
smalltalk.addClass('StrippedExporter', smalltalk.Exporter, [], 'Compiler');
|
298
|
-
smalltalk.addMethod(
|
299
|
-
unescape('_exportDefinitionOf_on_'),
|
300
|
-
smalltalk.method({
|
301
|
-
selector: unescape('exportDefinitionOf%3Aon%3A'),
|
302
|
-
fn: function (aClass, aStream){
|
303
|
-
var self=this;
|
304
|
-
(function($rec){smalltalk.send($rec, "_nextPutAll_", [unescape("smalltalk.addClass%28")]);smalltalk.send($rec, "_nextPutAll_", [smalltalk.send(smalltalk.send(unescape("%27"), "__comma", [smalltalk.send(self, "_classNameFor_", [aClass])]), "__comma", [unescape("%27%2C%20")])]);smalltalk.send($rec, "_nextPutAll_", [smalltalk.send("smalltalk.", "__comma", [smalltalk.send(self, "_classNameFor_", [smalltalk.send(aClass, "_superclass", [])])])]);return smalltalk.send($rec, "_nextPutAll_", [unescape("%2C%20%5B")]);})(aStream);
|
305
|
-
smalltalk.send(smalltalk.send(aClass, "_instanceVariableNames", []), "_do_separatedBy_", [(function(each){return smalltalk.send(aStream, "_nextPutAll_", [smalltalk.send(smalltalk.send(unescape("%27"), "__comma", [each]), "__comma", [unescape("%27")])]);}), (function(){return smalltalk.send(aStream, "_nextPutAll_", [unescape("%2C%20")]);})]);
|
306
|
-
(function($rec){smalltalk.send($rec, "_nextPutAll_", [unescape("%5D%2C%20%27")]);smalltalk.send($rec, "_nextPutAll_", [smalltalk.send(smalltalk.send(aClass, "_category", []), "__comma", [unescape("%27")])]);return smalltalk.send($rec, "_nextPutAll_", [unescape("%29%3B")]);})(aStream);
|
307
|
-
smalltalk.send(aStream, "_lf", []);
|
308
|
-
return self;}
|
309
|
-
}),
|
310
|
-
smalltalk.StrippedExporter);
|
311
|
-
|
312
|
-
smalltalk.addMethod(
|
313
|
-
unescape('_exportMethod_of_on_'),
|
314
|
-
smalltalk.method({
|
315
|
-
selector: unescape('exportMethod%3Aof%3Aon%3A'),
|
316
|
-
fn: function (aMethod, aClass, aStream){
|
317
|
-
var self=this;
|
318
|
-
(function($rec){smalltalk.send($rec, "_nextPutAll_", [unescape("smalltalk.addMethod%28")]);smalltalk.send($rec, "_lf", []);smalltalk.send($rec, "_nextPutAll_", [smalltalk.send(smalltalk.send(unescape("unescape%28%27"), "__comma", [smalltalk.send(smalltalk.send(smalltalk.send(aMethod, "_selector", []), "_asSelector", []), "_escaped", [])]), "__comma", [unescape("%27%29%2C")])]);smalltalk.send($rec, "_lf", []);smalltalk.send($rec, "_nextPutAll_", [unescape("smalltalk.method%28%7B")]);smalltalk.send($rec, "_lf", []);smalltalk.send($rec, "_nextPutAll_", [smalltalk.send(smalltalk.send(unescape("selector%3A%20unescape%28%27"), "__comma", [smalltalk.send(smalltalk.send(aMethod, "_selector", []), "_escaped", [])]), "__comma", [unescape("%27%29%2C")])]);smalltalk.send($rec, "_lf", []);smalltalk.send($rec, "_nextPutAll_", [smalltalk.send("fn: ", "__comma", [smalltalk.send(smalltalk.send(aMethod, "_fn", []), "_compiledSource", [])])]);smalltalk.send($rec, "_lf", []);smalltalk.send($rec, "_nextPutAll_", [unescape("%7D%29%2C")]);smalltalk.send($rec, "_lf", []);smalltalk.send($rec, "_nextPutAll_", [smalltalk.send("smalltalk.", "__comma", [smalltalk.send(self, "_classNameFor_", [aClass])])]);smalltalk.send($rec, "_nextPutAll_", [unescape("%29%3B")]);smalltalk.send($rec, "_lf", []);return smalltalk.send($rec, "_lf", []);})(aStream);
|
319
|
-
return self;}
|
320
|
-
}),
|
321
|
-
smalltalk.StrippedExporter);
|
322
|
-
|
323
|
-
|
324
|
-
|
325
|
-
smalltalk.addClass('Node', smalltalk.Object, ['nodes'], 'Compiler');
|
326
|
-
smalltalk.addMethod(
|
327
|
-
unescape('_nodes'),
|
328
|
-
smalltalk.method({
|
329
|
-
selector: unescape('nodes'),
|
330
|
-
fn: function (){
|
331
|
-
var self=this;
|
332
|
-
return (($receiver = self['@nodes']) == nil || $receiver == undefined) ? (function(){return (self['@nodes']=smalltalk.send((smalltalk.Array || Array), "_new", []));})() : $receiver;
|
333
|
-
return self;}
|
334
|
-
}),
|
335
|
-
smalltalk.Node);
|
336
|
-
|
337
|
-
smalltalk.addMethod(
|
338
|
-
unescape('_nodes_'),
|
339
|
-
smalltalk.method({
|
340
|
-
selector: unescape('nodes%3A'),
|
341
|
-
fn: function (aCollection){
|
342
|
-
var self=this;
|
343
|
-
(self['@nodes']=aCollection);
|
344
|
-
return self;}
|
345
|
-
}),
|
346
|
-
smalltalk.Node);
|
347
|
-
|
348
|
-
smalltalk.addMethod(
|
349
|
-
unescape('_addNode_'),
|
393
|
+
unescape('_addNode_'),
|
350
394
|
smalltalk.method({
|
351
395
|
selector: unescape('addNode%3A'),
|
352
396
|
fn: function (aNode){
|
@@ -402,72 +446,39 @@ smalltalk.Node);
|
|
402
446
|
|
403
447
|
|
404
448
|
|
405
|
-
smalltalk.addClass('
|
406
|
-
smalltalk.addMethod(
|
407
|
-
unescape('_selector'),
|
408
|
-
smalltalk.method({
|
409
|
-
selector: unescape('selector'),
|
410
|
-
fn: function (){
|
411
|
-
var self=this;
|
412
|
-
return self['@selector'];
|
413
|
-
return self;}
|
414
|
-
}),
|
415
|
-
smalltalk.MethodNode);
|
416
|
-
|
417
|
-
smalltalk.addMethod(
|
418
|
-
unescape('_selector_'),
|
419
|
-
smalltalk.method({
|
420
|
-
selector: unescape('selector%3A'),
|
421
|
-
fn: function (aString){
|
422
|
-
var self=this;
|
423
|
-
(self['@selector']=aString);
|
424
|
-
return self;}
|
425
|
-
}),
|
426
|
-
smalltalk.MethodNode);
|
427
|
-
|
449
|
+
smalltalk.addClass('SequenceNode', smalltalk.Node, ['temps'], 'Compiler');
|
428
450
|
smalltalk.addMethod(
|
429
|
-
unescape('
|
451
|
+
unescape('_temps'),
|
430
452
|
smalltalk.method({
|
431
|
-
selector: unescape('
|
453
|
+
selector: unescape('temps'),
|
432
454
|
fn: function (){
|
433
455
|
var self=this;
|
434
|
-
return (($receiver = self['@
|
456
|
+
return (($receiver = self['@temps']) == nil || $receiver == undefined) ? (function(){return [];})() : $receiver;
|
435
457
|
return self;}
|
436
458
|
}),
|
437
|
-
smalltalk.
|
459
|
+
smalltalk.SequenceNode);
|
438
460
|
|
439
461
|
smalltalk.addMethod(
|
440
|
-
unescape('
|
462
|
+
unescape('_temps_'),
|
441
463
|
smalltalk.method({
|
442
|
-
selector: unescape('
|
464
|
+
selector: unescape('temps%3A'),
|
443
465
|
fn: function (aCollection){
|
444
466
|
var self=this;
|
445
|
-
(self['@
|
467
|
+
(self['@temps']=aCollection);
|
446
468
|
return self;}
|
447
469
|
}),
|
448
|
-
smalltalk.
|
470
|
+
smalltalk.SequenceNode);
|
449
471
|
|
450
472
|
smalltalk.addMethod(
|
451
|
-
unescape('
|
473
|
+
unescape('_asBlockSequenceNode'),
|
452
474
|
smalltalk.method({
|
453
|
-
selector: unescape('
|
475
|
+
selector: unescape('asBlockSequenceNode'),
|
454
476
|
fn: function (){
|
455
477
|
var self=this;
|
456
|
-
return self[
|
457
|
-
return self;}
|
458
|
-
}),
|
459
|
-
smalltalk.MethodNode);
|
460
|
-
|
461
|
-
smalltalk.addMethod(
|
462
|
-
unescape('_source_'),
|
463
|
-
smalltalk.method({
|
464
|
-
selector: unescape('source%3A'),
|
465
|
-
fn: function (aString){
|
466
|
-
var self=this;
|
467
|
-
(self['@source']=aString);
|
478
|
+
return (function($rec){smalltalk.send($rec, "_nodes_", [smalltalk.send(self, "_nodes", [])]);smalltalk.send($rec, "_temps_", [smalltalk.send(self, "_temps", [])]);return smalltalk.send($rec, "_yourself", []);})(smalltalk.send((smalltalk.BlockSequenceNode || BlockSequenceNode), "_new", []));
|
468
479
|
return self;}
|
469
480
|
}),
|
470
|
-
smalltalk.
|
481
|
+
smalltalk.SequenceNode);
|
471
482
|
|
472
483
|
smalltalk.addMethod(
|
473
484
|
unescape('_accept_'),
|
@@ -475,198 +486,63 @@ smalltalk.method({
|
|
475
486
|
selector: unescape('accept%3A'),
|
476
487
|
fn: function (aVisitor){
|
477
488
|
var self=this;
|
478
|
-
smalltalk.send(aVisitor, "
|
479
|
-
return self;}
|
480
|
-
}),
|
481
|
-
smalltalk.MethodNode);
|
482
|
-
|
483
|
-
|
484
|
-
|
485
|
-
smalltalk.addClass('SendNode', smalltalk.Node, ['selector', 'arguments', 'receiver'], 'Compiler');
|
486
|
-
smalltalk.addMethod(
|
487
|
-
unescape('_selector'),
|
488
|
-
smalltalk.method({
|
489
|
-
selector: unescape('selector'),
|
490
|
-
fn: function (){
|
491
|
-
var self=this;
|
492
|
-
return self['@selector'];
|
493
|
-
return self;}
|
494
|
-
}),
|
495
|
-
smalltalk.SendNode);
|
496
|
-
|
497
|
-
smalltalk.addMethod(
|
498
|
-
unescape('_selector_'),
|
499
|
-
smalltalk.method({
|
500
|
-
selector: unescape('selector%3A'),
|
501
|
-
fn: function (aString){
|
502
|
-
var self=this;
|
503
|
-
(self['@selector']=aString);
|
504
|
-
return self;}
|
505
|
-
}),
|
506
|
-
smalltalk.SendNode);
|
507
|
-
|
508
|
-
smalltalk.addMethod(
|
509
|
-
unescape('_arguments'),
|
510
|
-
smalltalk.method({
|
511
|
-
selector: unescape('arguments'),
|
512
|
-
fn: function (){
|
513
|
-
var self=this;
|
514
|
-
return (($receiver = self['@arguments']) == nil || $receiver == undefined) ? (function(){return (self['@arguments']=[]);})() : $receiver;
|
515
|
-
return self;}
|
516
|
-
}),
|
517
|
-
smalltalk.SendNode);
|
518
|
-
|
519
|
-
smalltalk.addMethod(
|
520
|
-
unescape('_arguments_'),
|
521
|
-
smalltalk.method({
|
522
|
-
selector: unescape('arguments%3A'),
|
523
|
-
fn: function (aCollection){
|
524
|
-
var self=this;
|
525
|
-
(self['@arguments']=aCollection);
|
526
|
-
return self;}
|
527
|
-
}),
|
528
|
-
smalltalk.SendNode);
|
529
|
-
|
530
|
-
smalltalk.addMethod(
|
531
|
-
unescape('_receiver'),
|
532
|
-
smalltalk.method({
|
533
|
-
selector: unescape('receiver'),
|
534
|
-
fn: function (){
|
535
|
-
var self=this;
|
536
|
-
return self['@receiver'];
|
537
|
-
return self;}
|
538
|
-
}),
|
539
|
-
smalltalk.SendNode);
|
540
|
-
|
541
|
-
smalltalk.addMethod(
|
542
|
-
unescape('_receiver_'),
|
543
|
-
smalltalk.method({
|
544
|
-
selector: unescape('receiver%3A'),
|
545
|
-
fn: function (aNode){
|
546
|
-
var self=this;
|
547
|
-
(self['@receiver']=aNode);
|
489
|
+
smalltalk.send(aVisitor, "_visitSequenceNode_", [self]);
|
548
490
|
return self;}
|
549
491
|
}),
|
550
|
-
smalltalk.
|
492
|
+
smalltalk.SequenceNode);
|
551
493
|
|
552
|
-
smalltalk.addMethod(
|
553
|
-
unescape('_valueForReceiver_'),
|
554
|
-
smalltalk.method({
|
555
|
-
selector: unescape('valueForReceiver%3A'),
|
556
|
-
fn: function (anObject){
|
557
|
-
var self=this;
|
558
|
-
return (function($rec){smalltalk.send($rec, "_receiver_", [(($receiver = smalltalk.send(self, "_receiver", [])) == nil || $receiver == undefined) ? (function(){return anObject;})() : (function(){return smalltalk.send(smalltalk.send(self, "_receiver", []), "_valueForReceiver_", [anObject]);})()]);smalltalk.send($rec, "_selector_", [smalltalk.send(self, "_selector", [])]);smalltalk.send($rec, "_arguments_", [smalltalk.send(self, "_arguments", [])]);return smalltalk.send($rec, "_yourself", []);})(smalltalk.send((smalltalk.SendNode || SendNode), "_new", []));
|
559
|
-
return self;}
|
560
|
-
}),
|
561
|
-
smalltalk.SendNode);
|
562
494
|
|
563
|
-
smalltalk.addMethod(
|
564
|
-
unescape('_cascadeNodeWithMessages_'),
|
565
|
-
smalltalk.method({
|
566
|
-
selector: unescape('cascadeNodeWithMessages%3A'),
|
567
|
-
fn: function (aCollection){
|
568
|
-
var self=this;
|
569
|
-
var first=nil;
|
570
|
-
(first=(function($rec){smalltalk.send($rec, "_selector_", [smalltalk.send(self, "_selector", [])]);smalltalk.send($rec, "_arguments_", [smalltalk.send(self, "_arguments", [])]);return smalltalk.send($rec, "_yourself", []);})(smalltalk.send((smalltalk.SendNode || SendNode), "_new", [])));
|
571
|
-
return (function($rec){smalltalk.send($rec, "_receiver_", [smalltalk.send(self, "_receiver", [])]);smalltalk.send($rec, "_nodes_", [smalltalk.send(smalltalk.send((smalltalk.Array || Array), "_with_", [first]), "__comma", [aCollection])]);return smalltalk.send($rec, "_yourself", []);})(smalltalk.send((smalltalk.CascadeNode || CascadeNode), "_new", []));
|
572
|
-
return self;}
|
573
|
-
}),
|
574
|
-
smalltalk.SendNode);
|
575
495
|
|
496
|
+
smalltalk.addClass('DynamicDictionaryNode', smalltalk.Node, [], 'Compiler');
|
576
497
|
smalltalk.addMethod(
|
577
498
|
unescape('_accept_'),
|
578
499
|
smalltalk.method({
|
579
500
|
selector: unescape('accept%3A'),
|
580
501
|
fn: function (aVisitor){
|
581
502
|
var self=this;
|
582
|
-
smalltalk.send(aVisitor, "
|
503
|
+
smalltalk.send(aVisitor, "_visitDynamicDictionaryNode_", [self]);
|
583
504
|
return self;}
|
584
505
|
}),
|
585
|
-
smalltalk.
|
586
|
-
|
506
|
+
smalltalk.DynamicDictionaryNode);
|
587
507
|
|
588
508
|
|
589
|
-
smalltalk.addClass('CascadeNode', smalltalk.Node, ['receiver'], 'Compiler');
|
590
|
-
smalltalk.addMethod(
|
591
|
-
unescape('_receiver'),
|
592
|
-
smalltalk.method({
|
593
|
-
selector: unescape('receiver'),
|
594
|
-
fn: function (){
|
595
|
-
var self=this;
|
596
|
-
return self['@receiver'];
|
597
|
-
return self;}
|
598
|
-
}),
|
599
|
-
smalltalk.CascadeNode);
|
600
|
-
|
601
|
-
smalltalk.addMethod(
|
602
|
-
unescape('_receiver_'),
|
603
|
-
smalltalk.method({
|
604
|
-
selector: unescape('receiver%3A'),
|
605
|
-
fn: function (aNode){
|
606
|
-
var self=this;
|
607
|
-
(self['@receiver']=aNode);
|
608
|
-
return self;}
|
609
|
-
}),
|
610
|
-
smalltalk.CascadeNode);
|
611
509
|
|
510
|
+
smalltalk.addClass('ReturnNode', smalltalk.Node, [], 'Compiler');
|
612
511
|
smalltalk.addMethod(
|
613
512
|
unescape('_accept_'),
|
614
513
|
smalltalk.method({
|
615
514
|
selector: unescape('accept%3A'),
|
616
515
|
fn: function (aVisitor){
|
617
516
|
var self=this;
|
618
|
-
smalltalk.send(aVisitor, "
|
517
|
+
smalltalk.send(aVisitor, "_visitReturnNode_", [self]);
|
619
518
|
return self;}
|
620
519
|
}),
|
621
|
-
smalltalk.
|
622
|
-
|
623
|
-
|
520
|
+
smalltalk.ReturnNode);
|
624
521
|
|
625
|
-
smalltalk.addClass('AssignmentNode', smalltalk.Node, ['left', 'right'], 'Compiler');
|
626
|
-
smalltalk.addMethod(
|
627
|
-
unescape('_left'),
|
628
|
-
smalltalk.method({
|
629
|
-
selector: unescape('left'),
|
630
|
-
fn: function (){
|
631
|
-
var self=this;
|
632
|
-
return self['@left'];
|
633
|
-
return self;}
|
634
|
-
}),
|
635
|
-
smalltalk.AssignmentNode);
|
636
522
|
|
637
|
-
smalltalk.addMethod(
|
638
|
-
unescape('_left_'),
|
639
|
-
smalltalk.method({
|
640
|
-
selector: unescape('left%3A'),
|
641
|
-
fn: function (aNode){
|
642
|
-
var self=this;
|
643
|
-
(self['@left']=aNode);
|
644
|
-
smalltalk.send(self['@left'], "_assigned_", [true]);
|
645
|
-
return self;}
|
646
|
-
}),
|
647
|
-
smalltalk.AssignmentNode);
|
648
523
|
|
524
|
+
smalltalk.addClass('ValueNode', smalltalk.Node, ['value'], 'Compiler');
|
649
525
|
smalltalk.addMethod(
|
650
|
-
unescape('
|
526
|
+
unescape('_value'),
|
651
527
|
smalltalk.method({
|
652
|
-
selector: unescape('
|
528
|
+
selector: unescape('value'),
|
653
529
|
fn: function (){
|
654
530
|
var self=this;
|
655
|
-
return self['@
|
531
|
+
return self['@value'];
|
656
532
|
return self;}
|
657
533
|
}),
|
658
|
-
smalltalk.
|
534
|
+
smalltalk.ValueNode);
|
659
535
|
|
660
536
|
smalltalk.addMethod(
|
661
|
-
unescape('
|
537
|
+
unescape('_value_'),
|
662
538
|
smalltalk.method({
|
663
|
-
selector: unescape('
|
664
|
-
fn: function (
|
539
|
+
selector: unescape('value%3A'),
|
540
|
+
fn: function (anObject){
|
665
541
|
var self=this;
|
666
|
-
(self['@
|
542
|
+
(self['@value']=anObject);
|
667
543
|
return self;}
|
668
544
|
}),
|
669
|
-
smalltalk.
|
545
|
+
smalltalk.ValueNode);
|
670
546
|
|
671
547
|
smalltalk.addMethod(
|
672
548
|
unescape('_accept_'),
|
@@ -674,248 +550,167 @@ smalltalk.method({
|
|
674
550
|
selector: unescape('accept%3A'),
|
675
551
|
fn: function (aVisitor){
|
676
552
|
var self=this;
|
677
|
-
smalltalk.send(aVisitor, "
|
553
|
+
smalltalk.send(aVisitor, "_visitValueNode_", [self]);
|
678
554
|
return self;}
|
679
555
|
}),
|
680
|
-
smalltalk.
|
681
|
-
|
682
|
-
|
556
|
+
smalltalk.ValueNode);
|
683
557
|
|
684
|
-
smalltalk.addClass('BlockNode', smalltalk.Node, ['parameters', 'inlined'], 'Compiler');
|
685
558
|
smalltalk.addMethod(
|
686
|
-
unescape('
|
559
|
+
unescape('_isValueNode'),
|
687
560
|
smalltalk.method({
|
688
|
-
selector: unescape('
|
561
|
+
selector: unescape('isValueNode'),
|
689
562
|
fn: function (){
|
690
563
|
var self=this;
|
691
|
-
return
|
564
|
+
return true;
|
692
565
|
return self;}
|
693
566
|
}),
|
694
|
-
smalltalk.
|
567
|
+
smalltalk.ValueNode);
|
695
568
|
|
696
|
-
smalltalk.addMethod(
|
697
|
-
unescape('_parameters_'),
|
698
|
-
smalltalk.method({
|
699
|
-
selector: unescape('parameters%3A'),
|
700
|
-
fn: function (aCollection){
|
701
|
-
var self=this;
|
702
|
-
(self['@parameters']=aCollection);
|
703
|
-
return self;}
|
704
|
-
}),
|
705
|
-
smalltalk.BlockNode);
|
706
569
|
|
570
|
+
|
571
|
+
smalltalk.addClass('VariableNode', smalltalk.ValueNode, ['assigned'], 'Compiler');
|
707
572
|
smalltalk.addMethod(
|
708
573
|
unescape('_accept_'),
|
709
574
|
smalltalk.method({
|
710
575
|
selector: unescape('accept%3A'),
|
711
576
|
fn: function (aVisitor){
|
712
577
|
var self=this;
|
713
|
-
smalltalk.send(aVisitor, "
|
714
|
-
return self;}
|
715
|
-
}),
|
716
|
-
smalltalk.BlockNode);
|
717
|
-
|
718
|
-
smalltalk.addMethod(
|
719
|
-
unescape('_isBlockNode'),
|
720
|
-
smalltalk.method({
|
721
|
-
selector: unescape('isBlockNode'),
|
722
|
-
fn: function (){
|
723
|
-
var self=this;
|
724
|
-
return true;
|
578
|
+
smalltalk.send(aVisitor, "_visitVariableNode_", [self]);
|
725
579
|
return self;}
|
726
580
|
}),
|
727
|
-
smalltalk.
|
581
|
+
smalltalk.VariableNode);
|
728
582
|
|
729
583
|
smalltalk.addMethod(
|
730
|
-
unescape('
|
584
|
+
unescape('_assigned'),
|
731
585
|
smalltalk.method({
|
732
|
-
selector: unescape('
|
586
|
+
selector: unescape('assigned'),
|
733
587
|
fn: function (){
|
734
588
|
var self=this;
|
735
|
-
return (($receiver = self['@
|
589
|
+
return (($receiver = self['@assigned']) == nil || $receiver == undefined) ? (function(){return false;})() : $receiver;
|
736
590
|
return self;}
|
737
591
|
}),
|
738
|
-
smalltalk.
|
592
|
+
smalltalk.VariableNode);
|
739
593
|
|
740
594
|
smalltalk.addMethod(
|
741
|
-
unescape('
|
595
|
+
unescape('_assigned_'),
|
742
596
|
smalltalk.method({
|
743
|
-
selector: unescape('
|
597
|
+
selector: unescape('assigned%3A'),
|
744
598
|
fn: function (aBoolean){
|
745
599
|
var self=this;
|
746
|
-
(self['@
|
747
|
-
return self;}
|
748
|
-
}),
|
749
|
-
smalltalk.BlockNode);
|
750
|
-
|
751
|
-
|
752
|
-
|
753
|
-
smalltalk.addClass('SequenceNode', smalltalk.Node, ['temps'], 'Compiler');
|
754
|
-
smalltalk.addMethod(
|
755
|
-
unescape('_temps'),
|
756
|
-
smalltalk.method({
|
757
|
-
selector: unescape('temps'),
|
758
|
-
fn: function (){
|
759
|
-
var self=this;
|
760
|
-
return (($receiver = self['@temps']) == nil || $receiver == undefined) ? (function(){return [];})() : $receiver;
|
761
|
-
return self;}
|
762
|
-
}),
|
763
|
-
smalltalk.SequenceNode);
|
764
|
-
|
765
|
-
smalltalk.addMethod(
|
766
|
-
unescape('_temps_'),
|
767
|
-
smalltalk.method({
|
768
|
-
selector: unescape('temps%3A'),
|
769
|
-
fn: function (aCollection){
|
770
|
-
var self=this;
|
771
|
-
(self['@temps']=aCollection);
|
772
|
-
return self;}
|
773
|
-
}),
|
774
|
-
smalltalk.SequenceNode);
|
775
|
-
|
776
|
-
smalltalk.addMethod(
|
777
|
-
unescape('_asBlockSequenceNode'),
|
778
|
-
smalltalk.method({
|
779
|
-
selector: unescape('asBlockSequenceNode'),
|
780
|
-
fn: function (){
|
781
|
-
var self=this;
|
782
|
-
return (function($rec){smalltalk.send($rec, "_nodes_", [smalltalk.send(self, "_nodes", [])]);smalltalk.send($rec, "_temps_", [smalltalk.send(self, "_temps", [])]);return smalltalk.send($rec, "_yourself", []);})(smalltalk.send((smalltalk.BlockSequenceNode || BlockSequenceNode), "_new", []));
|
783
|
-
return self;}
|
784
|
-
}),
|
785
|
-
smalltalk.SequenceNode);
|
786
|
-
|
787
|
-
smalltalk.addMethod(
|
788
|
-
unescape('_accept_'),
|
789
|
-
smalltalk.method({
|
790
|
-
selector: unescape('accept%3A'),
|
791
|
-
fn: function (aVisitor){
|
792
|
-
var self=this;
|
793
|
-
smalltalk.send(aVisitor, "_visitSequenceNode_", [self]);
|
600
|
+
(self['@assigned']=aBoolean);
|
794
601
|
return self;}
|
795
602
|
}),
|
796
|
-
smalltalk.
|
797
|
-
|
603
|
+
smalltalk.VariableNode);
|
798
604
|
|
799
605
|
|
800
|
-
smalltalk.addClass('BlockSequenceNode', smalltalk.SequenceNode, [], 'Compiler');
|
801
|
-
smalltalk.addMethod(
|
802
|
-
unescape('_accept_'),
|
803
|
-
smalltalk.method({
|
804
|
-
selector: unescape('accept%3A'),
|
805
|
-
fn: function (aVisitor){
|
806
|
-
var self=this;
|
807
|
-
smalltalk.send(aVisitor, "_visitBlockSequenceNode_", [self]);
|
808
|
-
return self;}
|
809
|
-
}),
|
810
|
-
smalltalk.BlockSequenceNode);
|
811
606
|
|
607
|
+
smalltalk.addClass('ChunkExporter', smalltalk.Exporter, [], 'Compiler');
|
812
608
|
smalltalk.addMethod(
|
813
|
-
unescape('
|
609
|
+
unescape('_exportDefinitionOf_on_'),
|
814
610
|
smalltalk.method({
|
815
|
-
selector: unescape('
|
816
|
-
fn: function (){
|
611
|
+
selector: unescape('exportDefinitionOf%3Aon%3A'),
|
612
|
+
fn: function (aClass, aStream){
|
817
613
|
var self=this;
|
818
|
-
return
|
614
|
+
(function($rec){smalltalk.send($rec, "_nextPutAll_", [smalltalk.send(self, "_classNameFor_", [smalltalk.send(aClass, "_superclass", [])])]);smalltalk.send($rec, "_nextPutAll_", [smalltalk.send(unescape("%20subclass%3A%20%23"), "__comma", [smalltalk.send(self, "_classNameFor_", [aClass])])]);smalltalk.send($rec, "_lf", []);return smalltalk.send($rec, "_nextPutAll_", [unescape("%09instanceVariableNames%3A%20%27")]);})(aStream);
|
615
|
+
smalltalk.send(smalltalk.send(aClass, "_instanceVariableNames", []), "_do_separatedBy_", [(function(each){return smalltalk.send(aStream, "_nextPutAll_", [each]);}), (function(){return smalltalk.send(aStream, "_nextPutAll_", [" "]);})]);
|
616
|
+
(function($rec){smalltalk.send($rec, "_nextPutAll_", [unescape("%27")]);smalltalk.send($rec, "_lf", []);smalltalk.send($rec, "_nextPutAll_", [smalltalk.send(smalltalk.send(unescape("%09category%3A%20%27"), "__comma", [smalltalk.send(aClass, "_category", [])]), "__comma", [unescape("%27%21")])]);return smalltalk.send($rec, "_lf", []);})(aStream);
|
617
|
+
((($receiver = smalltalk.send(smalltalk.send(aClass, "_comment", []), "_notEmpty", [])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return (function($rec){smalltalk.send($rec, "_nextPutAll_", [smalltalk.send(smalltalk.send(unescape("%21"), "__comma", [smalltalk.send(self, "_classNameFor_", [aClass])]), "__comma", [unescape("%20commentStamp%21")])]);smalltalk.send($rec, "_lf", []);smalltalk.send($rec, "_nextPutAll_", [smalltalk.send(smalltalk.send(self, "_chunkEscape_", [smalltalk.send(aClass, "_comment", [])]), "__comma", [unescape("%21")])]);return smalltalk.send($rec, "_lf", []);})(aStream);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return (function($rec){smalltalk.send($rec, "_nextPutAll_", [smalltalk.send(smalltalk.send(unescape("%21"), "__comma", [smalltalk.send(self, "_classNameFor_", [aClass])]), "__comma", [unescape("%20commentStamp%21")])]);smalltalk.send($rec, "_lf", []);smalltalk.send($rec, "_nextPutAll_", [smalltalk.send(smalltalk.send(self, "_chunkEscape_", [smalltalk.send(aClass, "_comment", [])]), "__comma", [unescape("%21")])]);return smalltalk.send($rec, "_lf", []);})(aStream);})]));
|
618
|
+
smalltalk.send(aStream, "_lf", []);
|
819
619
|
return self;}
|
820
620
|
}),
|
821
|
-
smalltalk.
|
822
|
-
|
823
|
-
|
621
|
+
smalltalk.ChunkExporter);
|
824
622
|
|
825
|
-
smalltalk.addClass('ReturnNode', smalltalk.Node, [], 'Compiler');
|
826
623
|
smalltalk.addMethod(
|
827
|
-
unescape('
|
624
|
+
unescape('_exportMethod_of_on_'),
|
828
625
|
smalltalk.method({
|
829
|
-
selector: unescape('
|
830
|
-
fn: function (
|
626
|
+
selector: unescape('exportMethod%3Aof%3Aon%3A'),
|
627
|
+
fn: function (aMethod, aClass, aStream){
|
831
628
|
var self=this;
|
832
|
-
smalltalk.send(
|
629
|
+
(function($rec){smalltalk.send($rec, "_lf", []);smalltalk.send($rec, "_lf", []);smalltalk.send($rec, "_nextPutAll_", [smalltalk.send(self, "_chunkEscape_", [smalltalk.send(aMethod, "_source", [])])]);smalltalk.send($rec, "_lf", []);return smalltalk.send($rec, "_nextPutAll_", [unescape("%21")]);})(aStream);
|
833
630
|
return self;}
|
834
631
|
}),
|
835
|
-
smalltalk.
|
836
|
-
|
837
|
-
|
632
|
+
smalltalk.ChunkExporter);
|
838
633
|
|
839
|
-
smalltalk.addClass('ValueNode', smalltalk.Node, ['value'], 'Compiler');
|
840
634
|
smalltalk.addMethod(
|
841
|
-
unescape('
|
635
|
+
unescape('_exportMethodsOf_on_'),
|
842
636
|
smalltalk.method({
|
843
|
-
selector: unescape('
|
844
|
-
fn: function (){
|
637
|
+
selector: unescape('exportMethodsOf%3Aon%3A'),
|
638
|
+
fn: function (aClass, aStream){
|
845
639
|
var self=this;
|
846
|
-
return self[
|
640
|
+
smalltalk.send(aClass, "_protocolsDo_", [(function(category, methods){return ((($receiver = smalltalk.send(category, "_match_", [unescape("%5E%5C*")])).klass === smalltalk.Boolean) ? (! $receiver ? (function(){return smalltalk.send(self, "_exportMethods_category_of_on_", [methods, category, aClass, aStream]);})() : nil) : smalltalk.send($receiver, "_ifFalse_", [(function(){return smalltalk.send(self, "_exportMethods_category_of_on_", [methods, category, aClass, aStream]);})]));})]);
|
847
641
|
return self;}
|
848
642
|
}),
|
849
|
-
smalltalk.
|
643
|
+
smalltalk.ChunkExporter);
|
850
644
|
|
851
645
|
smalltalk.addMethod(
|
852
|
-
unescape('
|
646
|
+
unescape('_exportMetaDefinitionOf_on_'),
|
853
647
|
smalltalk.method({
|
854
|
-
selector: unescape('
|
855
|
-
fn: function (
|
648
|
+
selector: unescape('exportMetaDefinitionOf%3Aon%3A'),
|
649
|
+
fn: function (aClass, aStream){
|
856
650
|
var self=this;
|
857
|
-
(self[
|
651
|
+
((($receiver = smalltalk.send(smalltalk.send(smalltalk.send(aClass, "_class", []), "_instanceVariableNames", []), "_isEmpty", [])).klass === smalltalk.Boolean) ? (! $receiver ? (function(){(function($rec){smalltalk.send($rec, "_nextPutAll_", [smalltalk.send(self, "_classNameFor_", [smalltalk.send(aClass, "_class", [])])]);return smalltalk.send($rec, "_nextPutAll_", [unescape("%20instanceVariableNames%3A%20%27")]);})(aStream);smalltalk.send(smalltalk.send(smalltalk.send(aClass, "_class", []), "_instanceVariableNames", []), "_do_separatedBy_", [(function(each){return smalltalk.send(aStream, "_nextPutAll_", [each]);}), (function(){return smalltalk.send(aStream, "_nextPutAll_", [" "]);})]);return (function($rec){smalltalk.send($rec, "_nextPutAll_", [unescape("%27%21")]);smalltalk.send($rec, "_lf", []);return smalltalk.send($rec, "_lf", []);})(aStream);})() : nil) : smalltalk.send($receiver, "_ifFalse_", [(function(){(function($rec){smalltalk.send($rec, "_nextPutAll_", [smalltalk.send(self, "_classNameFor_", [smalltalk.send(aClass, "_class", [])])]);return smalltalk.send($rec, "_nextPutAll_", [unescape("%20instanceVariableNames%3A%20%27")]);})(aStream);smalltalk.send(smalltalk.send(smalltalk.send(aClass, "_class", []), "_instanceVariableNames", []), "_do_separatedBy_", [(function(each){return smalltalk.send(aStream, "_nextPutAll_", [each]);}), (function(){return smalltalk.send(aStream, "_nextPutAll_", [" "]);})]);return (function($rec){smalltalk.send($rec, "_nextPutAll_", [unescape("%27%21")]);smalltalk.send($rec, "_lf", []);return smalltalk.send($rec, "_lf", []);})(aStream);})]));
|
858
652
|
return self;}
|
859
653
|
}),
|
860
|
-
smalltalk.
|
654
|
+
smalltalk.ChunkExporter);
|
861
655
|
|
862
656
|
smalltalk.addMethod(
|
863
|
-
unescape('
|
657
|
+
unescape('_classNameFor_'),
|
864
658
|
smalltalk.method({
|
865
|
-
selector: unescape('
|
866
|
-
fn: function (
|
659
|
+
selector: unescape('classNameFor%3A'),
|
660
|
+
fn: function (aClass){
|
867
661
|
var self=this;
|
868
|
-
smalltalk.send(
|
662
|
+
return ((($receiver = smalltalk.send(aClass, "_isMetaclass", [])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(smalltalk.send(smalltalk.send(aClass, "_instanceClass", []), "_name", []), "__comma", [" class"]);})() : (function(){return ((($receiver = smalltalk.send(aClass, "_isNil", [])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return "nil";})() : (function(){return smalltalk.send(aClass, "_name", []);})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return "nil";}), (function(){return smalltalk.send(aClass, "_name", []);})]));})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return smalltalk.send(smalltalk.send(smalltalk.send(aClass, "_instanceClass", []), "_name", []), "__comma", [" class"]);}), (function(){return ((($receiver = smalltalk.send(aClass, "_isNil", [])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return "nil";})() : (function(){return smalltalk.send(aClass, "_name", []);})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return "nil";}), (function(){return smalltalk.send(aClass, "_name", []);})]));})]));
|
869
663
|
return self;}
|
870
664
|
}),
|
871
|
-
smalltalk.
|
665
|
+
smalltalk.ChunkExporter);
|
872
666
|
|
873
667
|
smalltalk.addMethod(
|
874
|
-
unescape('
|
668
|
+
unescape('_chunkEscape_'),
|
875
669
|
smalltalk.method({
|
876
|
-
selector: unescape('
|
877
|
-
fn: function (){
|
670
|
+
selector: unescape('chunkEscape%3A'),
|
671
|
+
fn: function (aString){
|
878
672
|
var self=this;
|
879
|
-
return
|
673
|
+
return smalltalk.send(smalltalk.send(aString, "_replace_with_", [unescape("%21"), unescape("%21%21")]), "_trimBoth", []);
|
880
674
|
return self;}
|
881
675
|
}),
|
882
|
-
smalltalk.
|
883
|
-
|
884
|
-
|
676
|
+
smalltalk.ChunkExporter);
|
885
677
|
|
886
|
-
smalltalk.addClass('VariableNode', smalltalk.ValueNode, ['assigned'], 'Compiler');
|
887
678
|
smalltalk.addMethod(
|
888
|
-
unescape('
|
679
|
+
unescape('_exportMethods_category_of_on_'),
|
889
680
|
smalltalk.method({
|
890
|
-
selector: unescape('
|
891
|
-
fn: function (
|
681
|
+
selector: unescape('exportMethods%3Acategory%3Aof%3Aon%3A'),
|
682
|
+
fn: function (methods, category, aClass, aStream){
|
892
683
|
var self=this;
|
893
|
-
smalltalk.send(
|
684
|
+
(function($rec){smalltalk.send($rec, "_nextPutAll_", [smalltalk.send(unescape("%21"), "__comma", [smalltalk.send(self, "_classNameFor_", [aClass])])]);return smalltalk.send($rec, "_nextPutAll_", [smalltalk.send(smalltalk.send(unescape("%20methodsFor%3A%20%27"), "__comma", [category]), "__comma", [unescape("%27%21")])]);})(aStream);
|
685
|
+
smalltalk.send(methods, "_do_", [(function(each){return smalltalk.send(self, "_exportMethod_of_on_", [each, aClass, aStream]);})]);
|
686
|
+
(function($rec){smalltalk.send($rec, "_nextPutAll_", [unescape("%20%21")]);smalltalk.send($rec, "_lf", []);return smalltalk.send($rec, "_lf", []);})(aStream);
|
894
687
|
return self;}
|
895
688
|
}),
|
896
|
-
smalltalk.
|
689
|
+
smalltalk.ChunkExporter);
|
897
690
|
|
898
691
|
smalltalk.addMethod(
|
899
|
-
unescape('
|
692
|
+
unescape('_exportPackageExtensionsOf_on_'),
|
900
693
|
smalltalk.method({
|
901
|
-
selector: unescape('
|
902
|
-
fn: function (){
|
694
|
+
selector: unescape('exportPackageExtensionsOf%3Aon%3A'),
|
695
|
+
fn: function (package, aStream){
|
903
696
|
var self=this;
|
904
|
-
|
697
|
+
var name=nil;
|
698
|
+
(name=smalltalk.send(package, "_name", []));
|
699
|
+
smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send((smalltalk.Smalltalk || Smalltalk), "_current", []), "_classes", []), "__comma", [smalltalk.send(smalltalk.send(smalltalk.send((smalltalk.Smalltalk || Smalltalk), "_current", []), "_classes", []), "_collect_", [(function(each){return smalltalk.send(each, "_class", []);})])]), "_do_", [(function(each){return smalltalk.send(each, "_protocolsDo_", [(function(category, methods){return ((($receiver = smalltalk.send(category, "__eq", [smalltalk.send(unescape("*"), "__comma", [name])])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(self, "_exportMethods_category_of_on_", [methods, category, each, aStream]);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return smalltalk.send(self, "_exportMethods_category_of_on_", [methods, category, each, aStream]);})]));})]);})]);
|
905
700
|
return self;}
|
906
701
|
}),
|
907
|
-
smalltalk.
|
702
|
+
smalltalk.ChunkExporter);
|
908
703
|
|
909
704
|
smalltalk.addMethod(
|
910
|
-
unescape('
|
705
|
+
unescape('_exportPackageDefinitionOf_on_'),
|
911
706
|
smalltalk.method({
|
912
|
-
selector: unescape('
|
913
|
-
fn: function (
|
707
|
+
selector: unescape('exportPackageDefinitionOf%3Aon%3A'),
|
708
|
+
fn: function (package, aStream){
|
914
709
|
var self=this;
|
915
|
-
(
|
710
|
+
(function($rec){smalltalk.send($rec, "_nextPutAll_", [smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(unescape("Smalltalk%20current%20createPackage%3A%20%27"), "__comma", [smalltalk.send(package, "_name", [])]), "__comma", [unescape("%27%20properties%3A%20")]), "__comma", [smalltalk.send(smalltalk.send(package, "_properties", []), "_storeString", [])]), "__comma", [unescape("%21")])]);return smalltalk.send($rec, "_lf", []);})(aStream);
|
916
711
|
return self;}
|
917
712
|
}),
|
918
|
-
smalltalk.
|
713
|
+
smalltalk.ChunkExporter);
|
919
714
|
|
920
715
|
|
921
716
|
|
@@ -933,218 +728,216 @@ smalltalk.ClassReferenceNode);
|
|
933
728
|
|
934
729
|
|
935
730
|
|
936
|
-
smalltalk.addClass('
|
731
|
+
smalltalk.addClass('SendNode', smalltalk.Node, ['selector', 'arguments', 'receiver'], 'Compiler');
|
937
732
|
smalltalk.addMethod(
|
938
|
-
unescape('
|
733
|
+
unescape('_selector'),
|
939
734
|
smalltalk.method({
|
940
|
-
selector: unescape('
|
735
|
+
selector: unescape('selector'),
|
941
736
|
fn: function (){
|
942
737
|
var self=this;
|
943
|
-
return
|
738
|
+
return self['@selector'];
|
944
739
|
return self;}
|
945
740
|
}),
|
946
|
-
smalltalk.
|
741
|
+
smalltalk.SendNode);
|
947
742
|
|
948
743
|
smalltalk.addMethod(
|
949
|
-
unescape('
|
744
|
+
unescape('_selector_'),
|
950
745
|
smalltalk.method({
|
951
|
-
selector: unescape('
|
746
|
+
selector: unescape('selector%3A'),
|
952
747
|
fn: function (aString){
|
953
748
|
var self=this;
|
954
|
-
(self['@
|
749
|
+
(self['@selector']=aString);
|
955
750
|
return self;}
|
956
751
|
}),
|
957
|
-
smalltalk.
|
752
|
+
smalltalk.SendNode);
|
958
753
|
|
959
754
|
smalltalk.addMethod(
|
960
|
-
unescape('
|
755
|
+
unescape('_arguments'),
|
961
756
|
smalltalk.method({
|
962
|
-
selector: unescape('
|
963
|
-
fn: function (
|
757
|
+
selector: unescape('arguments'),
|
758
|
+
fn: function (){
|
964
759
|
var self=this;
|
965
|
-
|
760
|
+
return (($receiver = self['@arguments']) == nil || $receiver == undefined) ? (function(){return (self['@arguments']=[]);})() : $receiver;
|
966
761
|
return self;}
|
967
762
|
}),
|
968
|
-
smalltalk.
|
969
|
-
|
970
|
-
|
763
|
+
smalltalk.SendNode);
|
971
764
|
|
972
|
-
smalltalk.addClass('NodeVisitor', smalltalk.Object, [], 'Compiler');
|
973
765
|
smalltalk.addMethod(
|
974
|
-
unescape('
|
766
|
+
unescape('_arguments_'),
|
975
767
|
smalltalk.method({
|
976
|
-
selector: unescape('
|
977
|
-
fn: function (
|
768
|
+
selector: unescape('arguments%3A'),
|
769
|
+
fn: function (aCollection){
|
978
770
|
var self=this;
|
979
|
-
|
771
|
+
(self['@arguments']=aCollection);
|
980
772
|
return self;}
|
981
773
|
}),
|
982
|
-
smalltalk.
|
774
|
+
smalltalk.SendNode);
|
983
775
|
|
984
776
|
smalltalk.addMethod(
|
985
|
-
unescape('
|
777
|
+
unescape('_receiver'),
|
986
778
|
smalltalk.method({
|
987
|
-
selector: unescape('
|
988
|
-
fn: function (
|
779
|
+
selector: unescape('receiver'),
|
780
|
+
fn: function (){
|
989
781
|
var self=this;
|
990
|
-
|
782
|
+
return self['@receiver'];
|
991
783
|
return self;}
|
992
784
|
}),
|
993
|
-
smalltalk.
|
785
|
+
smalltalk.SendNode);
|
994
786
|
|
995
787
|
smalltalk.addMethod(
|
996
|
-
unescape('
|
788
|
+
unescape('_receiver_'),
|
997
789
|
smalltalk.method({
|
998
|
-
selector: unescape('
|
790
|
+
selector: unescape('receiver%3A'),
|
999
791
|
fn: function (aNode){
|
1000
792
|
var self=this;
|
1001
|
-
|
793
|
+
(self['@receiver']=aNode);
|
1002
794
|
return self;}
|
1003
795
|
}),
|
1004
|
-
smalltalk.
|
796
|
+
smalltalk.SendNode);
|
1005
797
|
|
1006
798
|
smalltalk.addMethod(
|
1007
|
-
unescape('
|
799
|
+
unescape('_valueForReceiver_'),
|
1008
800
|
smalltalk.method({
|
1009
|
-
selector: unescape('
|
1010
|
-
fn: function (
|
801
|
+
selector: unescape('valueForReceiver%3A'),
|
802
|
+
fn: function (anObject){
|
1011
803
|
var self=this;
|
1012
|
-
smalltalk.send(self, "
|
804
|
+
return (function($rec){smalltalk.send($rec, "_receiver_", [(($receiver = smalltalk.send(self, "_receiver", [])) == nil || $receiver == undefined) ? (function(){return anObject;})() : (function(){return smalltalk.send(smalltalk.send(self, "_receiver", []), "_valueForReceiver_", [anObject]);})()]);smalltalk.send($rec, "_selector_", [smalltalk.send(self, "_selector", [])]);smalltalk.send($rec, "_arguments_", [smalltalk.send(self, "_arguments", [])]);return smalltalk.send($rec, "_yourself", []);})(smalltalk.send((smalltalk.SendNode || SendNode), "_new", []));
|
1013
805
|
return self;}
|
1014
806
|
}),
|
1015
|
-
smalltalk.
|
807
|
+
smalltalk.SendNode);
|
1016
808
|
|
1017
809
|
smalltalk.addMethod(
|
1018
|
-
unescape('
|
810
|
+
unescape('_cascadeNodeWithMessages_'),
|
1019
811
|
smalltalk.method({
|
1020
|
-
selector: unescape('
|
1021
|
-
fn: function (
|
812
|
+
selector: unescape('cascadeNodeWithMessages%3A'),
|
813
|
+
fn: function (aCollection){
|
1022
814
|
var self=this;
|
1023
|
-
|
815
|
+
var first=nil;
|
816
|
+
(first=(function($rec){smalltalk.send($rec, "_selector_", [smalltalk.send(self, "_selector", [])]);smalltalk.send($rec, "_arguments_", [smalltalk.send(self, "_arguments", [])]);return smalltalk.send($rec, "_yourself", []);})(smalltalk.send((smalltalk.SendNode || SendNode), "_new", [])));
|
817
|
+
return (function($rec){smalltalk.send($rec, "_receiver_", [smalltalk.send(self, "_receiver", [])]);smalltalk.send($rec, "_nodes_", [smalltalk.send(smalltalk.send((smalltalk.Array || Array), "_with_", [first]), "__comma", [aCollection])]);return smalltalk.send($rec, "_yourself", []);})(smalltalk.send((smalltalk.CascadeNode || CascadeNode), "_new", []));
|
1024
818
|
return self;}
|
1025
819
|
}),
|
1026
|
-
smalltalk.
|
820
|
+
smalltalk.SendNode);
|
1027
821
|
|
1028
822
|
smalltalk.addMethod(
|
1029
|
-
unescape('
|
823
|
+
unescape('_accept_'),
|
1030
824
|
smalltalk.method({
|
1031
|
-
selector: unescape('
|
1032
|
-
fn: function (
|
825
|
+
selector: unescape('accept%3A'),
|
826
|
+
fn: function (aVisitor){
|
1033
827
|
var self=this;
|
1034
|
-
smalltalk.send(
|
828
|
+
smalltalk.send(aVisitor, "_visitSendNode_", [self]);
|
1035
829
|
return self;}
|
1036
830
|
}),
|
1037
|
-
smalltalk.
|
831
|
+
smalltalk.SendNode);
|
1038
832
|
|
1039
|
-
smalltalk.addMethod(
|
1040
|
-
unescape('_visitReturnNode_'),
|
1041
|
-
smalltalk.method({
|
1042
|
-
selector: unescape('visitReturnNode%3A'),
|
1043
|
-
fn: function (aNode){
|
1044
|
-
var self=this;
|
1045
|
-
smalltalk.send(self, "_visitNode_", [aNode]);
|
1046
|
-
return self;}
|
1047
|
-
}),
|
1048
|
-
smalltalk.NodeVisitor);
|
1049
833
|
|
834
|
+
|
835
|
+
smalltalk.addClass('JSStatementNode', smalltalk.Node, ['source'], 'Compiler');
|
1050
836
|
smalltalk.addMethod(
|
1051
|
-
unescape('
|
837
|
+
unescape('_source'),
|
1052
838
|
smalltalk.method({
|
1053
|
-
selector: unescape('
|
1054
|
-
fn: function (
|
839
|
+
selector: unescape('source'),
|
840
|
+
fn: function (){
|
1055
841
|
var self=this;
|
1056
|
-
|
842
|
+
return (($receiver = self['@source']) == nil || $receiver == undefined) ? (function(){return "";})() : $receiver;
|
1057
843
|
return self;}
|
1058
844
|
}),
|
1059
|
-
smalltalk.
|
845
|
+
smalltalk.JSStatementNode);
|
1060
846
|
|
1061
847
|
smalltalk.addMethod(
|
1062
|
-
unescape('
|
848
|
+
unescape('_source_'),
|
1063
849
|
smalltalk.method({
|
1064
|
-
selector: unescape('
|
1065
|
-
fn: function (
|
850
|
+
selector: unescape('source%3A'),
|
851
|
+
fn: function (aString){
|
1066
852
|
var self=this;
|
1067
|
-
|
853
|
+
(self['@source']=aString);
|
1068
854
|
return self;}
|
1069
855
|
}),
|
1070
|
-
smalltalk.
|
856
|
+
smalltalk.JSStatementNode);
|
1071
857
|
|
1072
858
|
smalltalk.addMethod(
|
1073
|
-
unescape('
|
859
|
+
unescape('_accept_'),
|
1074
860
|
smalltalk.method({
|
1075
|
-
selector: unescape('
|
1076
|
-
fn: function (
|
861
|
+
selector: unescape('accept%3A'),
|
862
|
+
fn: function (aVisitor){
|
1077
863
|
var self=this;
|
1078
|
-
smalltalk.send(
|
864
|
+
smalltalk.send(aVisitor, "_visitJSStatementNode_", [self]);
|
1079
865
|
return self;}
|
1080
866
|
}),
|
1081
|
-
smalltalk.
|
867
|
+
smalltalk.JSStatementNode);
|
1082
868
|
|
869
|
+
|
870
|
+
|
871
|
+
smalltalk.addClass('AssignmentNode', smalltalk.Node, ['left', 'right'], 'Compiler');
|
1083
872
|
smalltalk.addMethod(
|
1084
|
-
unescape('
|
873
|
+
unescape('_left'),
|
1085
874
|
smalltalk.method({
|
1086
|
-
selector: unescape('
|
1087
|
-
fn: function (
|
875
|
+
selector: unescape('left'),
|
876
|
+
fn: function (){
|
1088
877
|
var self=this;
|
1089
|
-
|
878
|
+
return self['@left'];
|
1090
879
|
return self;}
|
1091
880
|
}),
|
1092
|
-
smalltalk.
|
881
|
+
smalltalk.AssignmentNode);
|
1093
882
|
|
1094
883
|
smalltalk.addMethod(
|
1095
|
-
unescape('
|
884
|
+
unescape('_left_'),
|
1096
885
|
smalltalk.method({
|
1097
|
-
selector: unescape('
|
886
|
+
selector: unescape('left%3A'),
|
1098
887
|
fn: function (aNode){
|
1099
888
|
var self=this;
|
1100
|
-
|
889
|
+
(self['@left']=aNode);
|
890
|
+
smalltalk.send(self['@left'], "_assigned_", [true]);
|
1101
891
|
return self;}
|
1102
892
|
}),
|
1103
|
-
smalltalk.
|
893
|
+
smalltalk.AssignmentNode);
|
1104
894
|
|
1105
895
|
smalltalk.addMethod(
|
1106
|
-
unescape('
|
896
|
+
unescape('_right'),
|
1107
897
|
smalltalk.method({
|
1108
|
-
selector: unescape('
|
1109
|
-
fn: function (
|
898
|
+
selector: unescape('right'),
|
899
|
+
fn: function (){
|
1110
900
|
var self=this;
|
1111
|
-
|
901
|
+
return self['@right'];
|
1112
902
|
return self;}
|
1113
903
|
}),
|
1114
|
-
smalltalk.
|
904
|
+
smalltalk.AssignmentNode);
|
1115
905
|
|
1116
906
|
smalltalk.addMethod(
|
1117
|
-
unescape('
|
907
|
+
unescape('_right_'),
|
1118
908
|
smalltalk.method({
|
1119
|
-
selector: unescape('
|
909
|
+
selector: unescape('right%3A'),
|
1120
910
|
fn: function (aNode){
|
1121
911
|
var self=this;
|
1122
|
-
(
|
912
|
+
(self['@right']=aNode);
|
1123
913
|
return self;}
|
1124
914
|
}),
|
1125
|
-
smalltalk.
|
915
|
+
smalltalk.AssignmentNode);
|
1126
916
|
|
1127
917
|
smalltalk.addMethod(
|
1128
|
-
unescape('
|
918
|
+
unescape('_accept_'),
|
1129
919
|
smalltalk.method({
|
1130
|
-
selector: unescape('
|
1131
|
-
fn: function (
|
920
|
+
selector: unescape('accept%3A'),
|
921
|
+
fn: function (aVisitor){
|
1132
922
|
var self=this;
|
1133
|
-
smalltalk.send(
|
923
|
+
smalltalk.send(aVisitor, "_visitAssignmentNode_", [self]);
|
1134
924
|
return self;}
|
1135
925
|
}),
|
1136
|
-
smalltalk.
|
926
|
+
smalltalk.AssignmentNode);
|
927
|
+
|
928
|
+
|
1137
929
|
|
930
|
+
smalltalk.addClass('DynamicArrayNode', smalltalk.Node, [], 'Compiler');
|
1138
931
|
smalltalk.addMethod(
|
1139
|
-
unescape('
|
932
|
+
unescape('_accept_'),
|
1140
933
|
smalltalk.method({
|
1141
|
-
selector: unescape('
|
1142
|
-
fn: function (
|
934
|
+
selector: unescape('accept%3A'),
|
935
|
+
fn: function (aVisitor){
|
1143
936
|
var self=this;
|
1144
|
-
smalltalk.send(
|
937
|
+
smalltalk.send(aVisitor, "_visitDynamicArrayNode_", [self]);
|
1145
938
|
return self;}
|
1146
939
|
}),
|
1147
|
-
smalltalk.
|
940
|
+
smalltalk.DynamicArrayNode);
|
1148
941
|
|
1149
942
|
|
1150
943
|
|
@@ -1838,34 +1631,241 @@ return self;}
|
|
1838
1631
|
smalltalk.Compiler.klass);
|
1839
1632
|
|
1840
1633
|
|
1841
|
-
smalltalk.addClass('
|
1634
|
+
smalltalk.addClass('BlockSequenceNode', smalltalk.SequenceNode, [], 'Compiler');
|
1635
|
+
smalltalk.addMethod(
|
1636
|
+
unescape('_accept_'),
|
1637
|
+
smalltalk.method({
|
1638
|
+
selector: unescape('accept%3A'),
|
1639
|
+
fn: function (aVisitor){
|
1640
|
+
var self=this;
|
1641
|
+
smalltalk.send(aVisitor, "_visitBlockSequenceNode_", [self]);
|
1642
|
+
return self;}
|
1643
|
+
}),
|
1644
|
+
smalltalk.BlockSequenceNode);
|
1645
|
+
|
1646
|
+
smalltalk.addMethod(
|
1647
|
+
unescape('_isBlockSequenceNode'),
|
1648
|
+
smalltalk.method({
|
1649
|
+
selector: unescape('isBlockSequenceNode'),
|
1650
|
+
fn: function (){
|
1651
|
+
var self=this;
|
1652
|
+
return true;
|
1653
|
+
return self;}
|
1654
|
+
}),
|
1655
|
+
smalltalk.BlockSequenceNode);
|
1842
1656
|
|
1843
1657
|
|
1844
|
-
|
1658
|
+
|
1659
|
+
smalltalk.addClass('BlockNode', smalltalk.Node, ['parameters', 'inlined'], 'Compiler');
|
1660
|
+
smalltalk.addMethod(
|
1661
|
+
unescape('_parameters'),
|
1662
|
+
smalltalk.method({
|
1663
|
+
selector: unescape('parameters'),
|
1664
|
+
fn: function (){
|
1665
|
+
var self=this;
|
1666
|
+
return (($receiver = self['@parameters']) == nil || $receiver == undefined) ? (function(){return (self['@parameters']=smalltalk.send((smalltalk.Array || Array), "_new", []));})() : $receiver;
|
1667
|
+
return self;}
|
1668
|
+
}),
|
1669
|
+
smalltalk.BlockNode);
|
1670
|
+
|
1671
|
+
smalltalk.addMethod(
|
1672
|
+
unescape('_parameters_'),
|
1673
|
+
smalltalk.method({
|
1674
|
+
selector: unescape('parameters%3A'),
|
1675
|
+
fn: function (aCollection){
|
1676
|
+
var self=this;
|
1677
|
+
(self['@parameters']=aCollection);
|
1678
|
+
return self;}
|
1679
|
+
}),
|
1680
|
+
smalltalk.BlockNode);
|
1681
|
+
|
1845
1682
|
smalltalk.addMethod(
|
1846
1683
|
unescape('_accept_'),
|
1847
1684
|
smalltalk.method({
|
1848
1685
|
selector: unescape('accept%3A'),
|
1849
1686
|
fn: function (aVisitor){
|
1850
1687
|
var self=this;
|
1851
|
-
smalltalk.send(aVisitor, "
|
1688
|
+
smalltalk.send(aVisitor, "_visitBlockNode_", [self]);
|
1852
1689
|
return self;}
|
1853
1690
|
}),
|
1854
|
-
smalltalk.
|
1691
|
+
smalltalk.BlockNode);
|
1692
|
+
|
1693
|
+
smalltalk.addMethod(
|
1694
|
+
unescape('_isBlockNode'),
|
1695
|
+
smalltalk.method({
|
1696
|
+
selector: unescape('isBlockNode'),
|
1697
|
+
fn: function (){
|
1698
|
+
var self=this;
|
1699
|
+
return true;
|
1700
|
+
return self;}
|
1701
|
+
}),
|
1702
|
+
smalltalk.BlockNode);
|
1703
|
+
|
1704
|
+
smalltalk.addMethod(
|
1705
|
+
unescape('_inlined'),
|
1706
|
+
smalltalk.method({
|
1707
|
+
selector: unescape('inlined'),
|
1708
|
+
fn: function (){
|
1709
|
+
var self=this;
|
1710
|
+
return (($receiver = self['@inlined']) == nil || $receiver == undefined) ? (function(){return false;})() : $receiver;
|
1711
|
+
return self;}
|
1712
|
+
}),
|
1713
|
+
smalltalk.BlockNode);
|
1714
|
+
|
1715
|
+
smalltalk.addMethod(
|
1716
|
+
unescape('_inlined_'),
|
1717
|
+
smalltalk.method({
|
1718
|
+
selector: unescape('inlined%3A'),
|
1719
|
+
fn: function (aBoolean){
|
1720
|
+
var self=this;
|
1721
|
+
(self['@inlined']=aBoolean);
|
1722
|
+
return self;}
|
1723
|
+
}),
|
1724
|
+
smalltalk.BlockNode);
|
1855
1725
|
|
1856
1726
|
|
1857
1727
|
|
1858
|
-
smalltalk.addClass('
|
1728
|
+
smalltalk.addClass('CascadeNode', smalltalk.Node, ['receiver'], 'Compiler');
|
1729
|
+
smalltalk.addMethod(
|
1730
|
+
unescape('_receiver'),
|
1731
|
+
smalltalk.method({
|
1732
|
+
selector: unescape('receiver'),
|
1733
|
+
fn: function (){
|
1734
|
+
var self=this;
|
1735
|
+
return self['@receiver'];
|
1736
|
+
return self;}
|
1737
|
+
}),
|
1738
|
+
smalltalk.CascadeNode);
|
1739
|
+
|
1740
|
+
smalltalk.addMethod(
|
1741
|
+
unescape('_receiver_'),
|
1742
|
+
smalltalk.method({
|
1743
|
+
selector: unescape('receiver%3A'),
|
1744
|
+
fn: function (aNode){
|
1745
|
+
var self=this;
|
1746
|
+
(self['@receiver']=aNode);
|
1747
|
+
return self;}
|
1748
|
+
}),
|
1749
|
+
smalltalk.CascadeNode);
|
1750
|
+
|
1859
1751
|
smalltalk.addMethod(
|
1860
1752
|
unescape('_accept_'),
|
1861
1753
|
smalltalk.method({
|
1862
1754
|
selector: unescape('accept%3A'),
|
1863
1755
|
fn: function (aVisitor){
|
1864
1756
|
var self=this;
|
1865
|
-
smalltalk.send(aVisitor, "
|
1757
|
+
smalltalk.send(aVisitor, "_visitCascadeNode_", [self]);
|
1866
1758
|
return self;}
|
1867
1759
|
}),
|
1868
|
-
smalltalk.
|
1760
|
+
smalltalk.CascadeNode);
|
1761
|
+
|
1762
|
+
|
1763
|
+
|
1764
|
+
smalltalk.addClass('MethodNode', smalltalk.Node, ['selector', 'arguments', 'source'], 'Compiler');
|
1765
|
+
smalltalk.addMethod(
|
1766
|
+
unescape('_selector'),
|
1767
|
+
smalltalk.method({
|
1768
|
+
selector: unescape('selector'),
|
1769
|
+
fn: function (){
|
1770
|
+
var self=this;
|
1771
|
+
return self['@selector'];
|
1772
|
+
return self;}
|
1773
|
+
}),
|
1774
|
+
smalltalk.MethodNode);
|
1775
|
+
|
1776
|
+
smalltalk.addMethod(
|
1777
|
+
unescape('_selector_'),
|
1778
|
+
smalltalk.method({
|
1779
|
+
selector: unescape('selector%3A'),
|
1780
|
+
fn: function (aString){
|
1781
|
+
var self=this;
|
1782
|
+
(self['@selector']=aString);
|
1783
|
+
return self;}
|
1784
|
+
}),
|
1785
|
+
smalltalk.MethodNode);
|
1786
|
+
|
1787
|
+
smalltalk.addMethod(
|
1788
|
+
unescape('_arguments'),
|
1789
|
+
smalltalk.method({
|
1790
|
+
selector: unescape('arguments'),
|
1791
|
+
fn: function (){
|
1792
|
+
var self=this;
|
1793
|
+
return (($receiver = self['@arguments']) == nil || $receiver == undefined) ? (function(){return [];})() : $receiver;
|
1794
|
+
return self;}
|
1795
|
+
}),
|
1796
|
+
smalltalk.MethodNode);
|
1797
|
+
|
1798
|
+
smalltalk.addMethod(
|
1799
|
+
unescape('_arguments_'),
|
1800
|
+
smalltalk.method({
|
1801
|
+
selector: unescape('arguments%3A'),
|
1802
|
+
fn: function (aCollection){
|
1803
|
+
var self=this;
|
1804
|
+
(self['@arguments']=aCollection);
|
1805
|
+
return self;}
|
1806
|
+
}),
|
1807
|
+
smalltalk.MethodNode);
|
1808
|
+
|
1809
|
+
smalltalk.addMethod(
|
1810
|
+
unescape('_source'),
|
1811
|
+
smalltalk.method({
|
1812
|
+
selector: unescape('source'),
|
1813
|
+
fn: function (){
|
1814
|
+
var self=this;
|
1815
|
+
return self['@source'];
|
1816
|
+
return self;}
|
1817
|
+
}),
|
1818
|
+
smalltalk.MethodNode);
|
1819
|
+
|
1820
|
+
smalltalk.addMethod(
|
1821
|
+
unescape('_source_'),
|
1822
|
+
smalltalk.method({
|
1823
|
+
selector: unescape('source%3A'),
|
1824
|
+
fn: function (aString){
|
1825
|
+
var self=this;
|
1826
|
+
(self['@source']=aString);
|
1827
|
+
return self;}
|
1828
|
+
}),
|
1829
|
+
smalltalk.MethodNode);
|
1830
|
+
|
1831
|
+
smalltalk.addMethod(
|
1832
|
+
unescape('_accept_'),
|
1833
|
+
smalltalk.method({
|
1834
|
+
selector: unescape('accept%3A'),
|
1835
|
+
fn: function (aVisitor){
|
1836
|
+
var self=this;
|
1837
|
+
smalltalk.send(aVisitor, "_visitMethodNode_", [self]);
|
1838
|
+
return self;}
|
1839
|
+
}),
|
1840
|
+
smalltalk.MethodNode);
|
1841
|
+
|
1842
|
+
|
1843
|
+
|
1844
|
+
smalltalk.addClass('StrippedExporter', smalltalk.Exporter, [], 'Compiler');
|
1845
|
+
smalltalk.addMethod(
|
1846
|
+
unescape('_exportDefinitionOf_on_'),
|
1847
|
+
smalltalk.method({
|
1848
|
+
selector: unescape('exportDefinitionOf%3Aon%3A'),
|
1849
|
+
fn: function (aClass, aStream){
|
1850
|
+
var self=this;
|
1851
|
+
(function($rec){smalltalk.send($rec, "_nextPutAll_", [unescape("smalltalk.addClass%28")]);smalltalk.send($rec, "_nextPutAll_", [smalltalk.send(smalltalk.send(unescape("%27"), "__comma", [smalltalk.send(self, "_classNameFor_", [aClass])]), "__comma", [unescape("%27%2C%20")])]);smalltalk.send($rec, "_nextPutAll_", [smalltalk.send("smalltalk.", "__comma", [smalltalk.send(self, "_classNameFor_", [smalltalk.send(aClass, "_superclass", [])])])]);return smalltalk.send($rec, "_nextPutAll_", [unescape("%2C%20%5B")]);})(aStream);
|
1852
|
+
smalltalk.send(smalltalk.send(aClass, "_instanceVariableNames", []), "_do_separatedBy_", [(function(each){return smalltalk.send(aStream, "_nextPutAll_", [smalltalk.send(smalltalk.send(unescape("%27"), "__comma", [each]), "__comma", [unescape("%27")])]);}), (function(){return smalltalk.send(aStream, "_nextPutAll_", [unescape("%2C%20")]);})]);
|
1853
|
+
(function($rec){smalltalk.send($rec, "_nextPutAll_", [unescape("%5D%2C%20%27")]);smalltalk.send($rec, "_nextPutAll_", [smalltalk.send(smalltalk.send(aClass, "_category", []), "__comma", [unescape("%27")])]);return smalltalk.send($rec, "_nextPutAll_", [unescape("%29%3B")]);})(aStream);
|
1854
|
+
smalltalk.send(aStream, "_lf", []);
|
1855
|
+
return self;}
|
1856
|
+
}),
|
1857
|
+
smalltalk.StrippedExporter);
|
1858
|
+
|
1859
|
+
smalltalk.addMethod(
|
1860
|
+
unescape('_exportMethod_of_on_'),
|
1861
|
+
smalltalk.method({
|
1862
|
+
selector: unescape('exportMethod%3Aof%3Aon%3A'),
|
1863
|
+
fn: function (aMethod, aClass, aStream){
|
1864
|
+
var self=this;
|
1865
|
+
(function($rec){smalltalk.send($rec, "_nextPutAll_", [unescape("smalltalk.addMethod%28")]);smalltalk.send($rec, "_lf", []);smalltalk.send($rec, "_nextPutAll_", [smalltalk.send(smalltalk.send(unescape("unescape%28%27"), "__comma", [smalltalk.send(smalltalk.send(smalltalk.send(aMethod, "_selector", []), "_asSelector", []), "_escaped", [])]), "__comma", [unescape("%27%29%2C")])]);smalltalk.send($rec, "_lf", []);smalltalk.send($rec, "_nextPutAll_", [unescape("smalltalk.method%28%7B")]);smalltalk.send($rec, "_lf", []);smalltalk.send($rec, "_nextPutAll_", [smalltalk.send(smalltalk.send(unescape("selector%3A%20unescape%28%27"), "__comma", [smalltalk.send(smalltalk.send(aMethod, "_selector", []), "_escaped", [])]), "__comma", [unescape("%27%29%2C")])]);smalltalk.send($rec, "_lf", []);smalltalk.send($rec, "_nextPutAll_", [smalltalk.send("fn: ", "__comma", [smalltalk.send(smalltalk.send(aMethod, "_fn", []), "_compiledSource", [])])]);smalltalk.send($rec, "_lf", []);smalltalk.send($rec, "_nextPutAll_", [unescape("%7D%29%2C")]);smalltalk.send($rec, "_lf", []);smalltalk.send($rec, "_nextPutAll_", [smalltalk.send("smalltalk.", "__comma", [smalltalk.send(self, "_classNameFor_", [aClass])])]);smalltalk.send($rec, "_nextPutAll_", [unescape("%29%3B")]);smalltalk.send($rec, "_lf", []);return smalltalk.send($rec, "_lf", []);})(aStream);
|
1866
|
+
return self;}
|
1867
|
+
}),
|
1868
|
+
smalltalk.StrippedExporter);
|
1869
1869
|
|
1870
1870
|
|
1871
1871
|
|