USING: accessors hashtables kernel namespaces vocabs.parser ;

IN: ui.tools.listener

: use-if-necessary ( word manifest -- )
2dup [ vocabulary>> ] dip and [
manifest [
[ vocabulary>> use-vocab ]
[ dup name>> associate use-words ] bi
] with-variable
] [ 2drop ] if ;