shithub: mc

ref: 3c9502102b2b01d6b32dad5f4f23f6f1fe736721
dir: /test/generictype.myr/

View raw version 
/* checks that parameterized types work. exits with 0. */
type option(@a) = union
	`Some @a
	`None
;;

const main = {
	var v

	v = `Some 123
	match v
	`None:		-> 1;;
	`Some 123:	-> 0;;
	;;
	-> 60
}