Merge branch 'master' of git://factorcode.org/git/factor

db4
Slava Pestov 2009-02-07 23:05:01 -06:00
commit bf05232086
1 changed files with 2 additions and 2 deletions

View File

@ -169,7 +169,7 @@ ERROR: bad-tiff-magic bytes ;
: read-ifds ( tiff -- tiff )
[
dup ifd-offset>> seek-input
dup ifd-offset>> seek-absolute seek-input
2 read endian>
dup [ read-ifd ] replicate
4 read endian>
@ -184,7 +184,7 @@ ERROR: bad-tiff-magic bytes ;
dup count>> 1 = [
offset>>
] [
[ offset>> seek-input ] [ count>> read ] bi
[ offset>> seek-absolute seek-input ] [ count>> read ] bi
] if ;
: process-ifd-entry ( ifd-entry -- object )