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