vocab-append-path ( vocab path -- newpath )

Vocabulary

vocabs.loader

Inputs

vocab	an object
path	an object

Outputs

newpath

an object

Definition

USING: io.pathnames kernel ;

IN: vocabs.loader

: vocab-append-path ( vocab path -- newpath )
    swap find-vocab-root [ prepend-path ] [ drop f ] if* ;