GIFReader.st
changeset 3364 c20af44ab483
parent 3284 b2302e748434
child 3385 6843cb82e01d
--- a/GIFReader.st	Thu Jul 24 19:51:17 2014 +0200
+++ b/GIFReader.st	Fri Aug 01 08:06:37 2014 +0200
@@ -855,7 +855,7 @@
     maxMaxCode := 1 bitShift: maxBits.
     tSize := 5003.
     prefixTable := Array new: tSize.
-    suffixTable := Array new: tSize.
+    suffixTable := Array new: tSize withAll:-1.
 
     initCodeSize := bitsPerPixel <= 1 ifTrue: [2] ifFalse: [bitsPerPixel].
     outStream nextPut: initCodeSize.
@@ -868,7 +868,7 @@
         fCode := fCode * 2
     ].
     tShift := 8 - tShift.
-    1 to: tSize do: [:i | suffixTable at: i put: -1].
+    "/ 1 to: tSize do: [:i | suffixTable at: i put: -1]. - cg changed initialization above
 
     self writeCodeAndCheckCodeSize: clearCode.
     ent := self readPixelFrom: bits.
@@ -1084,11 +1084,11 @@
 !GIFReader class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/GIFReader.st,v 1.104 2014-02-14 00:37:14 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/GIFReader.st,v 1.105 2014-08-01 06:06:37 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libview2/GIFReader.st,v 1.104 2014-02-14 00:37:14 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/GIFReader.st,v 1.105 2014-08-01 06:06:37 cg Exp $'
 ! !