include-file-name? ( name -- ? )

Vocabulary

codebook

Inputs

name

an object

Outputs

?

an object

Definition

USING: combinators.short-circuit io.files.info io.pathnames
sequences ;

IN: codebook

: include-file-name? ( name -- ? )
    {
        [ path-components [ "." head? ] none? ]
        [ link-info regular-file? ]
    } 1&& ;