TIFFReader.st
changeset 117 c0641e5d21e6
parent 114 e577a2f332d0
child 135 ff507d9a242b
--- a/TIFFReader.st	Tue Nov 21 15:01:56 1995 +0100
+++ b/TIFFReader.st	Wed Nov 22 13:06:32 1995 +0100
@@ -40,7 +40,7 @@
 !
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/TIFFReader.st,v 1.25 1995-11-11 16:05:10 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/TIFFReader.st,v 1.26 1995-11-22 12:06:32 cg Exp $'
 !
 
 documentation
@@ -199,6 +199,17 @@
 	ok := false
     ].
 
+    stripByteCounts isNil ifTrue:[
+	stripOffsets size == 1 ifTrue:[
+	    stripByteCounts := Array with:(self bitsPerPixel // 8) * width * height
+	]
+    ].
+
+    stripByteCounts isNil ifTrue:[
+	'TIFFReader: missing stripByteCounts tag' errorPrintNL.
+	ok := false
+    ].
+
     ok ifFalse:[
 	^ nil
     ].