ref: 25be8b19d826b8faf73275e0294f661f1a4c32fe
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 ;; ;; }