equal
deleted
inserted
replaced
38 hereby transferred. |
38 hereby transferred. |
39 " |
39 " |
40 ! |
40 ! |
41 |
41 |
42 version |
42 version |
43 ^ '$Header: /cvs/stx/stx/libview2/Attic/TIFFRdr.st,v 1.25 1995-11-11 16:05:10 cg Exp $' |
43 ^ '$Header: /cvs/stx/stx/libview2/Attic/TIFFRdr.st,v 1.26 1995-11-22 12:06:32 cg Exp $' |
44 ! |
44 ! |
45 |
45 |
46 documentation |
46 documentation |
47 " |
47 " |
48 This class knows how to read TIFF files and how to |
48 This class knows how to read TIFF files and how to |
194 ok := false |
194 ok := false |
195 ]. |
195 ]. |
196 |
196 |
197 stripOffsets isNil ifTrue:[ |
197 stripOffsets isNil ifTrue:[ |
198 'TIFFReader: missing stripOffsets tag' errorPrintNL. |
198 'TIFFReader: missing stripOffsets tag' errorPrintNL. |
|
199 ok := false |
|
200 ]. |
|
201 |
|
202 stripByteCounts isNil ifTrue:[ |
|
203 stripOffsets size == 1 ifTrue:[ |
|
204 stripByteCounts := Array with:(self bitsPerPixel // 8) * width * height |
|
205 ] |
|
206 ]. |
|
207 |
|
208 stripByteCounts isNil ifTrue:[ |
|
209 'TIFFReader: missing stripByteCounts tag' errorPrintNL. |
199 ok := false |
210 ok := false |
200 ]. |
211 ]. |
201 |
212 |
202 ok ifFalse:[ |
213 ok ifFalse:[ |
203 ^ nil |
214 ^ nil |