--- a/TIFFRdr.st Sun Jan 09 22:53:13 1994 +0100
+++ b/TIFFRdr.st Wed Jan 12 21:22:50 1994 +0100
@@ -28,7 +28,7 @@
COPYRIGHT (c) 1991 by Claus Gittinger
All Rights Reserved
-$Header: /cvs/stx/stx/libview2/Attic/TIFFRdr.st,v 1.6 1994-01-08 17:10:32 claus Exp $
+$Header: /cvs/stx/stx/libview2/Attic/TIFFRdr.st,v 1.7 1994-01-12 20:22:50 claus Exp $
written Summer 91 by claus
'!
@@ -806,11 +806,11 @@
^ self
].
-'tag:' print. tagType print. ' typ:' print. numberType print.
+'TIFF: tag:' print. tagType print. ' typ:' print. numberType print.
' len:' print. length print. ' offs:' print. offset print.
' val:' print. value print. ' valArr:' print. valueArray printNewline.
- 'unknown type ' print. tagType printNewline
+ 'TIFF: unknown type ' print. tagType printNewline
!
writeUncompressedBits
--- a/TIFFReader.st Sun Jan 09 22:53:13 1994 +0100
+++ b/TIFFReader.st Wed Jan 12 21:22:50 1994 +0100
@@ -28,7 +28,7 @@
COPYRIGHT (c) 1991 by Claus Gittinger
All Rights Reserved
-$Header: /cvs/stx/stx/libview2/TIFFReader.st,v 1.6 1994-01-08 17:10:32 claus Exp $
+$Header: /cvs/stx/stx/libview2/TIFFReader.st,v 1.7 1994-01-12 20:22:50 claus Exp $
written Summer 91 by claus
'!
@@ -806,11 +806,11 @@
^ self
].
-'tag:' print. tagType print. ' typ:' print. numberType print.
+'TIFF: tag:' print. tagType print. ' typ:' print. numberType print.
' len:' print. length print. ' offs:' print. offset print.
' val:' print. value print. ' valArr:' print. valueArray printNewline.
- 'unknown type ' print. tagType printNewline
+ 'TIFF: unknown type ' print. tagType printNewline
!
writeUncompressedBits