pathname>measured-stream ( pathname -- stream )

Vocabulary

http.client.post-data.private

Inputs

pathname

an object

Outputs

stream

an object

Definition

USING: accessors destructors http.client.post-data
io.encodings.binary io.files io.files.info kernel ;

IN: http.client.post-data.private

: pathname>measured-stream ( pathname -- stream )
    string>>
    [ binary <file-reader> &dispose ] [ file-info size>> ] bi
    <measured-stream> ;