unrooted-disk-vocabs ( prefix -- seq )

Vocabulary

vocabs.hierarchy.private

Inputs

prefix

an object

Outputs

seq

an object

Definition

USING: kernel sequences vocabs ;

IN: vocabs.hierarchy.private

: unrooted-disk-vocabs ( prefix -- seq )
    [ loaded-vocab-names no-rooted ] dip dup empty?
    [ 46 suffix ] unless [ [ vocab-name ] ] dip
    [ one-level-only? ] curry compose filter ;