glob-literal% ( root globs -- )

Vocabulary

globs.private

Inputs

root	an object
globs	an object

Outputs

None

Definition

USING: io.files io.files.info io.pathnames kernel sequences ;

IN: globs.private

:: glob-literal% ( root globs -- )
    globs unclip :> ( remaining glob ) root glob append-path
    [ remaining over file-info ?glob% ] when-file-exists ;