:art: Remove useless addr

diff --git a/ast b/ast
index 126cdeb142c8764f331c530ad0cf15494d129c73..058ef7b425c5122290f3b5d49939f5ba1f40dd21 160000 (submodule)
--- a/ast
+++ b/ast
@@ -1 +1 @@
-Subproject commit 126cdeb142c8764f331c530ad0cf15494d129c73
+Subproject commit 058ef7b425c5122290f3b5d49939f5ba1f40dd21

diff --git a/include/import/item.h b/include/import/item.h
index cc5d3e2283322d7be534bd0142a71389b4990e67..48ba820fa4b17f5f668fbbf926a9ebcfa727c795 100644 (file)
--- a/include/import/item.h
+++ b/include/import/item.h
@@ -2,7 +2,7 @@
 #define __IMPORT_ITEM
 
 ANN m_int gwi_item_ini(const Gwi gwi, const m_str type, const m_str name);
-ANN2(1) m_int gwi_item_end(const Gwi gwi, const ae_flag flag, const m_uint* addr);
-#define gwi_item_end(a, b, c) gwi_item_end(a, (const ae_flag)(b), (const m_uint*)c)
+ANN2(1) m_int gwi_item_end(const Gwi gwi, const ae_flag flag, m_uint *const addr);
+#define gwi_item_end(a, b, c) gwi_item_end(a, (const ae_flag)(b), (m_uint*const)c)
 ANN void ck_clean_item(MemPool, ImportCK*);
 #endif

diff --git a/src/import/import_item.c b/src/import/import_item.c
index 3639445f1461a367a94640877f7ff1583d857d71..25bcb7cfb55c96036d2acc846f1f8ec1afc5a043 100644 (file)
--- a/src/import/import_item.c
+++ b/src/import/import_item.c
@@ -30,15 +30,15 @@ ANN static m_int gwi_item_tmpl(const Gwi gwi) {
 }
 
 #undef gwi_item_end
-ANN2(1) m_int gwi_item_end(const Gwi gwi, const ae_flag flag, const m_uint* addr) {
+ANN2(1) m_int gwi_item_end(const Gwi gwi, const ae_flag flag, m_uint *const addr) {
   CHECK_BB(ck_ok(gwi, ck_item))
   const Env env = gwi->gwion->env;
-  gwi->ck->exp->d.exp_decl.list->self->addr = (m_uint*)addr;
   gwi->ck->exp->d.exp_decl.td->flag = flag;
   if(env->class_def && tflag(env->class_def, tflag_tmpl))
     return gwi_item_tmpl(gwi);
   CHECK_BB(traverse_exp(env, gwi->ck->exp))
   const Value value = gwi->ck->exp->d.exp_decl.list->self->value;
+  value->d.ptr = addr;
   set_vflag(value, vflag_builtin);
   if(!env->class_def)
     SET_FLAG(value, global);

diff --git a/src/parse/scan1.c b/src/parse/scan1.c
index 03cc838d4f5e611ab53a3ce017f06e95eeae4aa6..4c6c6c9dfb8cd3ca1bb8dada17f447fca5fc8592 100644 (file)
--- a/src/parse/scan1.c
+++ b/src/parse/scan1.c
@@ -109,7 +109,6 @@ ANN static m_bool scan1_decl(const Env env, const Exp_Decl* decl) {
         tuple_contains(env, v);
     } else if(!env->scope->depth)
       set_vflag(v, vflag_fglobal);// file global
-    v->d.ptr = var->addr;
     if(GET_FLAG(decl->td, global))
       SET_FLAG(v, global);
     if(!env->scope->depth)