factor-code-parser ( -- parser )

Vocabulary

peg.ebnf.private

Inputs

None

Outputs

parser

an object

Definition

USING: kernel make peg sequences ;

IN: peg.ebnf.private

: factor-code-parser ( -- parser )
    [
        "]]" token ensure-not , "]?" token ensure-not ,
        [ drop t ] satisfy ,
    ] seq* repeat0 [ "" concat-as ] action ;