read-value ( n string -- n' string value )

Vocabulary

modern.html

Inputs

n	an object
string	an object

Outputs

n'	an object
string	an object
value	an object

Definition

USING: combinators kernel modern.slices sequences strings ;

IN: modern.html

: read-value ( n string -- n' string value )
    take-char {
        { 39 [ 39 read-string >string <squote> ] }
        { 34 [ 34 read-string >string <dquote> ] }
        { 91 [ "[" throw ] }
        { 123 [ "{" throw ] }
        [ [ take-tag-name ] dip prefix ]
    } case ;