fieldListCase method

Implementation

Parser fieldListCase() => seq5(
  ref1(token, 'case'),
  seq2(ref0(identifier), ref1(token, ':')).optional(),
  ref0(identifier),
  ref1(token, 'of'),
  seq5(
    ref0(constant).plusSeparated(ref1(token, ',')),
    ref1(token, ':'),
    ref1(token, '('),
    ref0(fieldList),
    ref1(token, ')'),
  ).plusSeparated(ref1(token, ';')),
);