--- a/Collection.st Sun Nov 11 22:44:30 2018 +0100
+++ b/Collection.st Fri Nov 16 12:22:02 2018 +0100
@@ -2763,7 +2763,7 @@
|newCollection runIndex|
- newCollection := self speciesForCollecting new:self size.
+ newCollection := self speciesForCollecting newWithCapacity:self size.
runIndex := 1.
self do:[:element |
newCollection add:(aTwoArgBlock value:element value:runIndex).
@@ -2775,6 +2775,8 @@
#(1 2 3 4) collectWithIndex:[:n :i | n * 2 + i]
#(1 2 3 4) collectWithIndex:[:n :i | i -> (n * 2)]
"
+
+ "Modified: / 16-11-2018 / 12:20:43 / Maren"
!
count:aBlock