--- a/Colormap.st Fri Aug 25 11:52:12 2000 +0200
+++ b/Colormap.st Sun Aug 27 16:47:34 2000 +0200
@@ -305,9 +305,19 @@
grow:howBig
"change the receivers size - not allowed"
- howBig == self size ifTrue:[^ self].
+ |t|
- ^ self shouldNotImplement
+ howBig == self size ifTrue:[^ self].
+ redVector isNil ifTrue:[
+ redVector := ByteArray new:howBig.
+ greenVector := ByteArray new:howBig.
+ blueVector := ByteArray new:howBig.
+ ^ self
+ ].
+ t := redVector. redVector := ByteArray new:howBig. redVector replaceFrom:1 to:t size with:t startingAt:1.
+ t := greenVector. greenVector := ByteArray new:howBig. greenVector replaceFrom:1 to:t size with:t startingAt:1.
+ t := blueVector. blueVector := ByteArray new:howBig. blueVector replaceFrom:1 to:t size with:t startingAt:1.
+ ^ self
!
@@ -377,5 +387,5 @@
!Colormap class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libview/Colormap.st,v 1.27 2000-08-22 13:56:15 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libview/Colormap.st,v 1.28 2000-08-27 14:47:34 cg Exp $'
! !