ensure-vocab-root ( root -- root )

Vocabulary

vocabs.hierarchy.private

Inputs

root

an object

Outputs

root

an object

Definition

USING: kernel namespaces sequences vocabs.loader ;

IN: vocabs.hierarchy.private

: ensure-vocab-root ( root -- root )
    dup vocab-roots get member? [ vocab-root-required ] unless ;