shithub: mc

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