ensure-mime-bytes ( multipart n -- multipart )

Vocabulary

mime.multipart

Inputs

multipart	an object
n	an object

Outputs

multipart

an object

Definition

USING: accessors kernel math sequences ;

IN: mime.multipart

:: ensure-mime-bytes ( multipart n -- multipart )
    multipart bytes>> length n < [
        multipart end-of-stream?>>
        [ mime-decoding-ran-out-of-bytes ] when
        multipart fill-bytes n ensure-mime-bytes
    ] [ multipart ] if ;