<loading-jpeg> ( headers bitstream -- image )


Vocabulary
images.jpeg.private

Inputs
headersan object
bitstreaman object


Outputs
imagean object


Definition
USING: accessors images.jpeg kernel ;

IN: images.jpeg.private

: <loading-jpeg> ( headers bitstream -- image )
loading-jpeg new swap >>bitstream swap >>headers ;