(attribute-value-unquoted-state) ( document n/f string ch/f -- document n'/f string )

Vocabulary

html5

Inputs

document	an object
n/f	an object
string	an object
ch/f	an object

Outputs

document	an object
n'/f	an object
string	an object

Definition

USING: accessors combinators kernel sequences ;

IN: html5

: (attribute-value-unquoted-state)
    ( document n/f string ch/f -- document n'/f string )
    {
        {
            [ dup "\t\n\f " member? ]
            [ drop before-attribute-name-state ]
        }
        {
            [ dup 38 = ]
            [
                drop [
                    \ attribute-value-unquoted-state
                    >>return-state
                ] 2dip character-reference-state
            ]
        }
        { [ dup 62 = ] [ drop pick emit-tag data-state ] }
        {
            [ dup 0 = ]
            [
                drop
                unexpected-null-character 65533 reach
                push-attribute-value
            ]
        }
        {
            [ dup "\"'<=`" member? ]
            [
                unexpected-character-in-unquoted-attribute-value
                reach push-attribute-value
                attribute-value-unquoted-state
            ]
        }
        { [ dup f = ] [ eof-in-tag ] }
        [
            reach push-attribute-value
            attribute-value-unquoted-state
        ]
    } cond ;