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.
- data/README.markdown +2 -0
- data/amber/bin/nodecompile.js +3 -3
- data/amber/css/amber.css +47 -23
- data/amber/images/off.amber.png +0 -0
- data/amber/images/offHover.amber.png +0 -0
- data/amber/images/sprite.amber.png +0 -0
- data/amber/images/tinylogo.amber.png +0 -0
- data/amber/js/Benchfib.deploy.js +34 -34
- data/amber/js/Benchfib.js +49 -49
- data/amber/js/Canvas.deploy.js +937 -937
- data/amber/js/Canvas.js +1622 -1622
- data/amber/js/Compiler-Tests.deploy.js +97 -0
- data/amber/js/Compiler-Tests.js +137 -0
- data/amber/js/Compiler.deploy.js +1030 -924
- data/amber/js/Compiler.js +1613 -1467
- data/amber/js/Documentation.deploy.js +417 -417
- data/amber/js/Documentation.js +728 -728
- data/amber/js/Examples.deploy.js +24 -13
- data/amber/js/Examples.js +36 -19
- data/amber/js/IDE.deploy.js +1583 -1527
- data/amber/js/IDE.js +2586 -2510
- data/amber/js/Kernel-Announcements.deploy.js +19 -19
- data/amber/js/Kernel-Announcements.js +28 -28
- data/amber/js/Kernel-Classes.deploy.js +332 -229
- data/amber/js/Kernel-Classes.js +532 -384
- data/amber/js/Kernel-Collections.deploy.js +1516 -1712
- data/amber/js/Kernel-Collections.js +2436 -2712
- data/amber/js/Kernel-Exceptions.deploy.js +85 -62
- data/amber/js/Kernel-Exceptions.js +131 -98
- data/amber/js/Kernel-Methods.deploy.js +326 -378
- data/amber/js/Kernel-Methods.js +473 -525
- data/amber/js/Kernel-Objects.deploy.js +1777 -2428
- data/amber/js/Kernel-Objects.js +2599 -3426
- data/amber/js/Kernel-Tests.deploy.js +871 -772
- data/amber/js/Kernel-Tests.js +1207 -1083
- data/amber/js/Kernel-Transcript.deploy.js +57 -57
- data/amber/js/Kernel-Transcript.js +94 -94
- data/amber/js/SUnit.deploy.js +116 -116
- data/amber/js/SUnit.js +211 -211
- data/amber/js/amber.js +10 -11
- data/amber/js/boot.js +132 -156
- data/amber/js/init.js +2 -2
- data/amber/js/parser.js +2095 -3014
- data/amber/js/parser.pegjs +1 -1
- data/amber/st/Benchfib.st +22 -22
- data/amber/st/Canvas.st +471 -471
- data/amber/st/Compiler-Tests.st +471 -0
- data/amber/st/Compiler.st +858 -794
- data/amber/st/Examples.st +22 -5
- data/amber/st/IDE.st +1326 -1291
- data/amber/st/Kernel-Announcements.st +2 -2
- data/amber/st/Kernel-Classes.st +148 -90
- data/amber/st/Kernel-Collections.st +950 -1061
- data/amber/st/Kernel-Exceptions.st +33 -25
- data/amber/st/Kernel-Methods.st +151 -151
- data/amber/st/Kernel-Objects.st +891 -1036
- data/amber/st/Kernel-Tests.st +622 -544
- data/amber/st/Kernel-Transcript.st +38 -38
- data/amber/st/SUnit.st +53 -53
- metadata +27 -20
data/amber/js/SUnit.deploy.js
CHANGED
@@ -1,64 +1,64 @@
|
|
1
1
|
smalltalk.addPackage('SUnit', {});
|
2
2
|
smalltalk.addClass('TestCase', smalltalk.Object, ['testSelector'], 'SUnit');
|
3
3
|
smalltalk.addMethod(
|
4
|
-
|
4
|
+
"_assert_",
|
5
5
|
smalltalk.method({
|
6
|
-
selector:
|
7
|
-
fn: function (
|
6
|
+
selector: "assert:",
|
7
|
+
fn: function (aBoolean){
|
8
8
|
var self=this;
|
9
|
-
(self[
|
9
|
+
smalltalk.send(self, "_assert_description_", [aBoolean, "Assertion failed"]);
|
10
10
|
return self;}
|
11
11
|
}),
|
12
12
|
smalltalk.TestCase);
|
13
13
|
|
14
14
|
smalltalk.addMethod(
|
15
|
-
|
15
|
+
"_assert_description_",
|
16
16
|
smalltalk.method({
|
17
|
-
selector:
|
18
|
-
fn: function (){
|
17
|
+
selector: "assert:description:",
|
18
|
+
fn: function (aBoolean, aString){
|
19
19
|
var self=this;
|
20
|
-
return self[
|
20
|
+
((($receiver = aBoolean).klass === smalltalk.Boolean) ? (! $receiver ? (function(){return smalltalk.send(self, "_signalFailure_", [aString]);})() : nil) : smalltalk.send($receiver, "_ifFalse_", [(function(){return smalltalk.send(self, "_signalFailure_", [aString]);})]));
|
21
21
|
return self;}
|
22
22
|
}),
|
23
23
|
smalltalk.TestCase);
|
24
24
|
|
25
25
|
smalltalk.addMethod(
|
26
|
-
|
26
|
+
"_assert_equals_",
|
27
27
|
smalltalk.method({
|
28
|
-
selector:
|
29
|
-
fn: function (
|
28
|
+
selector: "assert:equals:",
|
29
|
+
fn: function (expected, actual){
|
30
30
|
var self=this;
|
31
|
-
|
31
|
+
return smalltalk.send(self, "_assert_description_", [smalltalk.send(expected, "__eq", [actual]), smalltalk.send(smalltalk.send(smalltalk.send("Expected: ", "__comma", [smalltalk.send(expected, "_asString", [])]), "__comma", [" but was: "]), "__comma", [smalltalk.send(actual, "_asString", [])])]);
|
32
32
|
return self;}
|
33
33
|
}),
|
34
34
|
smalltalk.TestCase);
|
35
35
|
|
36
36
|
smalltalk.addMethod(
|
37
|
-
|
37
|
+
"_deny_",
|
38
38
|
smalltalk.method({
|
39
|
-
selector:
|
40
|
-
fn: function (){
|
39
|
+
selector: "deny:",
|
40
|
+
fn: function (aBoolean){
|
41
41
|
var self=this;
|
42
|
-
|
42
|
+
smalltalk.send(self, "_assert_", [smalltalk.send(aBoolean, "_not", [])]);
|
43
43
|
return self;}
|
44
44
|
}),
|
45
45
|
smalltalk.TestCase);
|
46
46
|
|
47
47
|
smalltalk.addMethod(
|
48
|
-
|
48
|
+
"_performTestFor_",
|
49
49
|
smalltalk.method({
|
50
|
-
selector:
|
51
|
-
fn: function (){
|
50
|
+
selector: "performTestFor:",
|
51
|
+
fn: function (aResult){
|
52
52
|
var self=this;
|
53
|
-
|
53
|
+
smalltalk.send((function(){return smalltalk.send((function(){return smalltalk.send(self, "_perform_", [smalltalk.send(self, "_selector", [])]);}), "_on_do_", [(smalltalk.TestFailure || TestFailure), (function(ex){return smalltalk.send(aResult, "_addFailure_", [self]);})]);}), "_on_do_", [(smalltalk.Error || Error), (function(ex){return smalltalk.send(aResult, "_addError_", [self]);})]);
|
54
54
|
return self;}
|
55
55
|
}),
|
56
56
|
smalltalk.TestCase);
|
57
57
|
|
58
58
|
smalltalk.addMethod(
|
59
|
-
|
59
|
+
"_runCaseFor_",
|
60
60
|
smalltalk.method({
|
61
|
-
selector:
|
61
|
+
selector: "runCaseFor:",
|
62
62
|
fn: function (aTestResult){
|
63
63
|
var self=this;
|
64
64
|
smalltalk.send(self, "_setUp", []);
|
@@ -70,109 +70,112 @@ return self;}
|
|
70
70
|
smalltalk.TestCase);
|
71
71
|
|
72
72
|
smalltalk.addMethod(
|
73
|
-
|
73
|
+
"_selector",
|
74
74
|
smalltalk.method({
|
75
|
-
selector:
|
76
|
-
fn: function (
|
75
|
+
selector: "selector",
|
76
|
+
fn: function (){
|
77
77
|
var self=this;
|
78
|
-
|
78
|
+
return self['@testSelector'];
|
79
79
|
return self;}
|
80
80
|
}),
|
81
81
|
smalltalk.TestCase);
|
82
82
|
|
83
83
|
smalltalk.addMethod(
|
84
|
-
|
84
|
+
"_setTestSelector_",
|
85
85
|
smalltalk.method({
|
86
|
-
selector:
|
87
|
-
fn: function (
|
86
|
+
selector: "setTestSelector:",
|
87
|
+
fn: function (aSelector){
|
88
88
|
var self=this;
|
89
|
-
|
89
|
+
(self['@testSelector']=aSelector);
|
90
90
|
return self;}
|
91
91
|
}),
|
92
92
|
smalltalk.TestCase);
|
93
93
|
|
94
94
|
smalltalk.addMethod(
|
95
|
-
|
95
|
+
"_setUp",
|
96
96
|
smalltalk.method({
|
97
|
-
selector:
|
98
|
-
fn: function (
|
97
|
+
selector: "setUp",
|
98
|
+
fn: function (){
|
99
99
|
var self=this;
|
100
|
-
|
100
|
+
|
101
101
|
return self;}
|
102
102
|
}),
|
103
103
|
smalltalk.TestCase);
|
104
104
|
|
105
105
|
smalltalk.addMethod(
|
106
|
-
|
106
|
+
"_should_",
|
107
107
|
smalltalk.method({
|
108
|
-
selector:
|
109
|
-
fn: function (
|
108
|
+
selector: "should:",
|
109
|
+
fn: function (aBlock){
|
110
110
|
var self=this;
|
111
|
-
|
111
|
+
smalltalk.send(self, "_assert_", [smalltalk.send(aBlock, "_value", [])]);
|
112
112
|
return self;}
|
113
113
|
}),
|
114
114
|
smalltalk.TestCase);
|
115
115
|
|
116
116
|
smalltalk.addMethod(
|
117
|
-
|
117
|
+
"_should_raise_",
|
118
118
|
smalltalk.method({
|
119
|
-
selector:
|
120
|
-
fn: function (
|
119
|
+
selector: "should:raise:",
|
120
|
+
fn: function (aBlock, anExceptionClass){
|
121
121
|
var self=this;
|
122
|
-
(
|
122
|
+
smalltalk.send(self, "_assert_", [smalltalk.send((function(){smalltalk.send(aBlock, "_value", []);return false;}), "_on_do_", [anExceptionClass, (function(ex){return true;})])]);
|
123
123
|
return self;}
|
124
124
|
}),
|
125
125
|
smalltalk.TestCase);
|
126
126
|
|
127
127
|
smalltalk.addMethod(
|
128
|
-
|
128
|
+
"_signalFailure_",
|
129
129
|
smalltalk.method({
|
130
|
-
selector:
|
131
|
-
fn: function (
|
130
|
+
selector: "signalFailure:",
|
131
|
+
fn: function (aString){
|
132
132
|
var self=this;
|
133
|
-
smalltalk.send(
|
133
|
+
(function($rec){smalltalk.send($rec, "_messageText_", [aString]);return smalltalk.send($rec, "_signal", []);})(smalltalk.send((smalltalk.TestFailure || TestFailure), "_new", []));
|
134
134
|
return self;}
|
135
135
|
}),
|
136
136
|
smalltalk.TestCase);
|
137
137
|
|
138
138
|
smalltalk.addMethod(
|
139
|
-
|
139
|
+
"_tearDown",
|
140
140
|
smalltalk.method({
|
141
|
-
selector:
|
142
|
-
fn: function (
|
141
|
+
selector: "tearDown",
|
142
|
+
fn: function (){
|
143
143
|
var self=this;
|
144
|
-
|
144
|
+
|
145
145
|
return self;}
|
146
146
|
}),
|
147
147
|
smalltalk.TestCase);
|
148
148
|
|
149
149
|
|
150
150
|
smalltalk.addMethod(
|
151
|
-
|
151
|
+
"_allTestSelectors",
|
152
152
|
smalltalk.method({
|
153
|
-
selector:
|
153
|
+
selector: "allTestSelectors",
|
154
154
|
fn: function (){
|
155
155
|
var self=this;
|
156
|
-
|
156
|
+
var selectors=nil;
|
157
|
+
(selectors=smalltalk.send(self, "_testSelectors", []));
|
158
|
+
((($receiver = smalltalk.send(self, "_shouldInheritSelectors", [])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(selectors, "_addAll_", [smalltalk.send(smalltalk.send(self, "_superclass", []), "_allTestSelectors", [])]);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return smalltalk.send(selectors, "_addAll_", [smalltalk.send(smalltalk.send(self, "_superclass", []), "_allTestSelectors", [])]);})]));
|
159
|
+
return selectors;
|
157
160
|
return self;}
|
158
161
|
}),
|
159
162
|
smalltalk.TestCase.klass);
|
160
163
|
|
161
164
|
smalltalk.addMethod(
|
162
|
-
|
165
|
+
"_buildSuite",
|
163
166
|
smalltalk.method({
|
164
|
-
selector:
|
165
|
-
fn: function (
|
167
|
+
selector: "buildSuite",
|
168
|
+
fn: function (){
|
166
169
|
var self=this;
|
167
|
-
return (
|
170
|
+
return smalltalk.send(smalltalk.send(self, "_allTestSelectors", []), "_collect_", [(function(each){return smalltalk.send(self, "_selector_", [each]);})]);
|
168
171
|
return self;}
|
169
172
|
}),
|
170
173
|
smalltalk.TestCase.klass);
|
171
174
|
|
172
175
|
smalltalk.addMethod(
|
173
|
-
|
176
|
+
"_lookupHierarchyRoot",
|
174
177
|
smalltalk.method({
|
175
|
-
selector:
|
178
|
+
selector: "lookupHierarchyRoot",
|
176
179
|
fn: function (){
|
177
180
|
var self=this;
|
178
181
|
return (smalltalk.TestCase || TestCase);
|
@@ -181,37 +184,34 @@ return self;}
|
|
181
184
|
smalltalk.TestCase.klass);
|
182
185
|
|
183
186
|
smalltalk.addMethod(
|
184
|
-
|
187
|
+
"_selector_",
|
185
188
|
smalltalk.method({
|
186
|
-
selector:
|
187
|
-
fn: function (){
|
189
|
+
selector: "selector:",
|
190
|
+
fn: function (aSelector){
|
188
191
|
var self=this;
|
189
|
-
|
190
|
-
(selectors=smalltalk.send(self, "_testSelectors", []));
|
191
|
-
((($receiver = smalltalk.send(self, "_shouldInheritSelectors", [])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(selectors, "_addAll_", [smalltalk.send(smalltalk.send(self, "_superclass", []), "_allTestSelectors", [])]);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return smalltalk.send(selectors, "_addAll_", [smalltalk.send(smalltalk.send(self, "_superclass", []), "_allTestSelectors", [])]);})]));
|
192
|
-
return selectors;
|
192
|
+
return (function($rec){smalltalk.send($rec, "_setTestSelector_", [aSelector]);return smalltalk.send($rec, "_yourself", []);})(smalltalk.send(self, "_new", []));
|
193
193
|
return self;}
|
194
194
|
}),
|
195
195
|
smalltalk.TestCase.klass);
|
196
196
|
|
197
197
|
smalltalk.addMethod(
|
198
|
-
|
198
|
+
"_shouldInheritSelectors",
|
199
199
|
smalltalk.method({
|
200
|
-
selector:
|
200
|
+
selector: "shouldInheritSelectors",
|
201
201
|
fn: function (){
|
202
202
|
var self=this;
|
203
|
-
return smalltalk.send(
|
203
|
+
return smalltalk.send(self, "_~_eq", [smalltalk.send(self, "_lookupHierarchyRoot", [])]);
|
204
204
|
return self;}
|
205
205
|
}),
|
206
206
|
smalltalk.TestCase.klass);
|
207
207
|
|
208
208
|
smalltalk.addMethod(
|
209
|
-
|
209
|
+
"_testSelectors",
|
210
210
|
smalltalk.method({
|
211
|
-
selector:
|
211
|
+
selector: "testSelectors",
|
212
212
|
fn: function (){
|
213
213
|
var self=this;
|
214
|
-
return smalltalk.send(self, "
|
214
|
+
return smalltalk.send(smalltalk.send(smalltalk.send(self, "_methodDictionary", []), "_keys", []), "_select_", [(function(each){return smalltalk.send(each, "_match_", ["^test"]);})]);
|
215
215
|
return self;}
|
216
216
|
}),
|
217
217
|
smalltalk.TestCase.klass);
|
@@ -222,127 +222,127 @@ smalltalk.addClass('TestFailure', smalltalk.Error, [], 'SUnit');
|
|
222
222
|
|
223
223
|
smalltalk.addClass('TestResult', smalltalk.Object, ['timestamp', 'runs', 'errors', 'failures', 'total'], 'SUnit');
|
224
224
|
smalltalk.addMethod(
|
225
|
-
|
225
|
+
"_addError_",
|
226
226
|
smalltalk.method({
|
227
|
-
selector:
|
228
|
-
fn: function (){
|
227
|
+
selector: "addError:",
|
228
|
+
fn: function (anError){
|
229
229
|
var self=this;
|
230
|
-
|
230
|
+
smalltalk.send(smalltalk.send(self, "_errors", []), "_add_", [anError]);
|
231
231
|
return self;}
|
232
232
|
}),
|
233
233
|
smalltalk.TestResult);
|
234
234
|
|
235
235
|
smalltalk.addMethod(
|
236
|
-
|
236
|
+
"_addFailure_",
|
237
237
|
smalltalk.method({
|
238
|
-
selector:
|
239
|
-
fn: function (){
|
238
|
+
selector: "addFailure:",
|
239
|
+
fn: function (aFailure){
|
240
240
|
var self=this;
|
241
|
-
|
241
|
+
smalltalk.send(smalltalk.send(self, "_failures", []), "_add_", [aFailure]);
|
242
242
|
return self;}
|
243
243
|
}),
|
244
244
|
smalltalk.TestResult);
|
245
245
|
|
246
246
|
smalltalk.addMethod(
|
247
|
-
|
247
|
+
"_errors",
|
248
248
|
smalltalk.method({
|
249
|
-
selector:
|
249
|
+
selector: "errors",
|
250
250
|
fn: function (){
|
251
251
|
var self=this;
|
252
|
-
return self['@
|
252
|
+
return self['@errors'];
|
253
253
|
return self;}
|
254
254
|
}),
|
255
255
|
smalltalk.TestResult);
|
256
256
|
|
257
257
|
smalltalk.addMethod(
|
258
|
-
|
258
|
+
"_failures",
|
259
259
|
smalltalk.method({
|
260
|
-
selector:
|
260
|
+
selector: "failures",
|
261
261
|
fn: function (){
|
262
262
|
var self=this;
|
263
|
-
return self['@
|
263
|
+
return self['@failures'];
|
264
264
|
return self;}
|
265
265
|
}),
|
266
266
|
smalltalk.TestResult);
|
267
267
|
|
268
268
|
smalltalk.addMethod(
|
269
|
-
|
269
|
+
"_increaseRuns",
|
270
270
|
smalltalk.method({
|
271
|
-
selector:
|
272
|
-
fn: function (
|
271
|
+
selector: "increaseRuns",
|
272
|
+
fn: function (){
|
273
273
|
var self=this;
|
274
|
-
(self['@
|
274
|
+
(self['@runs']=((($receiver = self['@runs']).klass === smalltalk.Number) ? $receiver +(1) : smalltalk.send($receiver, "__plus", [(1)])));
|
275
275
|
return self;}
|
276
276
|
}),
|
277
277
|
smalltalk.TestResult);
|
278
278
|
|
279
279
|
smalltalk.addMethod(
|
280
|
-
|
280
|
+
"_initialize",
|
281
281
|
smalltalk.method({
|
282
|
-
selector:
|
283
|
-
fn: function (
|
282
|
+
selector: "initialize",
|
283
|
+
fn: function (){
|
284
284
|
var self=this;
|
285
|
-
smalltalk.send(
|
285
|
+
smalltalk.send(self, "_initialize", [], smalltalk.TestResult.superclass || nil);
|
286
|
+
(self['@timestamp']=smalltalk.send((smalltalk.Date || Date), "_now", []));
|
287
|
+
(self['@runs']=(0));
|
288
|
+
(self['@errors']=smalltalk.send((smalltalk.Array || Array), "_new", []));
|
289
|
+
(self['@failures']=smalltalk.send((smalltalk.Array || Array), "_new", []));
|
290
|
+
(self['@total']=(0));
|
286
291
|
return self;}
|
287
292
|
}),
|
288
293
|
smalltalk.TestResult);
|
289
294
|
|
290
295
|
smalltalk.addMethod(
|
291
|
-
|
296
|
+
"_runs",
|
292
297
|
smalltalk.method({
|
293
|
-
selector:
|
294
|
-
fn: function (
|
298
|
+
selector: "runs",
|
299
|
+
fn: function (){
|
295
300
|
var self=this;
|
296
|
-
|
301
|
+
return self['@runs'];
|
297
302
|
return self;}
|
298
303
|
}),
|
299
304
|
smalltalk.TestResult);
|
300
305
|
|
301
306
|
smalltalk.addMethod(
|
302
|
-
|
307
|
+
"_status",
|
303
308
|
smalltalk.method({
|
304
|
-
selector:
|
309
|
+
selector: "status",
|
305
310
|
fn: function (){
|
306
311
|
var self=this;
|
307
|
-
return self[
|
312
|
+
return ((($receiver = smalltalk.send(smalltalk.send(self, "_errors", []), "_isEmpty", [])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return ((($receiver = smalltalk.send(smalltalk.send(self, "_failures", []), "_isEmpty", [])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return "success";})() : (function(){return "failure";})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return "success";}), (function(){return "failure";})]));})() : (function(){return "error";})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return ((($receiver = smalltalk.send(smalltalk.send(self, "_failures", []), "_isEmpty", [])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return "success";})() : (function(){return "failure";})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return "success";}), (function(){return "failure";})]));}), (function(){return "error";})]));
|
308
313
|
return self;}
|
309
314
|
}),
|
310
315
|
smalltalk.TestResult);
|
311
316
|
|
312
317
|
smalltalk.addMethod(
|
313
|
-
|
318
|
+
"_timestamp",
|
314
319
|
smalltalk.method({
|
315
|
-
selector:
|
320
|
+
selector: "timestamp",
|
316
321
|
fn: function (){
|
317
322
|
var self=this;
|
318
|
-
|
323
|
+
return self['@timestamp'];
|
319
324
|
return self;}
|
320
325
|
}),
|
321
326
|
smalltalk.TestResult);
|
322
327
|
|
323
328
|
smalltalk.addMethod(
|
324
|
-
|
329
|
+
"_total",
|
325
330
|
smalltalk.method({
|
326
|
-
selector:
|
331
|
+
selector: "total",
|
327
332
|
fn: function (){
|
328
333
|
var self=this;
|
329
|
-
return
|
334
|
+
return self['@total'];
|
330
335
|
return self;}
|
331
336
|
}),
|
332
337
|
smalltalk.TestResult);
|
333
338
|
|
334
339
|
smalltalk.addMethod(
|
335
|
-
|
340
|
+
"_total_",
|
336
341
|
smalltalk.method({
|
337
|
-
selector:
|
338
|
-
fn: function (){
|
342
|
+
selector: "total:",
|
343
|
+
fn: function (aNumber){
|
339
344
|
var self=this;
|
340
|
-
|
341
|
-
(self['@timestamp']=smalltalk.send((smalltalk.Date || Date), "_now", []));
|
342
|
-
(self['@runs']=(0));
|
343
|
-
(self['@errors']=smalltalk.send((smalltalk.Array || Array), "_new", []));
|
344
|
-
(self['@failures']=smalltalk.send((smalltalk.Array || Array), "_new", []));
|
345
|
-
(self['@total']=(0));
|
345
|
+
(self['@total']=aNumber);
|
346
346
|
return self;}
|
347
347
|
}),
|
348
348
|
smalltalk.TestResult);
|