RegressionTests__CollectionTests.st
changeset 1280 977c1f04083e
parent 1054 68a0796cec7b
child 1282 e64a9d280572
--- a/RegressionTests__CollectionTests.st	Thu Apr 09 13:17:10 2015 +0200
+++ b/RegressionTests__CollectionTests.st	Thu Apr 09 13:35:03 2015 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "{ Package: 'exept:regression' }"
 
 "{ NameSpace: RegressionTests }"
@@ -688,8 +690,9 @@
          self checkSorted:sorted with:checkBlock against:data.
          self checkSorted:coData with:checkBlock against:data.
 
-         sorted := data copy sort:[:policy :a :b| a < b].
-         self checkSorted:sorted with:checkBlock against:data.
+"/ Policy is not yet supported (without libcompat)
+"/         sorted := data copy sort:[:policy :a :b| a < b].
+"/         self checkSorted:sorted with:checkBlock against:data.
 
          sorted := data copy sort:[:a :b| a < b].
          self checkSorted:sorted with:checkBlock against:data.