file-is-text? ( path -- ? )

Vocabulary

tools.directory-to-file

Inputs

path

an object

Outputs

?

an object

Definition

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

IN: tools.directory-to-file

: file-is-text? ( path -- ? )
    binary file-contents [ 127 < ] all? ;