(zero-file) ( n path -- )

Vocabulary

io.streams.zeros.private

Inputs

n	an object
path	an object

Outputs

None

Definition

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

IN: io.streams.zeros.private

: (zero-file) ( n path -- )
    binary
    [ 1 - seek-absolute seek-output 0 write1 ] with-file-writer
    ;