resin 0.0.7 → 0.0.8

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.
@@ -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
+