3 Parser syntax

(require (planet dvanhorn/packrat:1:1/parser))

(parse id ([nonterminal-id (sequence body body0 ...)] ...))

sequence   =   (part ...)           part   =   (! part ...)     |   (/ sequence ...)     |   (? expr)     |   id := 'kind     |   id := @     |   id := nonterminal-id     |   id := (? expr)     |   nonterminal-id