list-parser

Vocabulary

peg.parsers.private

Definition

IN: peg.parsers.private

TUPLE: list-parser item separator repeat1? ;

Methods

USING: accessors kernel peg peg.parsers.private peg.private ;

M: list-parser parser-quot
    [ item>> execute-parser-quot ]
    [ separator>> execute-parser-quot over ] [ repeat1?>> ] tri 
    '[
        input-slice V{ } clone <parse-result>
        _ parse-seq-element [
            [ @ _ [ f ] if ] swap _
            [ repeat1-loop ] [ repeat0-loop ] if
        ] [ f ] if*
    ] ;