fix c++ linkage

diff --git a/src/import/import_checker.c b/src/import/import_checker.c
index 8e681269e19547739f44f833fd7135067c4e91b4..288480734691c97cbafb278db4e4464e3fbcdda8 100644 (file)
--- a/src/import/import_checker.c
+++ b/src/import/import_checker.c
@@ -201,11 +201,10 @@ ANN static Type_Decl *_str2td(const Gwion gwion, struct td_checker *tdc) {
 }
 
 ANN Type_Decl *str2td(const Gwion gwion, const m_str str, const loc_t pos) {
-puts(str);
   struct td_checker tdc = {.str = str, .pos = pos};
   DECL_OO(Type_Decl *, td, = _str2td(gwion, &tdc));
-//*(m_uint*)0 = 1;
   if(*tdc.str) {
+/*
     Type_Decl *tmp = td;
     while(tmp->next) tmp = tmp->next;
     while(!strcmp(tdc.str, "[]")) {
@@ -214,6 +213,7 @@ puts(str);
       else td->array->depth++;
       return td;
     }
+*/
     free_type_decl(gwion->mp, td);
     GWION_ERR_O(pos, "excedental character '%c' in '%s'", *tdc.str, str);
   }
@@ -258,7 +258,6 @@ ANEW ANN m_str type2str(const Gwion gwion, const Type t,
   const Type owner = t->info->value->from->owner_class;
   if (owner) {
     td_fullname(gwion->env, &text, owner);
-printf("%s %s\n", text.str, t->name);
     text_add(&text, ".");
   }
   text_add(&text, t->name);
@@ -269,7 +268,6 @@ ANEW ANN m_str tl2str(const Gwion gwion, const Type_List tl,
                       const loc_t pos NUSED) {
   struct td_info info = {.tl = tl, {.mp = gwion->mp}};
   CHECK_BO(td_info_run(gwion->env, &info));
-printf("=== %s ===\n", info.text.str);
   return info.text.str;
 }
 

diff --git a/src/lib/instr.c b/src/lib/instr.c
index afb2f687221b27c61a6ee3e365c35865620deb56..f9f546e44e6a903c1f1b200495c28932b31cdc14 100644 (file)
--- a/src/lib/instr.c
+++ b/src/lib/instr.c
@@ -39,9 +39,6 @@ ANN static Func_Def from_base(const Env env, struct dottmpl_ *const dt,
   def->base->tmpl->call = cpy_type_list(env->gwion->mp, dt->tl);
   def->base->tmpl->base = dt->base->base->tmpl->base;
   dt->def               = def;
-printf("%s %p\n", v->from->owner->name, v->from->owner_class);
-printf("%p %p\n", v->from->owner->parent, v->from->owner);
-printf("%p %p\n", v->from->owner->parent->parent, v->from->owner);
   dt->owner             = v->from->owner;
   dt->owner_class       = v->from->owner_class;
   return def;

diff --git a/src/lib/tmpl_info.c b/src/lib/tmpl_info.c
index efe18be31abaab8df1bc9842553e9899de3198de..65705889d525e96d4bbb5c1b44db33a754a278e5 100644 (file)
--- a/src/lib/tmpl_info.c
+++ b/src/lib/tmpl_info.c
@@ -44,11 +44,8 @@ ANN static inline size_t tmpl_set(struct tmpl_info *info, const m_str str) {
 ANN static ssize_t template_size(const Env env, struct tmpl_info *info) {
   DECL_OB(const m_str, str,
           = tl2str(env->gwion, info->td->types, info->td->pos));
-printf("ùù %s ùù\n", str);
   const size_t tmpl_sz = tmpl_set(info, str);
-puts("jeje");
   const m_str  base    = type2str(env->gwion, info->base, info->td->pos);
-printf("mm %s mm\n", str);
   return tmpl_sz + tmpl_set(info, base) + 4;
 //  return tmpl_sz + tmpl_set(info, info->base->name) + 4;
 }

diff --git a/src/parse/scan1.c b/src/parse/scan1.c
index 2777ce0de17265ac3096d3c3b844fee906199b52..b6c232c860f0167a03dc8a60d99693e668ce7a77 100644 (file)
--- a/src/parse/scan1.c
+++ b/src/parse/scan1.c
@@ -41,7 +41,6 @@ ANN static m_bool check_global(const Env env, const Type t, const loc_t pos) {
   if(!GET_FLAG(t, global) && !from_global_nspc(env, from->owner)) {
     if(from->owner_class && type_global(env, from->owner_class))
       return true;
-puts(t->name);
     gwerr_basic("can't use non-global type in a global class", NULL, NULL, env->name, pos, 0);
     gwerr_secondary("not declared global", from->filename, from->loc);
     const struct ValueFrom_ *ownerFrom = env->class_def->info->value->from;

diff --git a/src/parse/template.c b/src/parse/template.c
index 88403d4712a2611423b5a204bd90cf030fc3cf13..4052bec8a5f71d52459e4840adfe5a7aff8cfed3 100644 (file)
--- a/src/parse/template.c
+++ b/src/parse/template.c
@@ -69,7 +69,6 @@ ANN Tmpl *mk_tmpl(const Env env, const Tmpl *tm, const Type_List types) {
 
 static ANN Type scan_func(const Env env, const Type t, const Type_Decl *td) {
   DECL_OO(const m_str, tl_name, = tl2str(env->gwion, td->types, td->pos));
-printf("||| %s ||| \n", tl_name);
   const Symbol sym = func_symbol(env, t->info->value->from->owner->name,
                                  t->info->func->name, tl_name, 0);
   free_mstr(env->gwion->mp, tl_name);