hashtable-parser ( -- parser )

Vocabulary

fjsc

Inputs

None

Outputs

parser

an object

Definition

USING: accessors kernel make peg sequences ;

IN: fjsc

: hashtable-parser ( -- parser )
    [
        "H{" token sp hide , expression-parser
        [ values>> ] action , "}" token sp hide ,
    ] seq* [ first ast-hashtable boa ] action ;