equal
deleted
inserted
replaced
|
1 "{ Encoding: utf8 }" |
|
2 |
1 " |
3 " |
2 COPYRIGHT (c) 1991 by Claus Gittinger |
4 COPYRIGHT (c) 1991 by Claus Gittinger |
3 All Rights Reserved |
5 All Rights Reserved |
4 |
6 |
5 This software is furnished under a license and may be used |
7 This software is furnished under a license and may be used |
8 be provided or otherwise made available to, or used by, any |
10 be provided or otherwise made available to, or used by, any |
9 other person. No title to or ownership of the software is |
11 other person. No title to or ownership of the software is |
10 hereby transferred. |
12 hereby transferred. |
11 " |
13 " |
12 "{ Package: 'stx:libview2' }" |
14 "{ Package: 'stx:libview2' }" |
|
15 |
|
16 "{ NameSpace: Smalltalk }" |
13 |
17 |
14 ImageReader subclass:#GIFReader |
18 ImageReader subclass:#GIFReader |
15 instanceVariableNames:'pass xpos ypos rowByteSize remainBitCount bufByte bufStream |
19 instanceVariableNames:'pass xpos ypos rowByteSize remainBitCount bufByte bufStream |
16 prefixTable suffixTable clearCode eoiCode freeCode codeSize |
20 prefixTable suffixTable clearCode eoiCode freeCode codeSize |
17 maxCode interlace frameDelay iterationCount leftOffs topOffs' |
21 maxCode interlace frameDelay iterationCount leftOffs topOffs' |
150 !GIFReader class methodsFor:'initialization'! |
154 !GIFReader class methodsFor:'initialization'! |
151 |
155 |
152 initialize |
156 initialize |
153 "install myself in the Image classes fileFormat table |
157 "install myself in the Image classes fileFormat table |
154 for the `.gif' extensions." |
158 for the `.gif' extensions." |
155 |
159 |
156 ImageSeparator := $, codePoint. |
160 ImageSeparator isNil ifTrue:[ |
157 Extension := $!! codePoint. |
161 ImageSeparator := $, codePoint. |
158 Terminator := $; codePoint. |
162 Extension := $!! codePoint. |
159 |
163 Terminator := $; codePoint. |
160 MIMETypes defineImageType:'image/gif' suffix:'gif' reader:self. |
164 |
|
165 MIMETypes defineImageType:'image/gif' suffix:'gif' reader:self. |
|
166 ]. |
161 |
167 |
162 "Modified: 14.10.1997 / 18:47:27 / cg" |
168 "Modified: 14.10.1997 / 18:47:27 / cg" |
163 ! ! |
169 ! ! |
164 |
170 |
165 !GIFReader class methodsFor:'testing'! |
171 !GIFReader class methodsFor:'testing'! |
1079 ! ! |
1085 ! ! |
1080 |
1086 |
1081 !GIFReader class methodsFor:'documentation'! |
1087 !GIFReader class methodsFor:'documentation'! |
1082 |
1088 |
1083 version |
1089 version |
1084 ^ '$Header: /cvs/stx/stx/libview2/GIFReader.st,v 1.107 2014-11-18 17:39:15 cg Exp $' |
1090 ^ '$Header: /cvs/stx/stx/libview2/GIFReader.st,v 1.108 2015-05-07 20:42:35 cg Exp $' |
1085 ! |
1091 ! |
1086 |
1092 |
1087 version_CVS |
1093 version_CVS |
1088 ^ '$Header: /cvs/stx/stx/libview2/GIFReader.st,v 1.107 2014-11-18 17:39:15 cg Exp $' |
1094 ^ '$Header: /cvs/stx/stx/libview2/GIFReader.st,v 1.108 2015-05-07 20:42:35 cg Exp $' |
1089 ! ! |
1095 ! ! |
1090 |
1096 |
1091 |
1097 |
1092 GIFReader initialize! |
1098 GIFReader initialize! |