check-word ( word -- )

Vocabulary

help.lint.private

Inputs

word

an object

Outputs

None

Definition

USING: combinators help.lint.checks help.topics kernel
namespaces parser words ;

IN: help.lint.private

: check-word ( word -- )
    [ with-file-vocabs ] vocabs-quot set dup "help" word-prop [
        [ >link ] keep [
            dup "help" word-prop {
                [ check-values ]
                [ check-value-effects ]
                [ check-class-description ]
                [ nip check-see-also ]
                [ nip check-markup ]
            } 2cleave
        ] curry check-something
    ] [ drop ] if ;