string-parser ( -- parser ) (original) (raw)

string-parser ( -- parser )

Vocabulary
peg.parsers

Inputs
None

Outputs

parser a parser

Word description
Returns a parser that matches an string composed of a ", anything that is not ", and another ".

See also
integer-parser

Definition

USING: kernel make peg sequences strings ;

IN: peg.parsers

: string-parser ( -- parser )
[
[ 34 = ] satisfy hide , [ 34 = not ] satisfy repeat0 ,
[ 34 = ] satisfy hide ,
] seq* [ first >string ] action ;