]> gitweb.factorcode.org Git - factor.git/blob - basis/bootstrap/help/help.factor
a952d37d7edd82bdc2bf74406e34970b4b9f0f4e
[factor.git] / basis / bootstrap / help / help.factor
1 USING: accessors assocs kernel namespaces sequences vocabs
2 vocabs.loader vocabs.loader.private ;
3 IN: bootstrap.help
4
5 : load-help ( -- )
6     "help" require
7     "help.topics" require
8     "help.syntax" require
9     "help.crossref" require
10     "help.definitions" require
11     "help.lint" require
12     "help.vocabs" require
13
14     t load-help? set-global
15
16     [ dup lookup-vocab [ drop ] [ no-vocab ] if ] require-hook [
17         dictionary get values
18         [ docs-loaded?>> not ] filter
19         [ load-docs ] each
20     ] with-variable ;
21
22 load-help