(script-data-escaped-dash-dash-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: combinators kernel ;

IN: html5

: (script-data-escaped-dash-dash-state)
    ( document n/f string ch/f -- document n'/f string )
    {
        {
            [ dup 45 = ]
            [
                reach emit-char
                script-data-escaped-dash-dash-state
            ]
        }
        {
            [ dup 60 = ]
            [ drop script-data-escaped-less-than-sign-state ]
        }
        { [ dup 62 = ] [ reach emit-char script-data-state ] }
        {
            [ dup 0 = ]
            [
                unexpected-null-character
                script-data-escaped-state
            ]
        }
        { [ dup f = ] [ eof-in-script-html-comment-like-text ] }
        [ reach emit-char script-data-escaped-state ]
    } cond ;