Mercurial Mercurial > hg > stx-goodies-regression / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | zip | gz | bz2 | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
*** empty log message ***
authorClaus Gittinger <cg@exept.de>
Tue, 28 Sep 2004 16:31:04 +0200
changeset 254 2e394c224ff1
parent 253 c9431a7f3a15
child 255 f9c2f38ffcfd
*** empty log message ***
RegressionTests__GCTest.st file | annotate | diff | comparison | revisions 
--- a/RegressionTests__GCTest.st	Tue Sep 28 16:11:17 2004 +0200
+++ b/RegressionTests__GCTest.st	Tue Sep 28 16:31:04 2004 +0200
@@ -16,8 +16,10 @@
     |arr|
 
     arr := Array new:100000.
-    1 to:100000 do:[:i |
-        arr at:i put:Object new.
+    100 timesRepeat:[
+        1 to:100000 do:[:i |
+            arr at:i put:(Array new:1).
+        ].
     ].
 
     "
hg/stx-goodies-regression