select-in-table-token ( document obj -- document )

Vocabulary

html5

Inputs

document	an object
obj	an object

Outputs

document

an object

Definition

USING: accessors kernel ;

IN: html5

:: select-in-table-token ( document obj -- document )
    obj select-table-token? [
        obj end-tag? [
            document obj name>>
            { "html" "template" } element-in-scope?
        ] [ t ] if [
            "table-token-in-select" report-parse-error
            document close-select document obj table-token
        ] [ document ] if
    ] [ document obj ordinary-body-token ] if ;