node-in-scope? ( document target -- ? )

Vocabulary

html5

Inputs

document	an object
target	an object

Outputs

?

an object

Definition

USING: accessors combinators.short-circuit kernel sequences ;

IN: html5

:: node-in-scope? ( document target -- ? )
    document open-elements>> [
        dup target eq?
        [ drop t ] [
            dup html-element?
            [ name>> scope-boundaries member? ] [
                {
                    [ mathml-text-integration-point? ]
                    [ html-integration-point? ]
                    [ ~array~ 1&& ]
                } 1||
            ] if
        ] if
    ] find-last nip target eq? ;