--- a/PCXReader.st Wed Nov 19 16:33:55 2003 +0100
+++ b/PCXReader.st Wed Nov 19 16:38:53 2003 +0100
@@ -112,26 +112,7 @@
"Modified: 16.4.1997 / 22:24:32 / cg"
! !
-!PCXReader methodsFor:'reading'!
-
-readImage
- "read an image in pcx format from inStream"
-
- inStream binary.
-
- header := ByteArray uninitializedNew:128.
- (inStream nextBytes:128 into:header) == 128 ifFalse:[
- ^ self fileFormatError:'short file'.
- ].
-
- (self class isValidPCXHeader:header) ifFalse:[
- ^ self fileFormatError:'wrong header'.
- ].
-
- self readRestAfterHeader.
-! !
-
-!PCXReader methodsFor:'reading-private'!
+!PCXReader methodsFor:'private-reading'!
extractColorMap16
"extract the 16-entry colormap from the header"
@@ -359,10 +340,29 @@
nBuffer := 0.
! !
+!PCXReader methodsFor:'reading'!
+
+readImage
+ "read an image in pcx format from inStream"
+
+ inStream binary.
+
+ header := ByteArray uninitializedNew:128.
+ (inStream nextBytes:128 into:header) == 128 ifFalse:[
+ ^ self fileFormatError:'short file'.
+ ].
+
+ (self class isValidPCXHeader:header) ifFalse:[
+ ^ self fileFormatError:'wrong header'.
+ ].
+
+ self readRestAfterHeader.
+! !
+
!PCXReader class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libview2/PCXReader.st,v 1.32 2003-11-19 15:26:45 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libview2/PCXReader.st,v 1.33 2003-11-19 15:38:20 cg Exp $'
! !
PCXReader initialize!