ref: 3dc71f6baaf6ff6a7e5a41fd89ea3ec2c7bdf88c
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
;;
;;
}