Commit c6c13b24 authored by Maxime Perrotin's avatar Maxime Perrotin

Last update of the ObjectGEODE glue file

parent 09da4d3f
...@@ -8,6 +8,8 @@ ...@@ -8,6 +8,8 @@
updated 20/04/2009 to disable in case "-onlycv" flag is set updated 20/04/2009 to disable in case "-onlycv" flag is set
update 09/2016 - This code is legacy - ObjectGEODE is discontinued and no
further support is ever expected. This file is not maintained.
*/ */
#define ID "$Id: build_sdl_glue.c 414 2009-12-04 16:21:52Z maxime1008 $" #define ID "$Id: build_sdl_glue.c 414 2009-12-04 16:21:52Z maxime1008 $"
...@@ -53,7 +55,9 @@ void close_gluefiles() ...@@ -53,7 +55,9 @@ void close_gluefiles()
close_file(&vm_if); close_file(&vm_if);
close_file(&hpredef); close_file(&hpredef);
close_file(&hpostdef); close_file(&hpostdef);
} void vm_if_preamble(FV * fv) }
void vm_if_preamble(FV * fv)
{ {
if (NULL == vm_if) if (NULL == vm_if)
return; return;
...@@ -272,7 +276,7 @@ void add_Immediate_RI_to_hpostdef(Interface * i) ...@@ -272,7 +276,7 @@ void add_Immediate_RI_to_hpostdef(Interface * i)
j = 1; j = 1;
while (NULL != v_local) { while (NULL != v_local) {
fprintf(hpostdef, "ENCODE_SYNC_%s_%s(IN_%s_%s,param_in_%d)\\\n", fprintf(hpostdef, "ENCODE_SYNC_%s_%s(IN_%s_%s,param_in_%d)\\\n",
BINARY_ENCODING(v_local->value), /*(PARAM_ENCODING(v_local)), */ BINARY_ENCODING(v_local->value),
(PARAM_TYPE(v_local)), (PARAM_TYPE(v_local)),
(i->name), (PARAM_NAME(v_local)), j ); (i->name), (PARAM_NAME(v_local)), j );
j++; j++;
...@@ -318,7 +322,7 @@ void add_Immediate_RI_to_hpostdef(Interface * i) ...@@ -318,7 +322,7 @@ void add_Immediate_RI_to_hpostdef(Interface * i)
while (NULL != v_local) { while (NULL != v_local) {
fprintf(hpostdef, fprintf(hpostdef,
"DECODE_%s_%s(OUT_%s_%s,OUT_%s_%s_len,param_out_%d)\\\n", "DECODE_%s_%s(OUT_%s_%s,OUT_%s_%s_len,param_out_%d)\\\n",
BINARY_ENCODING(v_local->value), /*(PARAM_ENCODING(v_local)), */ BINARY_ENCODING(v_local->value),
(PARAM_TYPE(v_local)), (PARAM_TYPE(v_local)),
(i->name), (PARAM_NAME(v_local)), (i->name), (i->name), (PARAM_NAME(v_local)), (i->name),
(PARAM_NAME(v_local)), j ); (PARAM_NAME(v_local)), j );
......
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