ref: 5cacde485bf6338bbf216b7a5249bb51c84e15fc
dir: /test/matchargunion.myr/
/* checks pattern matching on unions with arguments.
exits with 42. */
type u = union
`Int int
`Chr char
`Nil
;;
const main = {
var v
v = `Int 123
match v
`Int 127:
-> 42
;;
`Int 123:
-> 69
;;
`Chr 'a':
-> 4
;;
`Nil:
-> 6
;;
;;
}