take-string ( match -- string )

Vocabulary

xml.tokenize

Inputs

match

an object

Outputs

string

an object

Definition

USING: kernel math namespaces sequences xml.errors xml.state ;

IN: xml.tokenize

: take-string ( match -- string )
    [ spot get (take-string) [ missing-close ] unless ]
    [ dupd 2length - over shorten "" like ] bi ;