resin 0.0.7 → 0.0.8
Sign up to get free protection for your applications and to get access to all the features.
- data/amber/css/amber-normalize.css +468 -0
- data/amber/css/amber-normalize.less +501 -0
- data/amber/css/amber.css +9 -6
- data/amber/js/IDE.deploy.js +443 -440
- data/amber/js/IDE.js +704 -701
- data/amber/js/Kernel-Collections.deploy.js +399 -363
- data/amber/js/Kernel-Collections.js +466 -415
- data/amber/js/Kernel-Objects.deploy.js +55 -10
- data/amber/js/Kernel-Objects.js +80 -15
- data/amber/js/Kernel-Tests.deploy.js +216 -166
- data/amber/js/Kernel-Tests.js +266 -196
- data/amber/js/amber.js +7 -2
- data/amber/js/init.js +2 -1
- data/amber/st/IDE.st +362 -360
- data/amber/st/Kernel-Collections.st +85 -62
- data/amber/st/Kernel-Objects.st +29 -2
- data/amber/st/Kernel-Tests.st +63 -38
- metadata +20 -18
data/amber/js/Kernel-Tests.js
CHANGED
@@ -1,11 +1,46 @@
|
|
1
1
|
smalltalk.addPackage('Kernel-Tests', {});
|
2
|
+
smalltalk.addClass('ArrayTest', smalltalk.TestCase, [], 'Kernel-Tests');
|
3
|
+
smalltalk.addMethod(
|
4
|
+
unescape('_testFirstN'),
|
5
|
+
smalltalk.method({
|
6
|
+
selector: unescape('testFirstN'),
|
7
|
+
category: 'testing',
|
8
|
+
fn: function (){
|
9
|
+
var self=this;
|
10
|
+
smalltalk.send(self, "_assert_equals_", [[(1),(2),(3)], smalltalk.send([(1),(2),(3),(4),(5)], "_first_", [(3)])]);
|
11
|
+
return self;},
|
12
|
+
args: [],
|
13
|
+
source: unescape('testFirstN%0A%09self%20assert%3A%20%7B1.%202.%203%7D%20equals%3A%20%28%7B1.%202.%A03.%204.%205%7D%20first%3A%203%29.'),
|
14
|
+
messageSends: ["assert:equals:", "first:"],
|
15
|
+
referencedClasses: []
|
16
|
+
}),
|
17
|
+
smalltalk.ArrayTest);
|
18
|
+
|
19
|
+
smalltalk.addMethod(
|
20
|
+
unescape('_testIfEmpty'),
|
21
|
+
smalltalk.method({
|
22
|
+
selector: unescape('testIfEmpty'),
|
23
|
+
category: 'testing',
|
24
|
+
fn: function (){
|
25
|
+
var self=this;
|
26
|
+
smalltalk.send(self, "_assert_equals_", ["zork", smalltalk.send("", "_ifEmpty_", [(function(){return "zork";})])]);
|
27
|
+
return self;},
|
28
|
+
args: [],
|
29
|
+
source: unescape('testIfEmpty%0A%09self%20assert%3A%20%27zork%27%20equals%3A%20%28%20%27%27%20ifEmpty%3A%20%5B%27zork%27%5D%20%29'),
|
30
|
+
messageSends: ["assert:equals:", "ifEmpty:"],
|
31
|
+
referencedClasses: []
|
32
|
+
}),
|
33
|
+
smalltalk.ArrayTest);
|
34
|
+
|
35
|
+
|
36
|
+
|
2
37
|
smalltalk.addClass('StringTest', smalltalk.TestCase, [], 'Kernel-Tests');
|
3
38
|
smalltalk.addMethod(
|
4
39
|
unescape('_testJoin'),
|
5
40
|
smalltalk.method({
|
6
41
|
selector: unescape('testJoin'),
|
7
42
|
category: 'tests',
|
8
|
-
fn: function (){
|
43
|
+
fn: function () {
|
9
44
|
var self=this;
|
10
45
|
smalltalk.send(self, "_assert_equals_", [unescape("hello%2Cworld"), smalltalk.send(unescape("%2C"), "_join_", [["hello", "world"]])]);
|
11
46
|
return self;},
|
@@ -21,7 +56,7 @@ unescape('_testStreamContents'),
|
|
21
56
|
smalltalk.method({
|
22
57
|
selector: unescape('testStreamContents'),
|
23
58
|
category: 'tests',
|
24
|
-
fn: function (){
|
59
|
+
fn: function () {
|
25
60
|
var self=this;
|
26
61
|
smalltalk.send(self, "_assert_equals_", ["hello world", smalltalk.send((smalltalk.String || String), "_streamContents_", [(function(aStream){return (function($rec){smalltalk.send($rec, "_nextPutAll_", ["hello"]);smalltalk.send($rec, "_space", []);return smalltalk.send($rec, "_nextPutAll_", ["world"]);})(aStream);})])]);
|
27
62
|
return self;},
|
@@ -37,7 +72,7 @@ unescape('_testIncludesSubString'),
|
|
37
72
|
smalltalk.method({
|
38
73
|
selector: unescape('testIncludesSubString'),
|
39
74
|
category: 'tests',
|
40
|
-
fn: function (){
|
75
|
+
fn: function () {
|
41
76
|
var self=this;
|
42
77
|
smalltalk.send(self, "_assert_", [smalltalk.send("amber", "_includesSubString_", ["ber"])]);
|
43
78
|
smalltalk.send(self, "_deny_", [smalltalk.send("amber", "_includesSubString_", ["zork"])]);
|
@@ -54,7 +89,7 @@ unescape('_testEquality'),
|
|
54
89
|
smalltalk.method({
|
55
90
|
selector: unescape('testEquality'),
|
56
91
|
category: 'tests',
|
57
|
-
fn: function (){
|
92
|
+
fn: function () {
|
58
93
|
var self=this;
|
59
94
|
smalltalk.send(self, "_assert_", [smalltalk.send("hello", "__eq", ["hello"])]);
|
60
95
|
smalltalk.send(self, "_deny_", [smalltalk.send("hello", "__eq", ["world"])]);
|
@@ -74,7 +109,7 @@ unescape('_testCopyWithoutAll'),
|
|
74
109
|
smalltalk.method({
|
75
110
|
selector: unescape('testCopyWithoutAll'),
|
76
111
|
category: 'tests',
|
77
|
-
fn: function (){
|
112
|
+
fn: function () {
|
78
113
|
var self=this;
|
79
114
|
smalltalk.send(self, "_assert_equals_", ["hello world", smalltalk.send(unescape("*hello*%20*world*"), "_copyWithoutAll_", [unescape("*")])]);
|
80
115
|
return self;},
|
@@ -90,7 +125,7 @@ unescape('_testAt'),
|
|
90
125
|
smalltalk.method({
|
91
126
|
selector: unescape('testAt'),
|
92
127
|
category: 'tests',
|
93
|
-
fn: function (){
|
128
|
+
fn: function () {
|
94
129
|
var self=this;
|
95
130
|
smalltalk.send(self, "_assert_", [smalltalk.send(smalltalk.send("hello", "_at_", [(1)]), "__eq", ["h"])]);
|
96
131
|
smalltalk.send(self, "_assert_", [smalltalk.send(smalltalk.send("hello", "_at_", [(5)]), "__eq", ["o"])]);
|
@@ -108,7 +143,7 @@ unescape('_testAtPut'),
|
|
108
143
|
smalltalk.method({
|
109
144
|
selector: unescape('testAtPut'),
|
110
145
|
category: 'tests',
|
111
|
-
fn: function (){
|
146
|
+
fn: function () {
|
112
147
|
var self=this;
|
113
148
|
smalltalk.send(self, "_should_raise_", [(function(){return smalltalk.send("hello", "_at_put_", [(1), "a"]);}), (smalltalk.Error || Error)]);
|
114
149
|
return self;},
|
@@ -124,7 +159,7 @@ unescape('_testSize'),
|
|
124
159
|
smalltalk.method({
|
125
160
|
selector: unescape('testSize'),
|
126
161
|
category: 'tests',
|
127
|
-
fn: function (){
|
162
|
+
fn: function () {
|
128
163
|
var self=this;
|
129
164
|
smalltalk.send(self, "_assert_equals_", [smalltalk.send("smalltalk", "_size", []), (9)]);
|
130
165
|
smalltalk.send(self, "_assert_equals_", [smalltalk.send("", "_size", []), (0)]);
|
@@ -141,7 +176,7 @@ unescape('_testAddRemove'),
|
|
141
176
|
smalltalk.method({
|
142
177
|
selector: unescape('testAddRemove'),
|
143
178
|
category: 'tests',
|
144
|
-
fn: function (){
|
179
|
+
fn: function () {
|
145
180
|
var self=this;
|
146
181
|
smalltalk.send(self, "_should_raise_", [(function(){return smalltalk.send("hello", "_add_", ["a"]);}), (smalltalk.Error || Error)]);
|
147
182
|
smalltalk.send(self, "_should_raise_", [(function(){return smalltalk.send("hello", "_remove_", ["h"]);}), (smalltalk.Error || Error)]);
|
@@ -153,6 +188,22 @@ referencedClasses: ["Error"]
|
|
153
188
|
}),
|
154
189
|
smalltalk.StringTest);
|
155
190
|
|
191
|
+
smalltalk.addMethod(
|
192
|
+
unescape('_testAsArray'),
|
193
|
+
smalltalk.method({
|
194
|
+
selector: unescape('testAsArray'),
|
195
|
+
category: 'tests',
|
196
|
+
fn: function () {
|
197
|
+
var self=this;
|
198
|
+
smalltalk.send(self, "_assert_", [smalltalk.send(smalltalk.send("hello", "_asArray", []), "__eq", [["h", "e", "l", "l", "o"]])]);
|
199
|
+
return self;},
|
200
|
+
args: [],
|
201
|
+
source: unescape('testAsArray%0A%09self%20assert%3A%20%27hello%27%20asArray%20%3D%20%23%28%27h%27%20%27e%27%20%27l%27%20%27l%27%20%27o%27%29.'),
|
202
|
+
messageSends: ["assert:", unescape("%3D"), "asArray"],
|
203
|
+
referencedClasses: []
|
204
|
+
}),
|
205
|
+
smalltalk.StringTest);
|
206
|
+
|
156
207
|
|
157
208
|
|
158
209
|
smalltalk.addClass('DictionaryTest', smalltalk.TestCase, [], 'Kernel-Tests');
|
@@ -161,7 +212,7 @@ unescape('_testPrintString'),
|
|
161
212
|
smalltalk.method({
|
162
213
|
selector: unescape('testPrintString'),
|
163
214
|
category: 'tests',
|
164
|
-
fn: function (){
|
215
|
+
fn: function () {
|
165
216
|
var self=this;
|
166
217
|
smalltalk.send(self, "_assert_equals_", [unescape("a%20Dictionary%28%27firstname%27%20-%3E%20%27James%27%20%2C%20%27lastname%27%20-%3E%20%27Bond%27%29"), (function($rec){smalltalk.send($rec, "_at_put_", ["firstname", "James"]);smalltalk.send($rec, "_at_put_", ["lastname", "Bond"]);return smalltalk.send($rec, "_printString", []);})(smalltalk.send((smalltalk.Dictionary || Dictionary), "_new", []))]);
|
167
218
|
return self;},
|
@@ -177,7 +228,7 @@ unescape('_testEquality'),
|
|
177
228
|
smalltalk.method({
|
178
229
|
selector: unescape('testEquality'),
|
179
230
|
category: 'tests',
|
180
|
-
fn: function (){
|
231
|
+
fn: function () {
|
181
232
|
var self=this;
|
182
233
|
var d1=nil;
|
183
234
|
var d2=nil;
|
@@ -204,7 +255,7 @@ unescape('_testDynamicDictionaries'),
|
|
204
255
|
smalltalk.method({
|
205
256
|
selector: unescape('testDynamicDictionaries'),
|
206
257
|
category: 'tests',
|
207
|
-
fn: function (){
|
258
|
+
fn: function () {
|
208
259
|
var self=this;
|
209
260
|
smalltalk.send(self, "_assert_", [smalltalk.send(smalltalk.send(smalltalk.HashedCollection._fromPairs_([smalltalk.send("hello", "__minus_gt", [(1)])]), "_asDictionary", []), "__eq", [smalltalk.send((smalltalk.Dictionary || Dictionary), "_with_", [smalltalk.send("hello", "__minus_gt", [(1)])])])]);
|
210
261
|
return self;},
|
@@ -220,7 +271,7 @@ unescape('_testAccessing'),
|
|
220
271
|
smalltalk.method({
|
221
272
|
selector: unescape('testAccessing'),
|
222
273
|
category: 'tests',
|
223
|
-
fn: function (){
|
274
|
+
fn: function () {
|
224
275
|
var self=this;
|
225
276
|
var d=nil;
|
226
277
|
(d=smalltalk.send((smalltalk.Dictionary || Dictionary), "_new", []));
|
@@ -245,7 +296,7 @@ unescape('_testSize'),
|
|
245
296
|
smalltalk.method({
|
246
297
|
selector: unescape('testSize'),
|
247
298
|
category: 'tests',
|
248
|
-
fn: function (){
|
299
|
+
fn: function () {
|
249
300
|
var self=this;
|
250
301
|
var d=nil;
|
251
302
|
(d=smalltalk.send((smalltalk.Dictionary || Dictionary), "_new", []));
|
@@ -267,7 +318,7 @@ unescape('_testValues'),
|
|
267
318
|
smalltalk.method({
|
268
319
|
selector: unescape('testValues'),
|
269
320
|
category: 'tests',
|
270
|
-
fn: function (){
|
321
|
+
fn: function () {
|
271
322
|
var self=this;
|
272
323
|
var d=nil;
|
273
324
|
(d=smalltalk.send((smalltalk.Dictionary || Dictionary), "_new", []));
|
@@ -288,7 +339,7 @@ unescape('_testKeys'),
|
|
288
339
|
smalltalk.method({
|
289
340
|
selector: unescape('testKeys'),
|
290
341
|
category: 'tests',
|
291
|
-
fn: function (){
|
342
|
+
fn: function () {
|
292
343
|
var self=this;
|
293
344
|
var d=nil;
|
294
345
|
(d=smalltalk.send((smalltalk.Dictionary || Dictionary), "_new", []));
|
@@ -312,7 +363,7 @@ unescape('_testLogic'),
|
|
312
363
|
smalltalk.method({
|
313
364
|
selector: unescape('testLogic'),
|
314
365
|
category: 'tests',
|
315
|
-
fn: function (){
|
366
|
+
fn: function () {
|
316
367
|
var self=this;
|
317
368
|
(function($rec){smalltalk.send($rec, "_assert_", [smalltalk.send(true, "_&", [true])]);smalltalk.send($rec, "_deny_", [smalltalk.send(true, "_&", [false])]);smalltalk.send($rec, "_deny_", [smalltalk.send(false, "_&", [true])]);return smalltalk.send($rec, "_deny_", [smalltalk.send(false, "_&", [false])]);})(self);
|
318
369
|
(function($rec){smalltalk.send($rec, "_assert_", [smalltalk.send(true, "_|", [true])]);smalltalk.send($rec, "_assert_", [smalltalk.send(true, "_|", [false])]);smalltalk.send($rec, "_assert_", [smalltalk.send(false, "_|", [true])]);return smalltalk.send($rec, "_deny_", [smalltalk.send(false, "_|", [false])]);})(self);
|
@@ -331,7 +382,7 @@ unescape('_testEquality'),
|
|
331
382
|
smalltalk.method({
|
332
383
|
selector: unescape('testEquality'),
|
333
384
|
category: 'tests',
|
334
|
-
fn: function (){
|
385
|
+
fn: function () {
|
335
386
|
var self=this;
|
336
387
|
smalltalk.send(self, "_deny_", [smalltalk.send((0), "__eq", [false])]);
|
337
388
|
smalltalk.send(self, "_deny_", [smalltalk.send(false, "__eq", [(0)])]);
|
@@ -356,7 +407,7 @@ unescape('_testLogicKeywords'),
|
|
356
407
|
smalltalk.method({
|
357
408
|
selector: unescape('testLogicKeywords'),
|
358
409
|
category: 'tests',
|
359
|
-
fn: function (){
|
410
|
+
fn: function () {
|
360
411
|
var self=this;
|
361
412
|
(function($rec){smalltalk.send($rec, "_assert_", [smalltalk.send(true, "_and_", [(function(){return true;})])]);smalltalk.send($rec, "_deny_", [smalltalk.send(true, "_and_", [(function(){return false;})])]);smalltalk.send($rec, "_deny_", [smalltalk.send(false, "_and_", [(function(){return true;})])]);return smalltalk.send($rec, "_deny_", [smalltalk.send(false, "_and_", [(function(){return false;})])]);})(self);
|
362
413
|
(function($rec){smalltalk.send($rec, "_assert_", [smalltalk.send(true, "_or_", [(function(){return true;})])]);smalltalk.send($rec, "_assert_", [smalltalk.send(true, "_or_", [(function(){return false;})])]);smalltalk.send($rec, "_assert_", [smalltalk.send(false, "_or_", [(function(){return true;})])]);return smalltalk.send($rec, "_deny_", [smalltalk.send(false, "_or_", [(function(){return false;})])]);})(self);
|
@@ -375,7 +426,7 @@ unescape('_testIfTrueIfFalse'),
|
|
375
426
|
smalltalk.method({
|
376
427
|
selector: unescape('testIfTrueIfFalse'),
|
377
428
|
category: 'tests',
|
378
|
-
fn: function (){
|
429
|
+
fn: function () {
|
379
430
|
var self=this;
|
380
431
|
smalltalk.send(self, "_assert_", [smalltalk.send(((($receiver = true).klass === smalltalk.Boolean) ? ($receiver ? (function(){return "alternative block";})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return "alternative block";})])), "__eq", ["alternative block"])]);
|
381
432
|
smalltalk.send(self, "_assert_", [smalltalk.send(((($receiver = true).klass === smalltalk.Boolean) ? (! $receiver ? (function(){return "alternative block";})() : nil) : smalltalk.send($receiver, "_ifFalse_", [(function(){return "alternative block";})])), "__eq", [nil])]);
|
@@ -401,7 +452,7 @@ unescape('_testPrintShowingDecimalPlaces'),
|
|
401
452
|
smalltalk.method({
|
402
453
|
selector: unescape('testPrintShowingDecimalPlaces'),
|
403
454
|
category: 'tests',
|
404
|
-
fn: function (){
|
455
|
+
fn: function () {
|
405
456
|
var self=this;
|
406
457
|
smalltalk.send(self, "_assert_equals_", ["23.00", smalltalk.send((23), "_printShowingDecimalPlaces_", [(2)])]);
|
407
458
|
smalltalk.send(self, "_assert_equals_", ["23.57", smalltalk.send((23.5698), "_printShowingDecimalPlaces_", [(2)])]);
|
@@ -429,7 +480,7 @@ unescape('_testEquality'),
|
|
429
480
|
smalltalk.method({
|
430
481
|
selector: unescape('testEquality'),
|
431
482
|
category: 'tests',
|
432
|
-
fn: function (){
|
483
|
+
fn: function () {
|
433
484
|
var self=this;
|
434
485
|
smalltalk.send(self, "_assert_", [smalltalk.send((1), "__eq", [(1)])]);
|
435
486
|
smalltalk.send(self, "_assert_", [smalltalk.send((0), "__eq", [(0)])]);
|
@@ -454,7 +505,7 @@ unescape('_testArithmetic'),
|
|
454
505
|
smalltalk.method({
|
455
506
|
selector: unescape('testArithmetic'),
|
456
507
|
category: 'tests',
|
457
|
-
fn: function (){
|
508
|
+
fn: function () {
|
458
509
|
var self=this;
|
459
510
|
smalltalk.send(self, "_assert_", [smalltalk.send((1.5) + (1), "__eq", [(2.5)])]);
|
460
511
|
smalltalk.send(self, "_assert_", [smalltalk.send((2) - (1), "__eq", [(1)])]);
|
@@ -476,7 +527,7 @@ unescape('_testRounded'),
|
|
476
527
|
smalltalk.method({
|
477
528
|
selector: unescape('testRounded'),
|
478
529
|
category: 'tests',
|
479
|
-
fn: function (){
|
530
|
+
fn: function () {
|
480
531
|
var self=this;
|
481
532
|
smalltalk.send(self, "_assert_", [smalltalk.send(smalltalk.send((3), "_rounded", []), "__eq", [(3)])]);
|
482
533
|
smalltalk.send(self, "_assert_", [smalltalk.send(smalltalk.send((3.212), "_rounded", []), "__eq", [(3)])]);
|
@@ -494,7 +545,7 @@ unescape('_testNegated'),
|
|
494
545
|
smalltalk.method({
|
495
546
|
selector: unescape('testNegated'),
|
496
547
|
category: 'tests',
|
497
|
-
fn: function (){
|
548
|
+
fn: function () {
|
498
549
|
var self=this;
|
499
550
|
smalltalk.send(self, "_assert_", [smalltalk.send(smalltalk.send((3), "_negated", []), "__eq", [(-3)])]);
|
500
551
|
smalltalk.send(self, "_assert_", [smalltalk.send(smalltalk.send((-3), "_negated", []), "__eq", [(3)])]);
|
@@ -511,7 +562,7 @@ unescape('_testComparison'),
|
|
511
562
|
smalltalk.method({
|
512
563
|
selector: unescape('testComparison'),
|
513
564
|
category: 'tests',
|
514
|
-
fn: function (){
|
565
|
+
fn: function () {
|
515
566
|
var self=this;
|
516
567
|
smalltalk.send(self, "_assert_", [(3) > (2)]);
|
517
568
|
smalltalk.send(self, "_assert_", [(2) < (3)]);
|
@@ -534,7 +585,7 @@ unescape('_testTruncated'),
|
|
534
585
|
smalltalk.method({
|
535
586
|
selector: unescape('testTruncated'),
|
536
587
|
category: 'tests',
|
537
|
-
fn: function (){
|
588
|
+
fn: function () {
|
538
589
|
var self=this;
|
539
590
|
smalltalk.send(self, "_assert_", [smalltalk.send(smalltalk.send((3), "_truncated", []), "__eq", [(3)])]);
|
540
591
|
smalltalk.send(self, "_assert_", [smalltalk.send(smalltalk.send((3.212), "_truncated", []), "__eq", [(3)])]);
|
@@ -552,7 +603,7 @@ unescape('_testCopying'),
|
|
552
603
|
smalltalk.method({
|
553
604
|
selector: unescape('testCopying'),
|
554
605
|
category: 'tests',
|
555
|
-
fn: function (){
|
606
|
+
fn: function () {
|
556
607
|
var self=this;
|
557
608
|
smalltalk.send(self, "_assert_", [smalltalk.send(smalltalk.send((1), "_copy", []), "__eq_eq", [(1)])]);
|
558
609
|
smalltalk.send(self, "_assert_", [smalltalk.send(smalltalk.send((1), "_deepCopy", []), "__eq_eq", [(1)])]);
|
@@ -569,7 +620,7 @@ unescape('_testMinMax'),
|
|
569
620
|
smalltalk.method({
|
570
621
|
selector: unescape('testMinMax'),
|
571
622
|
category: 'tests',
|
572
|
-
fn: function (){
|
623
|
+
fn: function () {
|
573
624
|
var self=this;
|
574
625
|
smalltalk.send(self, "_assert_equals_", [smalltalk.send((2), "_max_", [(5)]), (5)]);
|
575
626
|
smalltalk.send(self, "_assert_equals_", [smalltalk.send((2), "_min_", [(5)]), (2)]);
|
@@ -586,7 +637,7 @@ unescape('_testIdentity'),
|
|
586
637
|
smalltalk.method({
|
587
638
|
selector: unescape('testIdentity'),
|
588
639
|
category: 'tests',
|
589
|
-
fn: function (){
|
640
|
+
fn: function () {
|
590
641
|
var self=this;
|
591
642
|
smalltalk.send(self, "_assert_", [smalltalk.send((1), "__eq_eq", [(1)])]);
|
592
643
|
smalltalk.send(self, "_assert_", [smalltalk.send((0), "__eq_eq", [(0)])]);
|
@@ -608,7 +659,7 @@ unescape('_testSqrt'),
|
|
608
659
|
smalltalk.method({
|
609
660
|
selector: unescape('testSqrt'),
|
610
661
|
category: 'tests',
|
611
|
-
fn: function (){
|
662
|
+
fn: function () {
|
612
663
|
var self=this;
|
613
664
|
smalltalk.send(self, "_assert_", [smalltalk.send(smalltalk.send((4), "_sqrt", []), "__eq", [(2)])]);
|
614
665
|
smalltalk.send(self, "_assert_", [smalltalk.send(smalltalk.send((16), "_sqrt", []), "__eq", [(4)])]);
|
@@ -625,7 +676,7 @@ unescape('_testSquared'),
|
|
625
676
|
smalltalk.method({
|
626
677
|
selector: unescape('testSquared'),
|
627
678
|
category: 'tests',
|
628
|
-
fn: function (){
|
679
|
+
fn: function () {
|
629
680
|
var self=this;
|
630
681
|
smalltalk.send(self, "_assert_", [smalltalk.send(smalltalk.send((4), "_squared", []), "__eq", [(16)])]);
|
631
682
|
return self;},
|
@@ -641,7 +692,7 @@ unescape('_testTimesRepeat'),
|
|
641
692
|
smalltalk.method({
|
642
693
|
selector: unescape('testTimesRepeat'),
|
643
694
|
category: 'tests',
|
644
|
-
fn: function (){
|
695
|
+
fn: function () {
|
645
696
|
var self=this;
|
646
697
|
var i=nil;
|
647
698
|
(i=(0));
|
@@ -662,7 +713,7 @@ unescape('_testTo'),
|
|
662
713
|
smalltalk.method({
|
663
714
|
selector: unescape('testTo'),
|
664
715
|
category: 'tests',
|
665
|
-
fn: function (){
|
716
|
+
fn: function () {
|
666
717
|
var self=this;
|
667
718
|
smalltalk.send(self, "_assert_equals_", [smalltalk.send((1), "_to_", [(5)]), [(1), (2), (3), (4), (5)]]);
|
668
719
|
return self;},
|
@@ -678,7 +729,7 @@ unescape('_testToBy'),
|
|
678
729
|
smalltalk.method({
|
679
730
|
selector: unescape('testToBy'),
|
680
731
|
category: 'tests',
|
681
|
-
fn: function (){
|
732
|
+
fn: function () {
|
682
733
|
var self=this;
|
683
734
|
smalltalk.send(self, "_assert_equals_", [smalltalk.send((0), "_to_by_", [(6), (2)]), [(0), (2), (4), (6)]]);
|
684
735
|
smalltalk.send(self, "_should_raise_", [(function(){return smalltalk.send((1), "_to_by_", [(4), (0)]);}), (smalltalk.Error || Error)]);
|
@@ -698,7 +749,7 @@ unescape('_jsObject'),
|
|
698
749
|
smalltalk.method({
|
699
750
|
selector: unescape('jsObject'),
|
700
751
|
category: 'accessing',
|
701
|
-
fn: function (){
|
752
|
+
fn: function () {
|
702
753
|
var self=this;
|
703
754
|
return jsObject = {a: 1, b: function() {return 2;}, c: function(object) {return object;}};
|
704
755
|
return self;},
|
@@ -714,7 +765,7 @@ unescape('_testMethodWithArguments'),
|
|
714
765
|
smalltalk.method({
|
715
766
|
selector: unescape('testMethodWithArguments'),
|
716
767
|
category: 'tests',
|
717
|
-
fn: function (){
|
768
|
+
fn: function () {
|
718
769
|
var self=this;
|
719
770
|
smalltalk.send(self, "_deny_", [smalltalk.send(smalltalk.send("body", "_asJQuery", []), "_hasClass_", ["amber"])]);
|
720
771
|
smalltalk.send(smalltalk.send("body", "_asJQuery", []), "_addClass_", ["amber"]);
|
@@ -734,7 +785,7 @@ unescape('_testYourself'),
|
|
734
785
|
smalltalk.method({
|
735
786
|
selector: unescape('testYourself'),
|
736
787
|
category: 'tests',
|
737
|
-
fn: function (){
|
788
|
+
fn: function () {
|
738
789
|
var self=this;
|
739
790
|
var body=nil;
|
740
791
|
(body=(function($rec){smalltalk.send($rec, "_addClass_", ["amber"]);return smalltalk.send($rec, "_yourself", []);})(smalltalk.send("body", "_asJQuery", [])));
|
@@ -754,7 +805,7 @@ unescape('_testPropertyThatReturnsEmptyString'),
|
|
754
805
|
smalltalk.method({
|
755
806
|
selector: unescape('testPropertyThatReturnsEmptyString'),
|
756
807
|
category: 'tests',
|
757
|
-
fn: function (){
|
808
|
+
fn: function () {
|
758
809
|
var self=this;
|
759
810
|
document.location.hash = '';
|
760
811
|
smalltalk.send(self, "_assert_equals_", ["", smalltalk.send(smalltalk.send((typeof document == 'undefined' ? nil : document), "_location", []), "_hash", [])]);
|
@@ -773,7 +824,7 @@ unescape('_testDNU'),
|
|
773
824
|
smalltalk.method({
|
774
825
|
selector: unescape('testDNU'),
|
775
826
|
category: 'tests',
|
776
|
-
fn: function (){
|
827
|
+
fn: function () {
|
777
828
|
var self=this;
|
778
829
|
smalltalk.send(self, "_should_raise_", [(function(){return smalltalk.send(smalltalk.send(self, "_jsObject", []), "_foo", []);}), (smalltalk.MessageNotUnderstood || MessageNotUnderstood)]);
|
779
830
|
return self;},
|
@@ -789,7 +840,7 @@ unescape('_testMessageSend'),
|
|
789
840
|
smalltalk.method({
|
790
841
|
selector: unescape('testMessageSend'),
|
791
842
|
category: 'tests',
|
792
|
-
fn: function (){
|
843
|
+
fn: function () {
|
793
844
|
var self=this;
|
794
845
|
smalltalk.send(self, "_assert_equals_", [smalltalk.send(smalltalk.send(self, "_jsObject", []), "_a", []), (1)]);
|
795
846
|
smalltalk.send(self, "_assert_equals_", [smalltalk.send(smalltalk.send(self, "_jsObject", []), "_b", []), (2)]);
|
@@ -807,7 +858,7 @@ unescape('_testPrinting'),
|
|
807
858
|
smalltalk.method({
|
808
859
|
selector: unescape('testPrinting'),
|
809
860
|
category: 'tests',
|
810
|
-
fn: function (){
|
861
|
+
fn: function () {
|
811
862
|
var self=this;
|
812
863
|
smalltalk.send(self, "_assert_", [smalltalk.send(smalltalk.send(smalltalk.send(self, "_jsObject", []), "_printString", []), "__eq", [unescape("%5Bobject%20Object%5D")])]);
|
813
864
|
return self;},
|
@@ -826,7 +877,7 @@ unescape('_setUp'),
|
|
826
877
|
smalltalk.method({
|
827
878
|
selector: unescape('setUp'),
|
828
879
|
category: 'running',
|
829
|
-
fn: function (){
|
880
|
+
fn: function () {
|
830
881
|
var self=this;
|
831
882
|
(self['@backUpCommitPathJs']=smalltalk.send((smalltalk.Package || Package), "_defaultCommitPathJs", []));
|
832
883
|
(self['@backUpCommitPathSt']=smalltalk.send((smalltalk.Package || Package), "_defaultCommitPathSt", []));
|
@@ -846,7 +897,7 @@ unescape('_tearDown'),
|
|
846
897
|
smalltalk.method({
|
847
898
|
selector: unescape('tearDown'),
|
848
899
|
category: 'running',
|
849
|
-
fn: function (){
|
900
|
+
fn: function () {
|
850
901
|
var self=this;
|
851
902
|
(function($rec){smalltalk.send($rec, "_defaultCommitPathJs_", [self['@backUpCommitPathJs']]);return smalltalk.send($rec, "_defaultCommitPathSt_", [self['@backUpCommitPathSt']]);})((smalltalk.Package || Package));
|
852
903
|
return self;},
|
@@ -862,7 +913,7 @@ unescape('_testGrulCommitPathStShouldBeGrulSt'),
|
|
862
913
|
smalltalk.method({
|
863
914
|
selector: unescape('testGrulCommitPathStShouldBeGrulSt'),
|
864
915
|
category: 'tests',
|
865
|
-
fn: function (){
|
916
|
+
fn: function () {
|
866
917
|
var self=this;
|
867
918
|
smalltalk.send(self, "_assert_equals_", [unescape("grul/st"), smalltalk.send(self['@grulPackage'], "_commitPathSt", [])]);
|
868
919
|
return self;},
|
@@ -878,7 +929,7 @@ unescape('_testZorkCommitPathStShouldBeSt'),
|
|
878
929
|
smalltalk.method({
|
879
930
|
selector: unescape('testZorkCommitPathStShouldBeSt'),
|
880
931
|
category: 'tests',
|
881
|
-
fn: function (){
|
932
|
+
fn: function () {
|
882
933
|
var self=this;
|
883
934
|
smalltalk.send(self, "_assert_equals_", ["st", smalltalk.send(self['@zorkPackage'], "_commitPathSt", [])]);
|
884
935
|
return self;},
|
@@ -894,7 +945,7 @@ unescape('_testZorkCommitPathJsShouldBeJs'),
|
|
894
945
|
smalltalk.method({
|
895
946
|
selector: unescape('testZorkCommitPathJsShouldBeJs'),
|
896
947
|
category: 'tests',
|
897
|
-
fn: function (){
|
948
|
+
fn: function () {
|
898
949
|
var self=this;
|
899
950
|
smalltalk.send(self, "_assert_equals_", ["js", smalltalk.send(self['@zorkPackage'], "_commitPathJs", [])]);
|
900
951
|
return self;},
|
@@ -910,7 +961,7 @@ unescape('_testGrulCommitPathJsShouldBeServerGrulJs'),
|
|
910
961
|
smalltalk.method({
|
911
962
|
selector: unescape('testGrulCommitPathJsShouldBeServerGrulJs'),
|
912
963
|
category: 'tests',
|
913
|
-
fn: function (){
|
964
|
+
fn: function () {
|
914
965
|
var self=this;
|
915
966
|
smalltalk.send(self, "_assert_equals_", [unescape("server/grul/js"), smalltalk.send(self['@grulPackage'], "_commitPathJs", [])]);
|
916
967
|
return self;},
|
@@ -923,113 +974,13 @@ smalltalk.PackageTest);
|
|
923
974
|
|
924
975
|
|
925
976
|
|
926
|
-
smalltalk.addClass('PackageWithDefaultCommitPathChangedTest', smalltalk.PackageTest, [], 'Kernel-Tests');
|
927
|
-
smalltalk.addMethod(
|
928
|
-
unescape('_setUp'),
|
929
|
-
smalltalk.method({
|
930
|
-
selector: unescape('setUp'),
|
931
|
-
category: 'running',
|
932
|
-
fn: function (){
|
933
|
-
var self=this;
|
934
|
-
smalltalk.send(self, "_setUp", [], smalltalk.PackageTest);
|
935
|
-
(function($rec){smalltalk.send($rec, "_defaultCommitPathJs_", [unescape("javascripts/")]);return smalltalk.send($rec, "_defaultCommitPathSt_", [unescape("smalltalk/")]);})((smalltalk.Package || Package));
|
936
|
-
return self;},
|
937
|
-
args: [],
|
938
|
-
source: unescape('setUp%0A%09super%20setUp.%0A%0A%09Package%0A%09%09defaultCommitPathJs%3A%20%27javascripts/%27%3B%0A%09%09defaultCommitPathSt%3A%20%27smalltalk/%27.'),
|
939
|
-
messageSends: ["setUp", "defaultCommitPathJs:", "defaultCommitPathSt:"],
|
940
|
-
referencedClasses: ["Package"]
|
941
|
-
}),
|
942
|
-
smalltalk.PackageWithDefaultCommitPathChangedTest);
|
943
|
-
|
944
|
-
smalltalk.addMethod(
|
945
|
-
unescape('_testGrulCommitPathJsShouldBeServerGrulJs'),
|
946
|
-
smalltalk.method({
|
947
|
-
selector: unescape('testGrulCommitPathJsShouldBeServerGrulJs'),
|
948
|
-
category: 'tests',
|
949
|
-
fn: function (){
|
950
|
-
var self=this;
|
951
|
-
smalltalk.send(self, "_assert_equals_", [unescape("server/grul/js"), smalltalk.send(self['@grulPackage'], "_commitPathJs", [])]);
|
952
|
-
return self;},
|
953
|
-
args: [],
|
954
|
-
source: unescape('testGrulCommitPathJsShouldBeServerGrulJs%0A%09self%20assert%3A%20%27server/grul/js%27%20equals%3A%20grulPackage%20commitPathJs'),
|
955
|
-
messageSends: ["assert:equals:", "commitPathJs"],
|
956
|
-
referencedClasses: []
|
957
|
-
}),
|
958
|
-
smalltalk.PackageWithDefaultCommitPathChangedTest);
|
959
|
-
|
960
|
-
smalltalk.addMethod(
|
961
|
-
unescape('_testGrulCommitPathStShouldBeGrulSt'),
|
962
|
-
smalltalk.method({
|
963
|
-
selector: unescape('testGrulCommitPathStShouldBeGrulSt'),
|
964
|
-
category: 'tests',
|
965
|
-
fn: function (){
|
966
|
-
var self=this;
|
967
|
-
smalltalk.send(self, "_assert_equals_", [unescape("grul/st"), smalltalk.send(self['@grulPackage'], "_commitPathSt", [])]);
|
968
|
-
return self;},
|
969
|
-
args: [],
|
970
|
-
source: unescape('testGrulCommitPathStShouldBeGrulSt%0A%09self%20assert%3A%20%27grul/st%27%20equals%3A%20grulPackage%20commitPathSt'),
|
971
|
-
messageSends: ["assert:equals:", "commitPathSt"],
|
972
|
-
referencedClasses: []
|
973
|
-
}),
|
974
|
-
smalltalk.PackageWithDefaultCommitPathChangedTest);
|
975
|
-
|
976
|
-
smalltalk.addMethod(
|
977
|
-
unescape('_testZorkCommitPathJsShouldBeJavascript'),
|
978
|
-
smalltalk.method({
|
979
|
-
selector: unescape('testZorkCommitPathJsShouldBeJavascript'),
|
980
|
-
category: 'tests',
|
981
|
-
fn: function (){
|
982
|
-
var self=this;
|
983
|
-
smalltalk.send(self, "_assert_equals_", [unescape("javascripts/"), smalltalk.send(self['@zorkPackage'], "_commitPathJs", [])]);
|
984
|
-
return self;},
|
985
|
-
args: [],
|
986
|
-
source: unescape('testZorkCommitPathJsShouldBeJavascript%0A%09self%20assert%3A%20%27javascripts/%27%20equals%3A%20zorkPackage%20commitPathJs'),
|
987
|
-
messageSends: ["assert:equals:", "commitPathJs"],
|
988
|
-
referencedClasses: []
|
989
|
-
}),
|
990
|
-
smalltalk.PackageWithDefaultCommitPathChangedTest);
|
991
|
-
|
992
|
-
smalltalk.addMethod(
|
993
|
-
unescape('_testZorkCommitPathStShouldBeSmalltalk'),
|
994
|
-
smalltalk.method({
|
995
|
-
selector: unescape('testZorkCommitPathStShouldBeSmalltalk'),
|
996
|
-
category: 'tests',
|
997
|
-
fn: function (){
|
998
|
-
var self=this;
|
999
|
-
smalltalk.send(self, "_assert_equals_", [unescape("smalltalk/"), smalltalk.send(self['@zorkPackage'], "_commitPathSt", [])]);
|
1000
|
-
return self;},
|
1001
|
-
args: [],
|
1002
|
-
source: unescape('testZorkCommitPathStShouldBeSmalltalk%0A%09self%20assert%3A%20%27smalltalk/%27%20equals%3A%20zorkPackage%20commitPathSt'),
|
1003
|
-
messageSends: ["assert:equals:", "commitPathSt"],
|
1004
|
-
referencedClasses: []
|
1005
|
-
}),
|
1006
|
-
smalltalk.PackageWithDefaultCommitPathChangedTest);
|
1007
|
-
|
1008
|
-
|
1009
|
-
smalltalk.addMethod(
|
1010
|
-
unescape('_shouldInheritSelectors'),
|
1011
|
-
smalltalk.method({
|
1012
|
-
selector: unescape('shouldInheritSelectors'),
|
1013
|
-
category: 'accessing',
|
1014
|
-
fn: function (){
|
1015
|
-
var self=this;
|
1016
|
-
return false;
|
1017
|
-
return self;},
|
1018
|
-
args: [],
|
1019
|
-
source: unescape('shouldInheritSelectors%0A%09%5E%20false'),
|
1020
|
-
messageSends: [],
|
1021
|
-
referencedClasses: []
|
1022
|
-
}),
|
1023
|
-
smalltalk.PackageWithDefaultCommitPathChangedTest.klass);
|
1024
|
-
|
1025
|
-
|
1026
977
|
smalltalk.addClass('BlockClosureTest', smalltalk.TestCase, [], 'Kernel-Tests');
|
1027
978
|
smalltalk.addMethod(
|
1028
979
|
unescape('_testValue'),
|
1029
980
|
smalltalk.method({
|
1030
981
|
selector: unescape('testValue'),
|
1031
982
|
category: 'tests',
|
1032
|
-
fn: function (){
|
983
|
+
fn: function () {
|
1033
984
|
var self=this;
|
1034
985
|
smalltalk.send(self, "_assert_equals_", [smalltalk.send((function(){return (1) + (1);}), "_value", []), (2)]);
|
1035
986
|
smalltalk.send(self, "_assert_equals_", [smalltalk.send((function(x){return ((($receiver = x).klass === smalltalk.Number) ? $receiver +(1) : smalltalk.send($receiver, "__plus", [(1)]));}), "_value_", [(2)]), (3)]);
|
@@ -1048,7 +999,7 @@ unescape('_testOnDo'),
|
|
1048
999
|
smalltalk.method({
|
1049
1000
|
selector: unescape('testOnDo'),
|
1050
1001
|
category: 'tests',
|
1051
|
-
fn: function (){
|
1002
|
+
fn: function () {
|
1052
1003
|
var self=this;
|
1053
1004
|
smalltalk.send(self, "_assert_", [smalltalk.send((function(){return smalltalk.send(smalltalk.send((smalltalk.Error || Error), "_new", []), "_signal", []);}), "_on_do_", [(smalltalk.Error || Error), (function(ex){return true;})])]);
|
1054
1005
|
return self;},
|
@@ -1064,7 +1015,7 @@ unescape('_testEnsure'),
|
|
1064
1015
|
smalltalk.method({
|
1065
1016
|
selector: unescape('testEnsure'),
|
1066
1017
|
category: 'tests',
|
1067
|
-
fn: function (){
|
1018
|
+
fn: function () {
|
1068
1019
|
var self=this;
|
1069
1020
|
smalltalk.send(self, "_assert_", [smalltalk.send((function(){return smalltalk.send((smalltalk.Error || Error), "_new", []);}), "_ensure_", [(function(){return true;})])]);
|
1070
1021
|
return self;},
|
@@ -1080,7 +1031,7 @@ unescape('_testNumArgs'),
|
|
1080
1031
|
smalltalk.method({
|
1081
1032
|
selector: unescape('testNumArgs'),
|
1082
1033
|
category: 'tests',
|
1083
|
-
fn: function (){
|
1034
|
+
fn: function () {
|
1084
1035
|
var self=this;
|
1085
1036
|
smalltalk.send(self, "_assert_equals_", [smalltalk.send((function(){return nil;}), "_numArgs", []), (0)]);
|
1086
1037
|
smalltalk.send(self, "_assert_equals_", [smalltalk.send((function(a, b){return nil;}), "_numArgs", []), (2)]);
|
@@ -1097,7 +1048,7 @@ unescape('_testValueWithPossibleArguments'),
|
|
1097
1048
|
smalltalk.method({
|
1098
1049
|
selector: unescape('testValueWithPossibleArguments'),
|
1099
1050
|
category: 'tests',
|
1100
|
-
fn: function (){
|
1051
|
+
fn: function () {
|
1101
1052
|
var self=this;
|
1102
1053
|
smalltalk.send(self, "_assert_equals_", [smalltalk.send((function(){return (1);}), "_valueWithPossibleArguments_", [[(3), (4)]]), (1)]);
|
1103
1054
|
smalltalk.send(self, "_assert_equals_", [smalltalk.send((function(a){return ((($receiver = a).klass === smalltalk.Number) ? $receiver +(4) : smalltalk.send($receiver, "__plus", [(4)]));}), "_valueWithPossibleArguments_", [[(3), (4)]]), (7)]);
|
@@ -1115,7 +1066,7 @@ unescape('_testWhileTrue'),
|
|
1115
1066
|
smalltalk.method({
|
1116
1067
|
selector: unescape('testWhileTrue'),
|
1117
1068
|
category: 'tests',
|
1118
|
-
fn: function (){
|
1069
|
+
fn: function () {
|
1119
1070
|
var self=this;
|
1120
1071
|
var i=nil;
|
1121
1072
|
(i=(0));
|
@@ -1137,7 +1088,7 @@ unescape('_testWhileFalse'),
|
|
1137
1088
|
smalltalk.method({
|
1138
1089
|
selector: unescape('testWhileFalse'),
|
1139
1090
|
category: 'tests',
|
1140
|
-
fn: function (){
|
1091
|
+
fn: function () {
|
1141
1092
|
var self=this;
|
1142
1093
|
var i=nil;
|
1143
1094
|
(i=(0));
|
@@ -1159,7 +1110,7 @@ unescape('_testCompiledSource'),
|
|
1159
1110
|
smalltalk.method({
|
1160
1111
|
selector: unescape('testCompiledSource'),
|
1161
1112
|
category: 'tests',
|
1162
|
-
fn: function (){
|
1113
|
+
fn: function () {
|
1163
1114
|
var self=this;
|
1164
1115
|
smalltalk.send(self, "_assert_", [smalltalk.send(smalltalk.send((function(){return (1) + (1);}), "_compiledSource", []), "_includesSubString_", ["function"])]);
|
1165
1116
|
return self;},
|
@@ -1178,7 +1129,7 @@ unescape('_testEquality'),
|
|
1178
1129
|
smalltalk.method({
|
1179
1130
|
selector: unescape('testEquality'),
|
1180
1131
|
category: 'tests',
|
1181
|
-
fn: function (){
|
1132
|
+
fn: function () {
|
1182
1133
|
var self=this;
|
1183
1134
|
var o=nil;
|
1184
1135
|
(o=smalltalk.send((smalltalk.Object || Object), "_new", []));
|
@@ -1199,7 +1150,7 @@ unescape('_testIdentity'),
|
|
1199
1150
|
smalltalk.method({
|
1200
1151
|
selector: unescape('testIdentity'),
|
1201
1152
|
category: 'tests',
|
1202
|
-
fn: function (){
|
1153
|
+
fn: function () {
|
1203
1154
|
var self=this;
|
1204
1155
|
var o=nil;
|
1205
1156
|
(o=smalltalk.send((smalltalk.Object || Object), "_new", []));
|
@@ -1218,7 +1169,7 @@ unescape('_testHalt'),
|
|
1218
1169
|
smalltalk.method({
|
1219
1170
|
selector: unescape('testHalt'),
|
1220
1171
|
category: 'tests',
|
1221
|
-
fn: function (){
|
1172
|
+
fn: function () {
|
1222
1173
|
var self=this;
|
1223
1174
|
smalltalk.send(self, "_should_raise_", [(function(){return smalltalk.send(smalltalk.send((smalltalk.Object || Object), "_new", []), "_halt", []);}), (smalltalk.Error || Error)]);
|
1224
1175
|
return self;},
|
@@ -1234,7 +1185,7 @@ unescape('_testBasicAccess'),
|
|
1234
1185
|
smalltalk.method({
|
1235
1186
|
selector: unescape('testBasicAccess'),
|
1236
1187
|
category: 'tests',
|
1237
|
-
fn: function (){
|
1188
|
+
fn: function () {
|
1238
1189
|
var self=this;
|
1239
1190
|
var o=nil;
|
1240
1191
|
(o=smalltalk.send((smalltalk.Object || Object), "_new", []));
|
@@ -1254,7 +1205,7 @@ unescape('_testNilUndefined'),
|
|
1254
1205
|
smalltalk.method({
|
1255
1206
|
selector: unescape('testNilUndefined'),
|
1256
1207
|
category: 'tests',
|
1257
|
-
fn: function (){
|
1208
|
+
fn: function () {
|
1258
1209
|
var self=this;
|
1259
1210
|
smalltalk.send(self, "_assert_", [smalltalk.send(nil, "__eq", [(typeof undefined == 'undefined' ? nil : undefined)])]);
|
1260
1211
|
return self;},
|
@@ -1270,7 +1221,7 @@ unescape('_testidentityHash'),
|
|
1270
1221
|
smalltalk.method({
|
1271
1222
|
selector: unescape('testidentityHash'),
|
1272
1223
|
category: 'tests',
|
1273
|
-
fn: function (){
|
1224
|
+
fn: function () {
|
1274
1225
|
var self=this;
|
1275
1226
|
var o1=nil;
|
1276
1227
|
var o2=nil;
|
@@ -1291,7 +1242,7 @@ unescape('_testBasicPerform'),
|
|
1291
1242
|
smalltalk.method({
|
1292
1243
|
selector: unescape('testBasicPerform'),
|
1293
1244
|
category: 'tests',
|
1294
|
-
fn: function (){
|
1245
|
+
fn: function () {
|
1295
1246
|
var self=this;
|
1296
1247
|
var o=nil;
|
1297
1248
|
(o=smalltalk.send((smalltalk.Object || Object), "_new", []));
|
@@ -1312,7 +1263,7 @@ unescape('_testIfNil'),
|
|
1312
1263
|
smalltalk.method({
|
1313
1264
|
selector: unescape('testIfNil'),
|
1314
1265
|
category: 'tests',
|
1315
|
-
fn: function (){
|
1266
|
+
fn: function () {
|
1316
1267
|
var self=this;
|
1317
1268
|
smalltalk.send(self, "_deny_", [smalltalk.send(smalltalk.send((smalltalk.Object || Object), "_new", []), "_isNil", [])]);
|
1318
1269
|
smalltalk.send(self, "_deny_", [smalltalk.send((($receiver = smalltalk.send((smalltalk.Object || Object), "_new", [])) == nil || $receiver == undefined) ? (function(){return true;})() : $receiver, "__eq", [true])]);
|
@@ -1332,7 +1283,7 @@ unescape('_testInstVars'),
|
|
1332
1283
|
smalltalk.method({
|
1333
1284
|
selector: unescape('testInstVars'),
|
1334
1285
|
category: 'tests',
|
1335
|
-
fn: function (){
|
1286
|
+
fn: function () {
|
1336
1287
|
var self=this;
|
1337
1288
|
var o=nil;
|
1338
1289
|
(o=smalltalk.send((smalltalk.ObjectMock || ObjectMock), "_new", []));
|
@@ -1353,7 +1304,7 @@ unescape('_testYourself'),
|
|
1353
1304
|
smalltalk.method({
|
1354
1305
|
selector: unescape('testYourself'),
|
1355
1306
|
category: 'tests',
|
1356
|
-
fn: function (){
|
1307
|
+
fn: function () {
|
1357
1308
|
var self=this;
|
1358
1309
|
var o=nil;
|
1359
1310
|
(o=smalltalk.send((smalltalk.ObjectMock || ObjectMock), "_new", []));
|
@@ -1371,7 +1322,7 @@ unescape('_testDNU'),
|
|
1371
1322
|
smalltalk.method({
|
1372
1323
|
selector: unescape('testDNU'),
|
1373
1324
|
category: 'tests',
|
1374
|
-
fn: function (){
|
1325
|
+
fn: function () {
|
1375
1326
|
var self=this;
|
1376
1327
|
smalltalk.send(self, "_should_raise_", [(function(){return smalltalk.send(smalltalk.send((smalltalk.Object || Object), "_new", []), "_foo", []);}), (smalltalk.MessageNotUnderstood || MessageNotUnderstood)]);
|
1377
1328
|
return self;},
|
@@ -1390,7 +1341,7 @@ unescape('_testEquality'),
|
|
1390
1341
|
smalltalk.method({
|
1391
1342
|
selector: unescape('testEquality'),
|
1392
1343
|
category: 'tests',
|
1393
|
-
fn: function (){
|
1344
|
+
fn: function () {
|
1394
1345
|
var self=this;
|
1395
1346
|
smalltalk.send(self, "_assert_", [smalltalk.send(smalltalk.symbolFor("hello"), "__eq", [smalltalk.symbolFor("hello")])]);
|
1396
1347
|
smalltalk.send(self, "_deny_", [smalltalk.send(smalltalk.symbolFor("hello"), "__eq", [smalltalk.symbolFor("world")])]);
|
@@ -1411,7 +1362,7 @@ unescape('_testAt'),
|
|
1411
1362
|
smalltalk.method({
|
1412
1363
|
selector: unescape('testAt'),
|
1413
1364
|
category: 'tests',
|
1414
|
-
fn: function (){
|
1365
|
+
fn: function () {
|
1415
1366
|
var self=this;
|
1416
1367
|
smalltalk.send(self, "_assert_", [smalltalk.send(smalltalk.send(smalltalk.symbolFor("hello"), "_at_", [(1)]), "__eq", ["h"])]);
|
1417
1368
|
smalltalk.send(self, "_assert_", [smalltalk.send(smalltalk.send(smalltalk.symbolFor("hello"), "_at_", [(5)]), "__eq", ["o"])]);
|
@@ -1429,7 +1380,7 @@ unescape('_testAtPut'),
|
|
1429
1380
|
smalltalk.method({
|
1430
1381
|
selector: unescape('testAtPut'),
|
1431
1382
|
category: 'tests',
|
1432
|
-
fn: function (){
|
1383
|
+
fn: function () {
|
1433
1384
|
var self=this;
|
1434
1385
|
smalltalk.send(self, "_should_raise_", [(function(){return smalltalk.send("hello", "_at_put_", [(1), "a"]);}), (smalltalk.Error || Error)]);
|
1435
1386
|
return self;},
|
@@ -1445,7 +1396,7 @@ unescape('_testIdentity'),
|
|
1445
1396
|
smalltalk.method({
|
1446
1397
|
selector: unescape('testIdentity'),
|
1447
1398
|
category: 'tests',
|
1448
|
-
fn: function (){
|
1399
|
+
fn: function () {
|
1449
1400
|
var self=this;
|
1450
1401
|
smalltalk.send(self, "_assert_", [smalltalk.send(smalltalk.symbolFor("hello"), "__eq_eq", [smalltalk.symbolFor("hello")])]);
|
1451
1402
|
smalltalk.send(self, "_deny_", [smalltalk.send(smalltalk.symbolFor("hello"), "__eq_eq", [smalltalk.symbolFor("world")])]);
|
@@ -1464,7 +1415,7 @@ unescape('_testComparing'),
|
|
1464
1415
|
smalltalk.method({
|
1465
1416
|
selector: unescape('testComparing'),
|
1466
1417
|
category: 'tests',
|
1467
|
-
fn: function (){
|
1418
|
+
fn: function () {
|
1468
1419
|
var self=this;
|
1469
1420
|
smalltalk.send(self, "_assert_", [((($receiver = smalltalk.symbolFor("ab")).klass === smalltalk.Number) ? $receiver >smalltalk.symbolFor("aa") : smalltalk.send($receiver, "__gt", [smalltalk.symbolFor("aa")]))]);
|
1470
1421
|
smalltalk.send(self, "_deny_", [((($receiver = smalltalk.symbolFor("ab")).klass === smalltalk.Number) ? $receiver >smalltalk.symbolFor("ba") : smalltalk.send($receiver, "__gt", [smalltalk.symbolFor("ba")]))]);
|
@@ -1487,7 +1438,7 @@ unescape('_testSize'),
|
|
1487
1438
|
smalltalk.method({
|
1488
1439
|
selector: unescape('testSize'),
|
1489
1440
|
category: 'tests',
|
1490
|
-
fn: function (){
|
1441
|
+
fn: function () {
|
1491
1442
|
var self=this;
|
1492
1443
|
smalltalk.send(self, "_assert_equals_", [smalltalk.send(smalltalk.symbolFor("a"), "_size", []), (1)]);
|
1493
1444
|
smalltalk.send(self, "_assert_equals_", [smalltalk.send(smalltalk.symbolFor("aaaaa"), "_size", []), (5)]);
|
@@ -1504,7 +1455,7 @@ unescape('_testAsString'),
|
|
1504
1455
|
smalltalk.method({
|
1505
1456
|
selector: unescape('testAsString'),
|
1506
1457
|
category: 'tests',
|
1507
|
-
fn: function (){
|
1458
|
+
fn: function () {
|
1508
1459
|
var self=this;
|
1509
1460
|
smalltalk.send(self, "_assert_equals_", [smalltalk.send(smalltalk.symbolFor("hello"), "_asString", []), "hello"]);
|
1510
1461
|
return self;},
|
@@ -1520,7 +1471,7 @@ unescape('_testAsSymbol'),
|
|
1520
1471
|
smalltalk.method({
|
1521
1472
|
selector: unescape('testAsSymbol'),
|
1522
1473
|
category: 'tests',
|
1523
|
-
fn: function (){
|
1474
|
+
fn: function () {
|
1524
1475
|
var self=this;
|
1525
1476
|
smalltalk.send(self, "_assert_", [smalltalk.send(smalltalk.symbolFor("hello"), "__eq_eq", [smalltalk.send(smalltalk.symbolFor("hello"), "_asSymbol", [])])]);
|
1526
1477
|
return self;},
|
@@ -1536,7 +1487,7 @@ unescape('_testCopying'),
|
|
1536
1487
|
smalltalk.method({
|
1537
1488
|
selector: unescape('testCopying'),
|
1538
1489
|
category: 'tests',
|
1539
|
-
fn: function (){
|
1490
|
+
fn: function () {
|
1540
1491
|
var self=this;
|
1541
1492
|
smalltalk.send(self, "_assert_", [smalltalk.send(smalltalk.send(smalltalk.symbolFor("hello"), "_copy", []), "__eq_eq", [smalltalk.symbolFor("hello")])]);
|
1542
1493
|
smalltalk.send(self, "_assert_", [smalltalk.send(smalltalk.send(smalltalk.symbolFor("hello"), "_deepCopy", []), "__eq_eq", [smalltalk.symbolFor("hello")])]);
|
@@ -1553,7 +1504,7 @@ unescape('_testIsSymbolIsString'),
|
|
1553
1504
|
smalltalk.method({
|
1554
1505
|
selector: unescape('testIsSymbolIsString'),
|
1555
1506
|
category: 'tests',
|
1556
|
-
fn: function (){
|
1507
|
+
fn: function () {
|
1557
1508
|
var self=this;
|
1558
1509
|
smalltalk.send(self, "_assert_", [smalltalk.send(smalltalk.symbolFor("hello"), "_isSymbol", [])]);
|
1559
1510
|
smalltalk.send(self, "_deny_", [smalltalk.send("hello", "_isSymbol", [])]);
|
@@ -1575,7 +1526,7 @@ unescape('_foo'),
|
|
1575
1526
|
smalltalk.method({
|
1576
1527
|
selector: unescape('foo'),
|
1577
1528
|
category: 'not yet classified',
|
1578
|
-
fn: function (){
|
1529
|
+
fn: function () {
|
1579
1530
|
var self=this;
|
1580
1531
|
return self['@foo'];
|
1581
1532
|
return self;},
|
@@ -1591,7 +1542,7 @@ unescape('_foo_'),
|
|
1591
1542
|
smalltalk.method({
|
1592
1543
|
selector: unescape('foo%3A'),
|
1593
1544
|
category: 'not yet classified',
|
1594
|
-
fn: function (anObject){
|
1545
|
+
fn: function (anObject) {
|
1595
1546
|
var self=this;
|
1596
1547
|
(self['@foo']=anObject);
|
1597
1548
|
return self;},
|
@@ -1610,7 +1561,7 @@ unescape('_testIsNil'),
|
|
1610
1561
|
smalltalk.method({
|
1611
1562
|
selector: unescape('testIsNil'),
|
1612
1563
|
category: 'tests',
|
1613
|
-
fn: function (){
|
1564
|
+
fn: function () {
|
1614
1565
|
var self=this;
|
1615
1566
|
smalltalk.send(self, "_assert_", [smalltalk.send(nil, "_isNil", [])]);
|
1616
1567
|
smalltalk.send(self, "_deny_", [smalltalk.send(nil, "_notNil", [])]);
|
@@ -1627,7 +1578,7 @@ unescape('_testIfNil'),
|
|
1627
1578
|
smalltalk.method({
|
1628
1579
|
selector: unescape('testIfNil'),
|
1629
1580
|
category: 'tests',
|
1630
|
-
fn: function (){
|
1581
|
+
fn: function () {
|
1631
1582
|
var self=this;
|
1632
1583
|
smalltalk.send(self, "_assert_equals_", [(($receiver = nil) == nil || $receiver == undefined) ? (function(){return true;})() : $receiver, true]);
|
1633
1584
|
smalltalk.send(self, "_deny_", [smalltalk.send((($receiver = nil) != nil && $receiver != undefined) ? (function(){return true;})() : nil, "__eq", [true])]);
|
@@ -1646,7 +1597,7 @@ unescape('_testCopying'),
|
|
1646
1597
|
smalltalk.method({
|
1647
1598
|
selector: unescape('testCopying'),
|
1648
1599
|
category: 'tests',
|
1649
|
-
fn: function (){
|
1600
|
+
fn: function () {
|
1650
1601
|
var self=this;
|
1651
1602
|
smalltalk.send(self, "_assert_equals_", [smalltalk.send(nil, "_copy", []), nil]);
|
1652
1603
|
return self;},
|
@@ -1662,7 +1613,7 @@ unescape('_testDeepCopy'),
|
|
1662
1613
|
smalltalk.method({
|
1663
1614
|
selector: unescape('testDeepCopy'),
|
1664
1615
|
category: 'tests',
|
1665
|
-
fn: function (){
|
1616
|
+
fn: function () {
|
1666
1617
|
var self=this;
|
1667
1618
|
smalltalk.send(self, "_assert_", [smalltalk.send(smalltalk.send(nil, "_deepCopy", []), "__eq", [nil])]);
|
1668
1619
|
return self;},
|
@@ -1681,7 +1632,7 @@ unescape('_testAccessing'),
|
|
1681
1632
|
smalltalk.method({
|
1682
1633
|
selector: unescape('testAccessing'),
|
1683
1634
|
category: 'tests',
|
1684
|
-
fn: function (){
|
1635
|
+
fn: function () {
|
1685
1636
|
var self=this;
|
1686
1637
|
smalltalk.send(self, "_assert_equals_", [smalltalk.send(smalltalk.send((smalltalk.Point || Point), "_x_y_", [(3), (4)]), "_x", []), (3)]);
|
1687
1638
|
smalltalk.send(self, "_assert_equals_", [smalltalk.send(smalltalk.send((smalltalk.Point || Point), "_x_y_", [(3), (4)]), "_y", []), (4)]);
|
@@ -1700,7 +1651,7 @@ unescape('_testAt'),
|
|
1700
1651
|
smalltalk.method({
|
1701
1652
|
selector: unescape('testAt'),
|
1702
1653
|
category: 'tests',
|
1703
|
-
fn: function (){
|
1654
|
+
fn: function () {
|
1704
1655
|
var self=this;
|
1705
1656
|
smalltalk.send(self, "_assert_equals_", [smalltalk.send((3), "__at", [(4)]), smalltalk.send((smalltalk.Point || Point), "_x_y_", [(3), (4)])]);
|
1706
1657
|
return self;},
|
@@ -1716,7 +1667,7 @@ unescape('_testEgality'),
|
|
1716
1667
|
smalltalk.method({
|
1717
1668
|
selector: unescape('testEgality'),
|
1718
1669
|
category: 'tests',
|
1719
|
-
fn: function (){
|
1670
|
+
fn: function () {
|
1720
1671
|
var self=this;
|
1721
1672
|
smalltalk.send(self, "_assert_", [smalltalk.send(smalltalk.send((3), "__at", [(4)]), "__eq", [smalltalk.send((3), "__at", [(4)])])]);
|
1722
1673
|
smalltalk.send(self, "_deny_", [smalltalk.send(smalltalk.send((3), "__at", [(5)]), "__eq", [smalltalk.send((3), "__at", [(6)])])]);
|
@@ -1733,7 +1684,7 @@ unescape('_testArithmetic'),
|
|
1733
1684
|
smalltalk.method({
|
1734
1685
|
selector: unescape('testArithmetic'),
|
1735
1686
|
category: 'tests',
|
1736
|
-
fn: function (){
|
1687
|
+
fn: function () {
|
1737
1688
|
var self=this;
|
1738
1689
|
smalltalk.send(self, "_assert_equals_", [((($receiver = smalltalk.send((3), "__at", [(4)])).klass === smalltalk.Number) ? $receiver *smalltalk.send((3), "__at", [(4)]) : smalltalk.send($receiver, "__star", [smalltalk.send((3), "__at", [(4)])])), smalltalk.send((smalltalk.Point || Point), "_x_y_", [(9), (16)])]);
|
1739
1690
|
smalltalk.send(self, "_assert_equals_", [((($receiver = smalltalk.send((3), "__at", [(4)])).klass === smalltalk.Number) ? $receiver +smalltalk.send((3), "__at", [(4)]) : smalltalk.send($receiver, "__plus", [smalltalk.send((3), "__at", [(4)])])), smalltalk.send((smalltalk.Point || Point), "_x_y_", [(6), (8)])]);
|
@@ -1747,6 +1698,25 @@ referencedClasses: ["Point"]
|
|
1747
1698
|
}),
|
1748
1699
|
smalltalk.PointTest);
|
1749
1700
|
|
1701
|
+
smalltalk.addMethod(
|
1702
|
+
unescape('_testTranslateBy'),
|
1703
|
+
smalltalk.method({
|
1704
|
+
selector: unescape('testTranslateBy'),
|
1705
|
+
category: 'tests',
|
1706
|
+
fn: function (){
|
1707
|
+
var self=this;
|
1708
|
+
smalltalk.send(self, "_assert_equals_", [smalltalk.send((3), "__at", [(4)]), smalltalk.send(smalltalk.send((3), "__at", [(3)]), "_translateBy_", [smalltalk.send((0), "__at", [(1)])])]);
|
1709
|
+
smalltalk.send(self, "_assert_equals_", [smalltalk.send((3), "__at", [(2)]), smalltalk.send(smalltalk.send((3), "__at", [(3)]), "_translateBy_", [smalltalk.send((0), "__at", [smalltalk.send((1), "_negated", [])])])]);
|
1710
|
+
smalltalk.send(self, "_assert_equals_", [smalltalk.send((5), "__at", [(6)]), smalltalk.send(smalltalk.send((3), "__at", [(3)]), "_translateBy_", [smalltalk.send((2), "__at", [(3)])])]);
|
1711
|
+
smalltalk.send(self, "_assert_equals_", [smalltalk.send((0), "__at", [(3)]), smalltalk.send(smalltalk.send((3), "__at", [(3)]), "_translateBy_", [smalltalk.send(smalltalk.send((3), "_negated", []), "__at", [(0)])])]);
|
1712
|
+
return self;},
|
1713
|
+
args: [],
|
1714
|
+
source: unescape('testTranslateBy%0A%09self%20assert%3A%203@4%20equals%3A%20%283@3%20translateBy%3A%200@1%29.%0A%09self%20assert%3A%203@2%20equals%3A%20%283@3%20translateBy%3A%200@1%20negated%29.%0A%09self%20assert%3A%205@6%20equals%3A%20%283@3%20translateBy%3A%202@3%29.%0A%09self%20assert%3A%200@3%20equals%3A%20%283@3%20translateBy%3A%203%20negated%20@0%29.'),
|
1715
|
+
messageSends: ["assert:equals:", unescape("@"), "translateBy:", "negated"],
|
1716
|
+
referencedClasses: []
|
1717
|
+
}),
|
1718
|
+
smalltalk.PointTest);
|
1719
|
+
|
1750
1720
|
|
1751
1721
|
|
1752
1722
|
smalltalk.addClass('RandomTest', smalltalk.TestCase, [], 'Kernel-Tests');
|
@@ -1755,7 +1725,7 @@ unescape('_textNext'),
|
|
1755
1725
|
smalltalk.method({
|
1756
1726
|
selector: unescape('textNext'),
|
1757
1727
|
category: 'tests',
|
1758
|
-
fn: function (){
|
1728
|
+
fn: function () {
|
1759
1729
|
var self=this;
|
1760
1730
|
smalltalk.send((10000), "_timesRepeat_", [(function(){var current=nil;
|
1761
1731
|
var next=nil;
|
@@ -1776,7 +1746,7 @@ unescape('_setUp'),
|
|
1776
1746
|
smalltalk.method({
|
1777
1747
|
selector: unescape('setUp'),
|
1778
1748
|
category: 'running',
|
1779
|
-
fn: function (){
|
1749
|
+
fn: function () {
|
1780
1750
|
var self=this;
|
1781
1751
|
(self['@builder']=smalltalk.send((smalltalk.ClassBuilder || ClassBuilder), "_new", []));
|
1782
1752
|
return self;},
|
@@ -1792,7 +1762,7 @@ unescape('_tearDown'),
|
|
1792
1762
|
smalltalk.method({
|
1793
1763
|
selector: unescape('tearDown'),
|
1794
1764
|
category: 'running',
|
1795
|
-
fn: function (){
|
1765
|
+
fn: function () {
|
1796
1766
|
var self=this;
|
1797
1767
|
(($receiver = self['@theClass']) != nil && $receiver != undefined) ? (function(){smalltalk.send(smalltalk.send((smalltalk.Smalltalk || Smalltalk), "_current", []), "_removeClass_", [self['@theClass']]);return (self['@theClass']=nil);})() : nil;
|
1798
1768
|
return self;},
|
@@ -1808,7 +1778,7 @@ unescape('_testClassCopy'),
|
|
1808
1778
|
smalltalk.method({
|
1809
1779
|
selector: unescape('testClassCopy'),
|
1810
1780
|
category: 'running',
|
1811
|
-
fn: function (){
|
1781
|
+
fn: function () {
|
1812
1782
|
var self=this;
|
1813
1783
|
(self['@theClass']=smalltalk.send(self['@builder'], "_copyClass_named_", [(smalltalk.ObjectMock || ObjectMock), "ObjectMock2"]));
|
1814
1784
|
smalltalk.send(self, "_assert_", [smalltalk.send(smalltalk.send(self['@theClass'], "_superclass", []), "__eq_eq", [smalltalk.send((smalltalk.ObjectMock || ObjectMock), "_superclass", [])])]);
|
@@ -1829,7 +1799,7 @@ unescape('_testInstanceVariableNames'),
|
|
1829
1799
|
smalltalk.method({
|
1830
1800
|
selector: unescape('testInstanceVariableNames'),
|
1831
1801
|
category: 'running',
|
1832
|
-
fn: function (){
|
1802
|
+
fn: function () {
|
1833
1803
|
var self=this;
|
1834
1804
|
smalltalk.send(self, "_assert_equals_", [smalltalk.send(self['@builder'], "_instanceVariableNamesFor_", [" hello world "]), ["hello", "world"]]);
|
1835
1805
|
return self;},
|
@@ -1848,7 +1818,7 @@ unescape('_testUnicity'),
|
|
1848
1818
|
smalltalk.method({
|
1849
1819
|
selector: unescape('testUnicity'),
|
1850
1820
|
category: 'tests',
|
1851
|
-
fn: function (){
|
1821
|
+
fn: function () {
|
1852
1822
|
var self=this;
|
1853
1823
|
var set=nil;
|
1854
1824
|
(set=smalltalk.send((smalltalk.Set || Set), "_new", []));
|
@@ -1872,7 +1842,7 @@ unescape('_testAt'),
|
|
1872
1842
|
smalltalk.method({
|
1873
1843
|
selector: unescape('testAt'),
|
1874
1844
|
category: 'tests',
|
1875
|
-
fn: function (){
|
1845
|
+
fn: function () {
|
1876
1846
|
var self=this;
|
1877
1847
|
smalltalk.send(self, "_should_raise_", [(function(){return smalltalk.send(smalltalk.send((smalltalk.Set || Set), "_new", []), "_at_put_", [(1), (2)]);}), (smalltalk.Error || Error)]);
|
1878
1848
|
return self;},
|
@@ -1888,7 +1858,7 @@ unescape('_testAddRemove'),
|
|
1888
1858
|
smalltalk.method({
|
1889
1859
|
selector: unescape('testAddRemove'),
|
1890
1860
|
category: 'tests',
|
1891
|
-
fn: function (){
|
1861
|
+
fn: function () {
|
1892
1862
|
var self=this;
|
1893
1863
|
var set=nil;
|
1894
1864
|
(set=smalltalk.send((smalltalk.Set || Set), "_new", []));
|
@@ -1912,7 +1882,7 @@ unescape('_testSize'),
|
|
1912
1882
|
smalltalk.method({
|
1913
1883
|
selector: unescape('testSize'),
|
1914
1884
|
category: 'tests',
|
1915
|
-
fn: function (){
|
1885
|
+
fn: function () {
|
1916
1886
|
var self=this;
|
1917
1887
|
smalltalk.send(self, "_assert_equals_", [smalltalk.send(smalltalk.send((smalltalk.Set || Set), "_new", []), "_size", []), (0)]);
|
1918
1888
|
smalltalk.send(self, "_assert_equals_", [smalltalk.send(smalltalk.send((smalltalk.Set || Set), "_withAll_", [[(1), (2), (3), (4)]]), "_size", []), (4)]);
|
@@ -1927,3 +1897,103 @@ smalltalk.SetTest);
|
|
1927
1897
|
|
1928
1898
|
|
1929
1899
|
|
1900
|
+
smalltalk.addClass('PackageWithDefaultCommitPathChangedTest', smalltalk.PackageTest, [], 'Kernel-Tests');
|
1901
|
+
smalltalk.addMethod(
|
1902
|
+
unescape('_setUp'),
|
1903
|
+
smalltalk.method({
|
1904
|
+
selector: unescape('setUp'),
|
1905
|
+
category: 'running',
|
1906
|
+
fn: function () {
|
1907
|
+
var self=this;
|
1908
|
+
smalltalk.send(self, "_setUp", [], smalltalk.PackageTest);
|
1909
|
+
(function($rec){smalltalk.send($rec, "_defaultCommitPathJs_", [unescape("javascripts/")]);return smalltalk.send($rec, "_defaultCommitPathSt_", [unescape("smalltalk/")]);})((smalltalk.Package || Package));
|
1910
|
+
return self;},
|
1911
|
+
args: [],
|
1912
|
+
source: unescape('setUp%0A%09super%20setUp.%0A%0A%09Package%0A%09%09defaultCommitPathJs%3A%20%27javascripts/%27%3B%0A%09%09defaultCommitPathSt%3A%20%27smalltalk/%27.'),
|
1913
|
+
messageSends: ["setUp", "defaultCommitPathJs:", "defaultCommitPathSt:"],
|
1914
|
+
referencedClasses: ["Package"]
|
1915
|
+
}),
|
1916
|
+
smalltalk.PackageWithDefaultCommitPathChangedTest);
|
1917
|
+
|
1918
|
+
smalltalk.addMethod(
|
1919
|
+
unescape('_testGrulCommitPathJsShouldBeServerGrulJs'),
|
1920
|
+
smalltalk.method({
|
1921
|
+
selector: unescape('testGrulCommitPathJsShouldBeServerGrulJs'),
|
1922
|
+
category: 'tests',
|
1923
|
+
fn: function () {
|
1924
|
+
var self=this;
|
1925
|
+
smalltalk.send(self, "_assert_equals_", [unescape("server/grul/js"), smalltalk.send(self['@grulPackage'], "_commitPathJs", [])]);
|
1926
|
+
return self;},
|
1927
|
+
args: [],
|
1928
|
+
source: unescape('testGrulCommitPathJsShouldBeServerGrulJs%0A%09self%20assert%3A%20%27server/grul/js%27%20equals%3A%20grulPackage%20commitPathJs'),
|
1929
|
+
messageSends: ["assert:equals:", "commitPathJs"],
|
1930
|
+
referencedClasses: []
|
1931
|
+
}),
|
1932
|
+
smalltalk.PackageWithDefaultCommitPathChangedTest);
|
1933
|
+
|
1934
|
+
smalltalk.addMethod(
|
1935
|
+
unescape('_testGrulCommitPathStShouldBeGrulSt'),
|
1936
|
+
smalltalk.method({
|
1937
|
+
selector: unescape('testGrulCommitPathStShouldBeGrulSt'),
|
1938
|
+
category: 'tests',
|
1939
|
+
fn: function () {
|
1940
|
+
var self=this;
|
1941
|
+
smalltalk.send(self, "_assert_equals_", [unescape("grul/st"), smalltalk.send(self['@grulPackage'], "_commitPathSt", [])]);
|
1942
|
+
return self;},
|
1943
|
+
args: [],
|
1944
|
+
source: unescape('testGrulCommitPathStShouldBeGrulSt%0A%09self%20assert%3A%20%27grul/st%27%20equals%3A%20grulPackage%20commitPathSt'),
|
1945
|
+
messageSends: ["assert:equals:", "commitPathSt"],
|
1946
|
+
referencedClasses: []
|
1947
|
+
}),
|
1948
|
+
smalltalk.PackageWithDefaultCommitPathChangedTest);
|
1949
|
+
|
1950
|
+
smalltalk.addMethod(
|
1951
|
+
unescape('_testZorkCommitPathJsShouldBeJavascript'),
|
1952
|
+
smalltalk.method({
|
1953
|
+
selector: unescape('testZorkCommitPathJsShouldBeJavascript'),
|
1954
|
+
category: 'tests',
|
1955
|
+
fn: function () {
|
1956
|
+
var self=this;
|
1957
|
+
smalltalk.send(self, "_assert_equals_", [unescape("javascripts/"), smalltalk.send(self['@zorkPackage'], "_commitPathJs", [])]);
|
1958
|
+
return self;},
|
1959
|
+
args: [],
|
1960
|
+
source: unescape('testZorkCommitPathJsShouldBeJavascript%0A%09self%20assert%3A%20%27javascripts/%27%20equals%3A%20zorkPackage%20commitPathJs'),
|
1961
|
+
messageSends: ["assert:equals:", "commitPathJs"],
|
1962
|
+
referencedClasses: []
|
1963
|
+
}),
|
1964
|
+
smalltalk.PackageWithDefaultCommitPathChangedTest);
|
1965
|
+
|
1966
|
+
smalltalk.addMethod(
|
1967
|
+
unescape('_testZorkCommitPathStShouldBeSmalltalk'),
|
1968
|
+
smalltalk.method({
|
1969
|
+
selector: unescape('testZorkCommitPathStShouldBeSmalltalk'),
|
1970
|
+
category: 'tests',
|
1971
|
+
fn: function () {
|
1972
|
+
var self=this;
|
1973
|
+
smalltalk.send(self, "_assert_equals_", [unescape("smalltalk/"), smalltalk.send(self['@zorkPackage'], "_commitPathSt", [])]);
|
1974
|
+
return self;},
|
1975
|
+
args: [],
|
1976
|
+
source: unescape('testZorkCommitPathStShouldBeSmalltalk%0A%09self%20assert%3A%20%27smalltalk/%27%20equals%3A%20zorkPackage%20commitPathSt'),
|
1977
|
+
messageSends: ["assert:equals:", "commitPathSt"],
|
1978
|
+
referencedClasses: []
|
1979
|
+
}),
|
1980
|
+
smalltalk.PackageWithDefaultCommitPathChangedTest);
|
1981
|
+
|
1982
|
+
|
1983
|
+
smalltalk.addMethod(
|
1984
|
+
unescape('_shouldInheritSelectors'),
|
1985
|
+
smalltalk.method({
|
1986
|
+
selector: unescape('shouldInheritSelectors'),
|
1987
|
+
category: 'accessing',
|
1988
|
+
fn: function () {
|
1989
|
+
var self=this;
|
1990
|
+
return false;
|
1991
|
+
return self;},
|
1992
|
+
args: [],
|
1993
|
+
source: unescape('shouldInheritSelectors%0A%09%5E%20false'),
|
1994
|
+
messageSends: [],
|
1995
|
+
referencedClasses: []
|
1996
|
+
}),
|
1997
|
+
smalltalk.PackageWithDefaultCommitPathChangedTest.klass);
|
1998
|
+
|
1999
|
+
|