sum types

vlib/compiler/tests/enum_test.v

@@ -54,3 +54,48 @@ fn test_nums() {
 	d := Foo.d
 	assert d == -10
 }
+
+
+enum Expr {
+	BoolExpr(bool)
+	IntExpr(int)
+	//FloatExpr(int)
+}
+
+fn get_expr() Expr {
+	return Expr.IntExpr(10)
+
+}
+
+fn test_typed_enum() {
+	i := Expr.IntExpr(10)
+	expr := Expr.BoolExpr(true)
+	//println(i)
+	//if i == expr {
+
+	//}
+	println('done')
+	// expr = i
+	/*
+	match expr {
+		IntExpr(n)  { println('INT $n')  }
+		BoolExpr(b) { println('BOOL $b') }
+	}
+	*/
+}
+/*
+
+fn test_typed_enum() {
+	Expr i = { .obj = 10, .typ = IntExpr_type };
+	Expr expr = { .obj = true, .typ = BoolExpr_type };
+	//    val = expr;
+	if (expr.typ == IntExpr_type) {
+		int n = (int)expr.obj;
+		println('INT $n');
+	}
+	else if (expr.typ == BoolExpr_type) {
+		int b = (bool)expr.obj;
+		println('BOOL $b');
+	}
+}
+*/