--- a/RegressionTests__CollectionTests.st	Thu May 03 18:35:39 2012 +0200
+++ b/RegressionTests__CollectionTests.st	Thu May 03 18:36:53 2012 +0200
@@ -360,11 +360,14 @@
     self assert:(enumeratedValues size == 10).
     self assert:(enumeratedValues asArray = #(2 4 6 8 10 12 14 16 18 20)).
 
+    self assert: (i1 collect:[:el | el even]) = #(false true false true false true false true false true).
+    self assert: (i2 collect:[:el | el even]) = #(true true true true true true true true true true).
+
     "
      self basicNew testInterval01
     "
 
-    "Modified: / 03-05-2012 / 18:34:56 / cg"
+    "Modified: / 03-05-2012 / 18:36:41 / cg"
 ! !
 
 !CollectionTests methodsFor:'tests-orderedCollection'!