direct ( -- object )

Vocabulary

xml.elements

Inputs

None

Outputs

object

an object

Definition

USING: combinators kernel xml.state ;

IN: xml.elements

: direct ( -- object )
    get-char {
        { 45 [ take-comment ] }
        { 91 [ take-cdata ] }
        [ drop take-directive ]
    } case ;