store-ifd ( tiff ifd -- tiff )


Vocabulary
images.tiff

Inputs
tiffan object
ifdan object


Outputs
tiffan object


Definition
USING: accessors assocs kernel ;

IN: images.tiff

: store-ifd ( tiff ifd -- tiff )
dup offset>> pick ifds>> set-at ;