shithub: mc

ref: 682c4ce6114cb44e2ad95a75269585f6e1da8150
dir: /test/matchunion.myr/

View raw version 
use std
/* checks that union matching works, at least on the key.
exits with 84. */
type u = union
	`Foo
	`Bar
	`Baz
	`Quux
;;

const main = {
	var v

	v = `Foo
	match v
	`Bar:
		-> 42
		;;
	`Baz:
		-> 81
		;;
	`Foo:
		-> 84
		;;
	`Quux:
		-> 123
		;;
	;;
}