(to-refresh) ( vocab variable loaded? path -- )


Vocabulary
vocabs.refresh

Definition
USING: kernel namespaces sequences ;

IN: vocabs.refresh

: (to-refresh) ( vocab variable loaded? path -- )
dup [
swap [
pick changed-vocab?
[ source-modified? [ get push ] [ 2drop ] if ]
[ 3drop ] if
] [ drop get push ] if
] [ 4drop ] if ;