:art: Remove useless gwion->base

diff --git a/include/gwiondata.h b/include/gwiondata.h
index 742e1c99e90306ab46bed40e0439db7166553f6a..c21a27ac5cc52f712add1e968f1e241ba4065b1d 100644 (file)
--- a/include/gwiondata.h
+++ b/include/gwiondata.h
@@ -8,7 +8,6 @@ typedef struct GwionData_ {
   struct Vector_ reserved;
   struct Map_ pass_map;
   struct Vector_ pass;
-  struct Gwion_ *base;
 } GwionData;
 
 ANN GwionData* new_gwiondata(MemPool);

diff --git a/src/parse/scan0.c b/src/parse/scan0.c
index a6b97d26f76fe714e543e008792fbdb3722fa0df..52f65fb93cdef58bc8598eb4ab7e06db6fd4bb60 100644 (file)
--- a/src/parse/scan0.c
+++ b/src/parse/scan0.c
@@ -254,7 +254,7 @@ ANN m_bool scan0_union_def(const Env env, const Union_Def udef) {
     nspc_add_value(nspc, udef->xid, udef->value);
     add_type(env, nspc, t);
     SET_FLAG(t, scan1 | ae_flag_union);
-    SET_FLAG(udef->value, checked | udef->flag);
+    SET_FLAG(udef->value, checked | udef->flag | ae_flag_pure);
     if(env->class_def && !GET_FLAG(udef, static)) {
       SET_FLAG(udef->value, member);
       SET_FLAG(udef, member);

diff --git a/src/vm/vm.c b/src/vm/vm.c
index b41fbc932fdb97d7e6567e8ba3be632518255ec2..5de6ce2b6cf8ceac1dbafbb8049837dd0c6c7908 100644 (file)
--- a/src/vm/vm.c
+++ b/src/vm/vm.c
@@ -82,7 +82,6 @@ ANN void vm_fork(const VM* src, const VM_Shred shred) {
   VM* vm = (shred->info->vm = gwion_cpy(src));
   shred->info->me = new_shred(shred, 0);
   shreduler_add(vm->shreduler, shred);
-  vm->gwion->data->base = src->gwion;
 }
 
 __attribute__((hot))