Commit ce1dba91 authored by Maxime Perrotin's avatar Maxime Perrotin
Browse files

Cleanup code

parent 98ba8a1e
...@@ -791,7 +791,6 @@ void Generate_Ada_CallingStack(FV * fv) ...@@ -791,7 +791,6 @@ void Generate_Ada_CallingStack(FV * fv)
(void) ct; (void) ct;
count ++; count ++;
}) })
printf("FV: %s has %d calling threads\n", fv->name, count);
if (2 > count) if (2 > count)
return; return;
...@@ -896,7 +895,7 @@ void GLUE_Ada_Wrappers_Backend(FV * fv) ...@@ -896,7 +895,7 @@ void GLUE_Ada_Wrappers_Backend(FV * fv)
}); });
FOREACH (pi, Interface, fv->interfaces, { FOREACH (pi, Interface, fv->interfaces, {
if (synch == pi->synchronism) { if (synch == pi->synchronism) {
count_sync_pi ++; count_sync_pi ++;
} }
}); });
if (1 < count_ct && 0 < count_sync_pi) { if (1 < count_ct && 0 < count_sync_pi) {
......
...@@ -258,17 +258,7 @@ void GW_SDL_Interface(Interface * i) ...@@ -258,17 +258,7 @@ void GW_SDL_Interface(Interface * i)
void GW_SDL_Backend(FV * fv) void GW_SDL_Backend(FV * fv)
{ {
if (fv->system_ast->context->onlycv) return; if (fv->system_ast->context->onlycv) return;
// DEBUG CODE START
if ((sdl == fv->language || opengeode == fv->language)) {
printf("FV %s is in SDL\n", fv->name);
if (NULL == fv->instance_of) {
printf("Its instance_of is NULL\n");
}
else {
printf("It IS AN INSTANCE OF %s\n", fv->instance_of);
}
}
// DEBUG CODE END
if ((sdl == fv->language || opengeode == fv->language)) { if ((sdl == fv->language || opengeode == fv->language)) {
Create_New_SDL_Structure(fv); Create_New_SDL_Structure(fv);
FOREACH(i, Interface, fv->interfaces, { FOREACH(i, Interface, fv->interfaces, {
......
...@@ -107,10 +107,6 @@ bool MultiInstance_SDL_Interface_Check(Interface * i, Interface * j) ...@@ -107,10 +107,6 @@ bool MultiInstance_SDL_Interface_Check(Interface * i, Interface * j)
int out_param_cnt_i = 0; int out_param_cnt_i = 0;
int out_param_cnt_j = 0; int out_param_cnt_j = 0;
if (!Compare_Interface (i, j)) {
result=false;
}
if (i->direction != j->direction) { if (i->direction != j->direction) {
result=false; result=false;
} }
...@@ -358,13 +354,13 @@ void Function_Semantic_Check(FV * fv) ...@@ -358,13 +354,13 @@ void Function_Semantic_Check(FV * fv)
Interface *def_i = FindInterface (definition, i->name); Interface *def_i = FindInterface (definition, i->name);
if (def_i == NULL) { if (def_i == NULL) {
ERROR ERROR
("** Error: Interface \"%s\" of instance \"%s\" not found from definition \"%s\".\n", ("[ERROR] Interface \"%s\" of instance \"%s\" not found from definition \"%s\".\n",
i->name, fv->name, definition->name); i->name, fv->name, definition->name);
add_error(); add_error();
} else { } else {
if (!MultiInstance_SDL_Interface_Check (i, def_i)) { if (!MultiInstance_SDL_Interface_Check (i, def_i)) {
ERROR ERROR
("** Error: Interface \"%s\" of instance \"%s\" not matching with definition \"%s\".\n", ("[ERROR] Interface \"%s\" of instance \"%s\" not matching with definition \"%s\".\n",
i->name, fv->name, definition->name); i->name, fv->name, definition->name);
add_error(); add_error();
} }
...@@ -378,7 +374,7 @@ void Function_Semantic_Check(FV * fv) ...@@ -378,7 +374,7 @@ void Function_Semantic_Check(FV * fv)
}); });
if (fv_intf_cnt != definition_intf_cnt) { if (fv_intf_cnt != definition_intf_cnt) {
ERROR ERROR
("** Error: Interface count mismatch between definition \"%s\" and instance \"%s\".\n", ("[ERROR] Interface count mismatch between definition \"%s\" and instance \"%s\".\n",
definition->name, fv->name); definition->name, fv->name);
add_error(); add_error();
} }
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment