equal
deleted
inserted
replaced
|
1 "{ Encoding: utf8 }" |
|
2 |
1 "{ Package: 'exept:regression' }" |
3 "{ Package: 'exept:regression' }" |
2 |
4 |
3 "{ NameSpace: RegressionTests }" |
5 "{ NameSpace: RegressionTests }" |
4 |
6 |
5 TestCase subclass:#CollectionTests |
7 TestCase subclass:#CollectionTests |
686 coData := data copy. |
688 coData := data copy. |
687 sorted := data copy sortWith:coData. |
689 sorted := data copy sortWith:coData. |
688 self checkSorted:sorted with:checkBlock against:data. |
690 self checkSorted:sorted with:checkBlock against:data. |
689 self checkSorted:coData with:checkBlock against:data. |
691 self checkSorted:coData with:checkBlock against:data. |
690 |
692 |
691 sorted := data copy sort:[:policy :a :b| a < b]. |
693 "/ Policy is not yet supported (without libcompat) |
692 self checkSorted:sorted with:checkBlock against:data. |
694 "/ sorted := data copy sort:[:policy :a :b| a < b]. |
|
695 "/ self checkSorted:sorted with:checkBlock against:data. |
693 |
696 |
694 sorted := data copy sort:[:a :b| a < b]. |
697 sorted := data copy sort:[:a :b| a < b]. |
695 self checkSorted:sorted with:checkBlock against:data. |
698 self checkSorted:sorted with:checkBlock against:data. |
696 |
699 |
697 coData := data copy. |
700 coData := data copy. |