find-chunk ( loading-png string -- chunk )


Vocabulary
images.png

Inputs
loading-pngan object
stringan object


Outputs
chunkan object


Definition
USING: accessors kernel sequences ;

IN: images.png

: find-chunk ( loading-png string -- chunk )
[ chunks>> ] dip [ [ type>> ] ] dip [ = ] curry compose
find nip ;