ref: 60179fff24f6737b3ad6ca3e0e2c332fe8a20c85
parent: bf98d0b81d9ddc5d77dc7c345f9577e41ef7aced
author: Ori Bernstein <[email protected]>
date: Wed Jun 27 21:38:53 EDT 2012
Add test for union creation
--- /dev/null
+++ b/test/mkunion.myr
@@ -1,0 +1,11 @@
+type u = union
+ `Some int
+ `None
+;;
+
+const main = {+ var v
+
+ v = `Some 123
+ -> 0
+}
--- a/test/tests
+++ b/test/tests
@@ -39,6 +39,7 @@
B generic E 42
B sizeof E 4
B gsizeof E 5
+B mkunion E 0
F declmismatch
F infermismatch
F flow