save-block ( peer -- peer )

Vocabulary

bittorrent

Inputs

peer

an object

Outputs

peer

an object

Definition

USING: accessors io io.encodings.binary io.files math ;

IN: bittorrent

:: save-block ( peer -- peer )
    peer torrent>> torrent-path binary [
        peer current-index>> peer piece-length>> *
        seek-absolute seek-output peer current-piece>> write
    ] with-file-appender peer ;