:art: Union needs tuple_contains

diff --git a/src/parse/scan0.c b/src/parse/scan0.c
index 445a8b55f13aebce5cf5204b0c548e30d923b9d8..e260a9a037c1796b705d6af86a9b468747c5618b 100644 (file)
--- a/src/parse/scan0.c
+++ b/src/parse/scan0.c
@@ -211,6 +211,7 @@ ANN static Type union_type(const Env env, const Symbol s, const m_bool add) {
   t->e->owner = t->nspc->parent = env->curr;
   t->e->owner_class = env->class_def;
   t->e->parent = env->gwion->type[et_union];
+  t->e->tuple = new_tupleform(env->gwion->mp, NULL);
   add_type(env, env->curr, t);
   if(add)
     mk_class(env, t);