--- a/PNGReader.st	Fri Sep 01 15:36:01 2017 +0200
+++ b/PNGReader.st	Mon Sep 04 18:35:51 2017 +0200
@@ -1561,7 +1561,7 @@
     depth <= 8 ifTrue:[
         bitsPerChannel := depth
     ] ifFalse:[
-        colorType == ColorTypeRGB ifTrue:[ 
+        (colorType == ColorTypeRGB or:[colorType == ColorTypeRGBAlpha]) ifTrue:[ 
             "/ all channels must have the same nr of bits
             self assert:(bitsPerSample asSet size == 1). 
             bitsPerChannel := bitsPerSample first
@@ -1583,7 +1583,7 @@
             outStream nextPut: 0   "Non-interlaced"
         ]
 
-    "Modified: / 31-08-2017 / 17:47:12 / cg"
+    "Modified: / 04-09-2017 / 18:34:15 / cg"
 !
 
 writeImageDataChunk