eliminating VariableArray
authorClaus Gittinger <cg@exept.de>
Fri, 24 Nov 1995 21:52:38 +0100
changeset 131 c93e19f86d9e
parent 130 ddb0e9c49fc8
child 132 0a8fe342ed91
eliminating VariableArray
HersheyFont.st
--- a/HersheyFont.st	Fri Nov 24 18:22:48 1995 +0100
+++ b/HersheyFont.st	Fri Nov 24 21:52:38 1995 +0100
@@ -86,7 +86,7 @@
 
     GlyphData isNil ifTrue:[
 	Transcript showCr:'reading hershey glyphs ...'.
-	GlyphData := VariableArray new:4000.
+	GlyphData := OrderedCollection new:4000; grow:4000.
 	b5 := String new:5.
 	b3 := String new:3.
 	[inStream atEnd] whileFalse:[