disk-vocabs-for-prefix ( prefix -- assoc )
Factor handbook » Developer tools » Vocabulary hierarchy tools
Prev:all-disk-vocabs-recursive ( -- assoc )
Next:disk-vocabs-recursive-for-prefix ( prefix -- assoc )


Vocabulary
vocabs.hierarchy

Inputs
prefixan object


Outputs
assocan object


Definition
USING: arrays assocs kernel namespaces sequences vocabs
vocabs.hierarchy.private vocabs.loader ;

IN: vocabs.hierarchy

: disk-vocabs-for-prefix ( prefix -- assoc )
[
[ vocab-roots get ] dip [ [ dup ] ] dip
[ (disk-vocabs) ] curry compose map>alist
]
[ unrooted-disk-vocabs [ lookup-vocab ] map! f swap 2array ]
bi suffix ;