compilation/flap/tests/01-Parsing-no-positions/94-case-7.bad.parsing-no-positions.hopix

let mono =
  match (p) {
  | (x y) -> x + y
  }