find-tag* ( ifd class -- tag/class ? )

Vocabulary

images.tiff

Inputs

ifd	an object
class	an object

Outputs

tag/class	an object
?	an object

Definition

USING: accessors assocs kernel ;

IN: images.tiff

: find-tag* ( ifd class -- tag/class ? )
    swap processed-tags>> ?at ;