--- a/Depth8Image.st Thu Jun 24 10:37:43 1999 +0200
+++ b/Depth8Image.st Thu Jun 24 10:45:34 1999 +0200
@@ -900,8 +900,7 @@
"return an 8-bit greyForm from the 8-bit receiver image.
Redefined, since only a translation has to be done here."
- |greyBits map
- mapSize "{ Class: SmallInteger }"|
+ |greyBits map|
greyBits := ByteArray uninitializedNew:(width * height).
@@ -911,12 +910,6 @@
map at:i put:((self colorFromValue:(i-1)) brightness * 255) rounded
].
-"/ mapSize := colorMap size.
-"/
-"/ 1 to:mapSize do:[:i |
-"/ map at:i put:((colorMap at:i) brightness * 255) rounded
-"/ ].
-
bytes expandPixels:8 "xlate only"
width:width
height:height
@@ -1863,5 +1856,5 @@
!Depth8Image class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libview/Depth8Image.st,v 1.90 1999-06-24 08:37:22 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libview/Depth8Image.st,v 1.91 1999-06-24 08:45:34 cg Exp $'
! !