shithub: mc

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