Skip to content
GitLab
Menu
Projects
Groups
Snippets
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in
Toggle navigation
Menu
Open sidebar
clean-compiler-and-rts
compiler
Commits
4cd57cfd
Commit
4cd57cfd
authored
Aug 09, 2018
by
John van Groningen
Browse files
fix typo in name of function
parent
78e43bf1
Changes
1
Hide whitespace changes
Inline
Side-by-side
backendC/CleanCompilerSources/codegen3.c
View file @
4cd57cfd
...
...
@@ -1933,7 +1933,7 @@ static void generate_code_for_tail_call_modulo_cons (NodeP node_p,NodeId node_de
}
}
static
int
is_tail_call_modul
e
_cons_node
(
NodeP
node_p
)
static
int
is_tail_call_modul
o
_cons_node
(
NodeP
node_p
)
{
if
(
node_p
->
node_kind
==
NormalNode
&&
node_p
->
node_symbol
->
symb_kind
==
definition
){
SymbDef
sdef
;
...
...
@@ -2456,7 +2456,7 @@ int CodeRhsNodeDefs
if
(
arg_node_p
->
node_kind
==
FillUniqueNode
)
arg_node_p
=
arg_node_p
->
node_arguments
->
arg_node
;
if
(
is_tail_call_modul
e
_cons_node
(
arg_node_p
)
&&
(
arg_node_p
->
node_symbol
->
symb_def
->
sdef_rule
->
rule_mark
&
RULE_TAIL_MODULO_CONS_ENTRY_MASK
)){
if
(
is_tail_call_modul
o
_cons_node
(
arg_node_p
)
&&
(
arg_node_p
->
node_symbol
->
symb_def
->
sdef_rule
->
rule_mark
&
RULE_TAIL_MODULO_CONS_ENTRY_MASK
)){
arg_p2
=
arg_p
;
break
;
}
...
...
@@ -2486,7 +2486,7 @@ int CodeRhsNodeDefs
node_p
=
node_p
->
node_arguments
->
arg_node
;
}
if
(
!
(
node_def_id
->
nid_mark
&
ON_A_CYCLE_MASK
)
&&
is_tail_call_modul
e
_cons_node
(
node_p
)
if
(
!
(
node_def_id
->
nid_mark
&
ON_A_CYCLE_MASK
)
&&
is_tail_call_modul
o
_cons_node
(
node_p
)
&&
(
node_p
->
node_symbol
->
symb_def
->
sdef_rule
->
rule_mark
&
RULE_TAIL_MODULO_CONS_ENTRY_MASK
))
{
n_node_id_refs
=
node_def_id
->
nid_refcount
;
...
...
@@ -2843,7 +2843,7 @@ static int tail_call_modulo_cons_call (NodeP node_p,NodeDefP node_defs)
if
(
arg_node_p
->
node_kind
==
FillUniqueNode
)
arg_node_p
=
arg_node_p
->
node_arguments
->
arg_node
;
if
(
is_tail_call_modul
e
_cons_node
(
arg_node_p
))
if
(
is_tail_call_modul
o
_cons_node
(
arg_node_p
))
return
1
;
}
...
...
@@ -2865,7 +2865,7 @@ static int tail_call_modulo_cons_call (NodeP node_p,NodeDefP node_defs)
if
(
node_def_node_p
->
node_kind
==
FillUniqueNode
)
node_def_node_p
=
node_def_node_p
->
node_arguments
->
arg_node
;
if
(
!
(
node_def_id
->
nid_mark
&
ON_A_CYCLE_MASK
)
&&
is_tail_call_modul
e
_cons_node
(
node_def_node_p
)){
if
(
!
(
node_def_id
->
nid_mark
&
ON_A_CYCLE_MASK
)
&&
is_tail_call_modul
o
_cons_node
(
node_def_node_p
)){
int
n_node_id_refs
;
n_node_id_refs
=
node_def_id
->
nid_refcount
;
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment