compilation/flap/tests/03-Typing/39-pattern-matching-03.bad.typing.hopix.human-readable

type c = A

let main : int = match (A<>) { A<> -> 0 | B<> -> 1 }