Random.st
changeset 1175 6c846afd9fbd
parent 1128 72d61e6ef2b1
child 1201 08004b394663
--- a/Random.st	Tue Apr 08 18:37:54 2003 +0200
+++ b/Random.st	Thu Apr 10 16:45:34 2003 +0200
@@ -398,7 +398,7 @@
 
     |res|
 
-    res := ByteArray new:count.
+    res := ByteArray uninitializedNew:count.
 
     1 to:count do:[:i|
         self step.
@@ -547,5 +547,5 @@
 !Random class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic2/Random.st,v 1.32 2002-12-06 10:19:20 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic2/Random.st,v 1.33 2003-04-10 14:45:34 cg Exp $'
 ! !