identifier-parser ( -- parser )

Vocabulary

fjsc

Inputs

None

Outputs

parser

an object

Definition

USING: kernel make peg sequences ;

IN: fjsc

: identifier-parser ( -- parser )
    [
        identifier-ends-parser , identifier-middle-parser ,
        identifier-ends-parser ,
    ] seq* [ "" concat-as f ast-identifier boa ] action ;