--- a/Image.st Wed Jun 26 13:48:48 2019 +0200
+++ b/Image.st Thu Jun 27 15:32:39 2019 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
"
COPYRIGHT (c) 1991 by Claus Gittinger
All Rights Reserved
@@ -7112,7 +7114,7 @@
if ((_w * _h * 4) > _imgSize) goto error;
#if (__POINTER_SIZE__ == 8) && defined(__LSBFIRST__)
- // fetch 4 pixels (4*32bit); store in 3 (4*24bit)
+ // fetch 4 pixels (4*32bit in 2 INTs); store in 3 ints (4*24bit)
while (_myBitsPtr < (_myBitsEndPtr-sizeof(int)*3)) {
// LSB argbargb; r in LSB
// a2 b2 g2 r2 a1 b1 g1 r1
@@ -7165,6 +7167,7 @@
].
"Created: / 25-03-2019 / 14:48:52 / Claus Gittinger"
+ "Modified: / 27-06-2019 / 15:31:33 / Claus Gittinger"
!
copyPixels32AlphaLowTo24From:anImage
@@ -7196,7 +7199,7 @@
if ((_w * _h * 4) > _imgSize) goto error;
#if (__POINTER_SIZE__ == 8) && defined(__LSBFIRST__)
- // fetch 4 pixels (4*32bit); store in 3 (4*24bit)
+ // fetch 4 pixels (4*32bit in 2 INTs); store in 3 ints (4*24bit)
while (_myBitsPtr < (_myBitsEndPtr-sizeof(int)*3)) {
// LSB argbargb; r in LSB
// b2 g2 r2 a2 b1 g1 r1 a1
@@ -7248,7 +7251,7 @@
self pixelAtX:x y:y put:((pixel bitShift:-8) bitAnd:16rFFFFFF)
].
- "Modified: / 25-03-2019 / 14:50:50 / Claus Gittinger"
+ "Modified: / 27-06-2019 / 15:32:03 / Claus Gittinger"
!
rgbImageAsFormOn:aDevice