after-after-body-token ( document obj -- document )

Vocabulary

html5

Inputs

document	an object
obj	an object

Outputs

document

an object

Definition

USING: accessors kernel sequences ;

IN: html5

:: after-after-body-token ( document obj -- document )
    obj misc-node?
    [ obj document tree>> push document ] [
        obj html-space? obj doctype? or
        [ document obj body-token ] [
            document in-body-mode >>insertion-mode
            obj tree-insert
        ] if
    ] if ;