tail-file ( file -- )

Vocabulary

log-viewer

Inputs

file

an object

Outputs

None

Definition

USING: io.encodings.utf8 io.files io.monitors io.pathnames
kernel ;

IN: log-viewer

: tail-file ( file -- )
    dup utf8 <file-reader> dup read-lines
    swap parent-directory f <monitor> tail-file-loop ;