literal-string ( -- parser )

Vocabulary

toml.private

Inputs

None

Outputs

parser

an object

Definition

USING: kernel peg peg.parsers sequences ;

IN: toml.private

: literal-string ( -- parser )
    [ "'" member? not ] satisfy repeat0 "'" dup surrounded-by ;