# HG changeset patch # User Claus Gittinger # Date 1249030145 -7200 # Node ID 54871b04e18fbd852af0e3be80cbf7fcd53e156f # Parent 63c153f0ce9094d293bc1e72972a0b93c41d9644 *** empty log message *** diff -r 63c153f0ce90 -r 54871b04e18f GIFReader.st --- a/GIFReader.st Thu Jul 09 20:07:51 2009 +0200 +++ b/GIFReader.st Fri Jul 31 10:49:05 2009 +0200 @@ -122,7 +122,7 @@ "Modified: 10.1.1997 / 15:40:34 / cg" ! ! -!GIFReader methodsFor:'AEG-Changes'! +!GIFReader methodsFor:'image reading'! fromStream:aStream "read a stream containing a GIF image (or an image sequence). @@ -287,6 +287,21 @@ "Modified: / 5.7.1996 / 17:32:01 / stefan" "Modified: / 21.8.1998 / 22:20:00 / cg" +! ! + +!GIFReader methodsFor:'private-reading'! + +makeGreyscale + "not yet implemented/needed" +! + +readColorMap:colorMapSize + "get a gif colormap consisting of colorMapSize entries" + + |rgbVector| + + rgbVector := inStream nextBytes:colorMapSize*3. + ^ MappedPalette rgbBytesVector:rgbVector ! readExtension:aStream @@ -439,21 +454,6 @@ ] "Modified: / 1.4.1998 / 15:01:18 / cg" -! ! - -!GIFReader methodsFor:'private-reading'! - -makeGreyscale - "not yet implemented/needed" -! - -readColorMap:colorMapSize - "get a gif colormap consisting of colorMapSize entries" - - |rgbVector| - - rgbVector := inStream nextBytes:colorMapSize*3. - ^ MappedPalette rgbBytesVector:rgbVector ! readImage:aStream @@ -986,7 +986,7 @@ !GIFReader class methodsFor:'documentation'! version - ^ '$Header: /cvs/stx/stx/libview2/GIFReader.st,v 1.95 2009-02-11 16:19:55 cg Exp $' + ^ '$Header: /cvs/stx/stx/libview2/GIFReader.st,v 1.96 2009-07-31 08:49:05 cg Exp $' ! ! GIFReader initialize!