cat-file ( path -- )

Vocabulary

tools.cat

Inputs

path

an object

Outputs

None

Definition

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

IN: tools.cat

: cat-file ( path -- )
    [ binary [ cat-stream ] with-file-reader ]
    [ write ": not found" print flush ] if-file-exists ;