find-tag ( ifd class -- tag )


Vocabulary
images.tiff

Inputs
ifdan object
classan object


Outputs
tagan object


Definition
USING: kernel ;

IN: images.tiff

: find-tag ( ifd class -- tag ) find-tag* [ no-tag ] unless ;