timezone-parser ( -- parser )

Vocabulary

toml.private

Inputs

None

Outputs

parser

an object

Definition

USING: peg peg.parsers sequences ;

IN: toml.private

: timezone-parser ( -- parser )
    "Z" token "+" token "-" token 2choice decdigit 2 exactly-n
    ":" token decdigit 2 exactly-n 4seq [ "" concat-as ] action
    2choice ;