showing-definition? ( defspec set -- ? )

Vocabulary

ui.tools.browser

Inputs

defspec	an object
set	an object

Outputs

?

an object

Definition

USING: accessors combinators.short-circuit help.topics kernel
sets vocabs ;

IN: ui.tools.browser

: showing-definition? ( defspec set -- ? )
    {
        [ in? ]
        [ [ dup word-link? [ name>> ] when ] dip in? ]
        [ [ dup vocab-link? [ lookup-vocab ] when ] dip in? ]
    } 2|| ;