element-parser ( -- parser )

Vocabulary

peg.ebnf.private

Inputs

None

Outputs

parser

an object

Definition

USING: kernel make peg peg.parsers sequences strings ;

IN: peg.ebnf.private

: element-parser ( -- parser )
    [
        [
            (element-parser) , ":" syntax ,
            "a-zA-Z_" range-pattern "a-zA-Z0-9_-" range-pattern
            repeat1 2seq [ first2 swap prefix >string ] action ,
        ] seq* [ first2 <ebnf-var> ] action , (element-parser) ,
    ] choice* ;