Skip to content
GitLab
Commit 1f63c659 authored by johnvg@science.ru.nl's avatar johnvg@science.ru.nl
Browse files

inline abc code from definition modules as well (as from system modules)

parent 26de41e7
Hide whitespace changes
Inline Side-by-side
backendC/CleanCompilerSources/codegen2.c
View file @ 1f63c659
......@@ -2615,8 +2615,8 @@ static void FillSymbol (Node node,SymbDef sdef,int *asp_p,int *bsp_p,NodeId upda
*asp_p-=a_size;
*bsp_p-=b_size;
if (! (sdef->sdef_kind==SYSRULE &&
(sdef->sdef_mark & SDEF_DEFRULE_ABC_CODE)!=0 && sdef->sdef_abc_code!=NULL && sdef->sdef_abc_code->instr_this[0]!='.'))
if (! ((sdef->sdef_mark & SDEF_DEFRULE_ABC_CODE)!=0 && (sdef->sdef_kind==SYSRULE || sdef->sdef_kind==DEFRULE)
&& sdef->sdef_abc_code!=NULL && sdef->sdef_abc_code->instr_this[0]!='.'))
{
cleanup_stack (asp_p,bsp_p,a_size,b_size,&code_gen_node_ids_p->a_node_ids,&code_gen_node_ids_p->b_node_ids,
&code_gen_node_ids_p->free_node_ids,code_gen_node_ids_p->moved_node_ids_l,
......@@ -2640,8 +2640,8 @@ static void FillSymbol (Node node,SymbDef sdef,int *asp_p,int *bsp_p,NodeId upda
*asp_p-=a_size+1;
*bsp_p-=b_size;
if (! (sdef->sdef_kind==SYSRULE &&
(sdef->sdef_mark & SDEF_DEFRULE_ABC_CODE)!=0 && sdef->sdef_abc_code!=NULL && sdef->sdef_abc_code->instr_this[0]!='.'))
if (! ((sdef->sdef_mark & SDEF_DEFRULE_ABC_CODE)!=0 && (sdef->sdef_kind==SYSRULE || sdef->sdef_kind==DEFRULE)
&& sdef->sdef_abc_code!=NULL && sdef->sdef_abc_code->instr_this[0]!='.'))
{
cleanup_stack (asp_p,bsp_p,a_size+1,b_size,&code_gen_node_ids_p->a_node_ids,&code_gen_node_ids_p->b_node_ids,
&code_gen_node_ids_p->free_node_ids,code_gen_node_ids_p->moved_node_ids_l,
......@@ -2663,8 +2663,8 @@ static void FillSymbol (Node node,SymbDef sdef,int *asp_p,int *bsp_p,NodeId upda
*asp_p-=a_size;
*bsp_p-=b_size;
if (! (sdef->sdef_kind==SYSRULE &&
(sdef->sdef_mark & SDEF_DEFRULE_ABC_CODE)!=0 && sdef->sdef_abc_code!=NULL && sdef->sdef_abc_code->instr_this[0]!='.'))
if (! ((sdef->sdef_mark & SDEF_DEFRULE_ABC_CODE)!=0 && (sdef->sdef_kind==SYSRULE || sdef->sdef_kind==DEFRULE)
&& sdef->sdef_abc_code!=NULL && sdef->sdef_abc_code->instr_this[0]!='.'))
{
cleanup_stack (asp_p,bsp_p,a_size,b_size,&code_gen_node_ids_p->a_node_ids,&code_gen_node_ids_p->b_node_ids,
&code_gen_node_ids_p->free_node_ids,code_gen_node_ids_p->moved_node_ids_l,
......@@ -4991,8 +4991,8 @@ static void FillUniqueNodeWithNode (NodeP update_node,int *asp_p,int *bsp_p,Code
*asp_p-=a_size;
*bsp_p-=b_size;
if (! (sdef->sdef_kind==SYSRULE &&
(sdef->sdef_mark & SDEF_DEFRULE_ABC_CODE)!=0 && sdef->sdef_abc_code!=NULL && sdef->sdef_abc_code->instr_this[0]!='.'))
if (! ((sdef->sdef_mark & SDEF_DEFRULE_ABC_CODE)!=0 && (sdef->sdef_kind==SYSRULE || sdef->sdef_kind==DEFRULE)
&& sdef->sdef_abc_code!=NULL && sdef->sdef_abc_code->instr_this[0]!='.'))
{
cleanup_stack (asp_p,bsp_p,a_size,b_size,&code_gen_node_ids_p->a_node_ids,&code_gen_node_ids_p->b_node_ids,
&code_gen_node_ids_p->free_node_ids,code_gen_node_ids_p->moved_node_ids_l,
......
Supports Markdown
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