--- a/RegressionTests__CollectionTests.st	Thu Jan 24 19:29:44 2013 +0100
+++ b/RegressionTests__CollectionTests.st	Fri Jan 25 17:41:08 2013 +0100
@@ -85,7 +85,7 @@
 
     self assert: ( d size == 3 ).
 
-    self assert:(ret := self collectedDoArgsOf:d) asArray = #('one' 'two' 'three').
+    self assert:(ret := self collectedDoArgsOf:d) asSet = #('one' 'two' 'three') asSet.
     self assert:(ret := d collect:[:each | each]) = #('one' 'two' 'three') asBag.
     self assert:(ret := d select:[:each | true]) = (Dictionary withAssociations:(Array with:(1->'one') with:(2->'two') with:(3->'three'))).
 
@@ -1159,3 +1159,4 @@
 version_CVS
     ^ '$Header$'
 ! !
+