match-pattern ( pattern filenames -- filenames' )

Vocabulary

vocabs.metadata.resources

Inputs

pattern	an object
filenames	an object

Outputs

filenames'

an object

Definition

USING: globs kernel regexp sequences ;

IN: vocabs.metadata.resources

: match-pattern ( pattern filenames -- filenames' )
    over <glob> [ matches? ] curry filter
    [ resource-missing ] [ nip ] if-empty ;