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