Skip to content
Projects
Groups
Snippets
Help
This project
Loading...
Sign in / Register
Toggle navigation
R
riscv-gcc-1
Overview
Overview
Details
Activity
Cycle Analytics
Repository
Repository
Files
Commits
Branches
Tags
Contributors
Graph
Compare
Charts
Issues
0
Issues
0
List
Board
Labels
Milestones
Merge Requests
0
Merge Requests
0
CI / CD
CI / CD
Pipelines
Jobs
Schedules
Charts
Wiki
Wiki
Snippets
Snippets
Members
Members
Collapse sidebar
Close sidebar
Activity
Graph
Charts
Create a new issue
Jobs
Commits
Issue Boards
Open sidebar
lvzhengyang
riscv-gcc-1
Commits
14886ab7
Commit
14886ab7
authored
May 18, 2004
by
Jeff Law
Committed by
Jeff Law
May 18, 2004
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
* tree-ssa-phiopt.c: Fix various formatting issues.
From-SVN: r81995
parent
81f4be3c
Hide whitespace changes
Inline
Side-by-side
Showing
2 changed files
with
80 additions
and
79 deletions
+80
-79
gcc/ChangeLog
+4
-0
gcc/tree-ssa-phiopt.c
+76
-79
No files found.
gcc/ChangeLog
View file @
14886ab7
2004-05-18 Jeff Law <law@redhat.com>
* tree-ssa-phiopt.c: Fix various formatting issues.
2004-05-18 Steven Bosscher <stevenb@suse.de>
2004-05-18 Steven Bosscher <stevenb@suse.de>
* config/s390/s390.c (s390_expand_movstr, s390_expand_clrstr,
* config/s390/s390.c (s390_expand_movstr, s390_expand_clrstr,
...
...
gcc/tree-ssa-phiopt.c
View file @
14886ab7
...
@@ -37,8 +37,8 @@ Software Foundation, 59 Temple Place - Suite 330, Boston, MA
...
@@ -37,8 +37,8 @@ Software Foundation, 59 Temple Place - Suite 330, Boston, MA
static
void
tree_ssa_phiopt
(
void
);
static
void
tree_ssa_phiopt
(
void
);
static
bool
conditional_replacement
(
basic_block
bb
,
tree
phi
,
tree
arg0
,
static
bool
conditional_replacement
(
basic_block
bb
,
tree
phi
,
tree
arg0
,
tree
arg1
);
tree
arg1
);
/* This pass eliminates PHI nodes which can be trivially implemented as
/* This pass eliminates PHI nodes which can be trivially implemented as
an assignment from a conditional expression. ie if we have something
an assignment from a conditional expression. ie if we have something
like:
like:
...
@@ -49,16 +49,16 @@ static bool conditional_replacement (basic_block bb, tree phi, tree arg0,
...
@@ -49,16 +49,16 @@ static bool conditional_replacement (basic_block bb, tree phi, tree arg0,
bb2:
bb2:
x = PHI (0 (bb1), 1 (bb0)
x = PHI (0 (bb1), 1 (bb0)
We can rewrite that as:
We can rewrite that as:
bb0:
bb0:
bb1:
bb1:
bb2:
bb2:
x = cond;
x = cond;
bb1 will become unreachable and bb0 and bb2 will almost always
bb1 will become unreachable and bb0 and bb2 will almost always
be merged into a single block. This occurs often due to gimplification
be merged into a single block. This occurs often due to gimplification
of conditionals. */
of conditionals. */
static
void
static
void
tree_ssa_phiopt
(
void
)
tree_ssa_phiopt
(
void
)
...
@@ -77,19 +77,18 @@ tree_ssa_phiopt (void)
...
@@ -77,19 +77,18 @@ tree_ssa_phiopt (void)
phi
=
phi_nodes
(
bb
);
phi
=
phi_nodes
(
bb
);
if
(
phi
&&
TREE_CHAIN
(
phi
)
==
NULL
if
(
phi
&&
TREE_CHAIN
(
phi
)
==
NULL
&&
PHI_NUM_ARGS
(
phi
)
==
2
)
&&
PHI_NUM_ARGS
(
phi
)
==
2
)
{
{
arg0
=
PHI_ARG_DEF
(
phi
,
0
);
arg0
=
PHI_ARG_DEF
(
phi
,
0
);
arg1
=
PHI_ARG_DEF
(
phi
,
1
);
arg1
=
PHI_ARG_DEF
(
phi
,
1
);
/* Do the replacement of conditional if it can be done. */
/* Do the replacement of conditional if it can be done. */
if
(
conditional_replacement
(
bb
,
phi
,
arg0
,
arg1
))
if
(
conditional_replacement
(
bb
,
phi
,
arg0
,
arg1
))
{
{
/* We have done the replacement so we need to rebuild the cfg. */
/* We have done the replacement so we need to rebuild the cfg. */
removed_phis
=
true
;
removed_phis
=
true
;
continue
;
continue
;
}
}
}
}
}
}
/* If we removed any PHIs, then we have unreachable blocks and blocks
/* If we removed any PHIs, then we have unreachable blocks and blocks
...
@@ -98,10 +97,11 @@ tree_ssa_phiopt (void)
...
@@ -98,10 +97,11 @@ tree_ssa_phiopt (void)
cleanup_tree_cfg
();
cleanup_tree_cfg
();
}
}
/* The function conditional_replacement does the main work of doing the conditional
/* The function conditional_replacement does the main work of doing the
replacement. Return true if the replacement is done. Otherwise return false.
conditional replacement. Return true if the replacement is done.
bb is the basic block where the replacement is going to be done on. arg0
Otherwise return false.
is argument 0 from the phi. Likewise for arg1. */
BB is the basic block where the replacement is going to be done on. ARG0
is argument 0 from PHI. Likewise for ARG1. */
static
bool
static
bool
conditional_replacement
(
basic_block
bb
,
tree
phi
,
tree
arg0
,
tree
arg1
)
conditional_replacement
(
basic_block
bb
,
tree
phi
,
tree
arg0
,
tree
arg1
)
...
@@ -116,7 +116,7 @@ conditional_replacement (basic_block bb, tree phi, tree arg0, tree arg1)
...
@@ -116,7 +116,7 @@ conditional_replacement (basic_block bb, tree phi, tree arg0, tree arg1)
tree
new_var
=
NULL
;
tree
new_var
=
NULL
;
/* The PHI arguments have the constants 0 and 1, then convert
/* The PHI arguments have the constants 0 and 1, then convert
it to the conditional. */
it to the conditional. */
if
((
integer_zerop
(
arg0
)
&&
integer_onep
(
arg1
))
if
((
integer_zerop
(
arg0
)
&&
integer_onep
(
arg1
))
||
(
integer_zerop
(
arg1
)
&&
integer_onep
(
arg0
)))
||
(
integer_zerop
(
arg1
)
&&
integer_onep
(
arg0
)))
;
;
...
@@ -124,8 +124,8 @@ conditional_replacement (basic_block bb, tree phi, tree arg0, tree arg1)
...
@@ -124,8 +124,8 @@ conditional_replacement (basic_block bb, tree phi, tree arg0, tree arg1)
return
false
;
return
false
;
/* One of the alternatives must come from a block ending with
/* One of the alternatives must come from a block ending with
a COND_EXPR. The other block must be entirely empty, except
a COND_EXPR. The other block must be entirely empty, except
for labels. */
for labels. */
last0
=
last_stmt
(
bb
->
pred
->
src
);
last0
=
last_stmt
(
bb
->
pred
->
src
);
last1
=
last_stmt
(
bb
->
pred
->
pred_next
->
src
);
last1
=
last_stmt
(
bb
->
pred
->
pred_next
->
src
);
if
(
last0
&&
TREE_CODE
(
last0
)
==
COND_EXPR
)
if
(
last0
&&
TREE_CODE
(
last0
)
==
COND_EXPR
)
...
@@ -142,7 +142,7 @@ conditional_replacement (basic_block bb, tree phi, tree arg0, tree arg1)
...
@@ -142,7 +142,7 @@ conditional_replacement (basic_block bb, tree phi, tree arg0, tree arg1)
return
false
;
return
false
;
/* COND_BLOCK must have precisely two successors. We indirectly
/* COND_BLOCK must have precisely two successors. We indirectly
verify that those successors are BB and OTHER_BLOCK. */
verify that those successors are BB and OTHER_BLOCK. */
if
(
!
cond_block
->
succ
if
(
!
cond_block
->
succ
||
!
cond_block
->
succ
->
succ_next
||
!
cond_block
->
succ
->
succ_next
||
cond_block
->
succ
->
succ_next
->
succ_next
||
cond_block
->
succ
->
succ_next
->
succ_next
...
@@ -151,8 +151,8 @@ conditional_replacement (basic_block bb, tree phi, tree arg0, tree arg1)
...
@@ -151,8 +151,8 @@ conditional_replacement (basic_block bb, tree phi, tree arg0, tree arg1)
return
false
;
return
false
;
/* OTHER_BLOCK must have a single predecessor which is COND_BLOCK,
/* OTHER_BLOCK must have a single predecessor which is COND_BLOCK,
OTHER_BLOCK must have a single successor which is BB and
OTHER_BLOCK must have a single successor which is BB and
OTHER_BLOCK must have no PHI nodes. */
OTHER_BLOCK must have no PHI nodes. */
if
(
!
other_block
->
pred
if
(
!
other_block
->
pred
||
other_block
->
pred
->
src
!=
cond_block
||
other_block
->
pred
->
src
!=
cond_block
||
other_block
->
pred
->
pred_next
||
other_block
->
pred
->
pred_next
...
@@ -165,19 +165,18 @@ conditional_replacement (basic_block bb, tree phi, tree arg0, tree arg1)
...
@@ -165,19 +165,18 @@ conditional_replacement (basic_block bb, tree phi, tree arg0, tree arg1)
/* OTHER_BLOCK must have no executable statements. */
/* OTHER_BLOCK must have no executable statements. */
bsi
=
bsi_start
(
other_block
);
bsi
=
bsi_start
(
other_block
);
while
(
!
bsi_end_p
(
bsi
)
while
(
!
bsi_end_p
(
bsi
)
&&
(
TREE_CODE
(
bsi_stmt
(
bsi
))
==
LABEL_EXPR
&&
(
TREE_CODE
(
bsi_stmt
(
bsi
))
==
LABEL_EXPR
||
IS_EMPTY_STMT
(
bsi_stmt
(
bsi
))))
||
IS_EMPTY_STMT
(
bsi_stmt
(
bsi
))))
bsi_next
(
&
bsi
);
bsi_next
(
&
bsi
);
if
(
!
bsi_end_p
(
bsi
))
if
(
!
bsi_end_p
(
bsi
))
return
false
;
return
false
;
/* If the condition is not a naked SSA_NAME and its type does not
/* If the condition is not a naked SSA_NAME and its type does not
match the type of the result, then we have to create a new
match the type of the result, then we have to create a new
variable to optimize this case as it would likely create
variable to optimize this case as it would likely create
non-gimple code when the condition was converted to the
non-gimple code when the condition was converted to the
result's type. */
result's type. */
cond
=
COND_EXPR_COND
(
last_stmt
(
cond_block
));
cond
=
COND_EXPR_COND
(
last_stmt
(
cond_block
));
result
=
PHI_RESULT
(
phi
);
result
=
PHI_RESULT
(
phi
);
if
(
TREE_CODE
(
cond
)
!=
SSA_NAME
if
(
TREE_CODE
(
cond
)
!=
SSA_NAME
...
@@ -189,13 +188,13 @@ conditional_replacement (basic_block bb, tree phi, tree arg0, tree arg1)
...
@@ -189,13 +188,13 @@ conditional_replacement (basic_block bb, tree phi, tree arg0, tree arg1)
}
}
/* If the condition was a naked SSA_NAME and the type is not the
/* If the condition was a naked SSA_NAME and the type is not the
same as the type of the result, then convert the type of the
same as the type of the result, then convert the type of the
condition. */
condition. */
if
(
!
lang_hooks
.
types_compatible_p
(
TREE_TYPE
(
cond
),
TREE_TYPE
(
result
)))
if
(
!
lang_hooks
.
types_compatible_p
(
TREE_TYPE
(
cond
),
TREE_TYPE
(
result
)))
cond
=
fold_convert
(
TREE_TYPE
(
result
),
cond
);
cond
=
fold_convert
(
TREE_TYPE
(
result
),
cond
);
/* We need to know which is the true edge and which is the false
/* We need to know which is the true edge and which is the false
edge so that we know when to invert the condition below. */
edge so that we know when to invert the condition below. */
extract_true_false_edges_from_block
(
cond_block
,
&
true_edge
,
&
false_edge
);
extract_true_false_edges_from_block
(
cond_block
,
&
true_edge
,
&
false_edge
);
/* Insert our new statement at the head of our block. */
/* Insert our new statement at the head of our block. */
...
@@ -205,43 +204,41 @@ conditional_replacement (basic_block bb, tree phi, tree arg0, tree arg1)
...
@@ -205,43 +204,41 @@ conditional_replacement (basic_block bb, tree phi, tree arg0, tree arg1)
{
{
tree
new1
;
tree
new1
;
if
(
TREE_CODE_CLASS
(
TREE_CODE
(
old_result
))
!=
'<'
)
if
(
TREE_CODE_CLASS
(
TREE_CODE
(
old_result
))
!=
'<'
)
return
false
;
return
false
;
new1
=
build
(
TREE_CODE
(
old_result
),
TREE_TYPE
(
result
),
new1
=
build
(
TREE_CODE
(
old_result
),
TREE_TYPE
(
result
),
TREE_OPERAND
(
old_result
,
0
),
TREE_OPERAND
(
old_result
,
0
),
TREE_OPERAND
(
old_result
,
1
));
TREE_OPERAND
(
old_result
,
1
));
new1
=
build
(
MODIFY_EXPR
,
TREE_TYPE
(
result
),
new1
=
build
(
MODIFY_EXPR
,
TREE_TYPE
(
result
),
new_var
,
new1
);
new_var
,
new1
);
bsi_insert_after
(
&
bsi
,
new1
,
BSI_NEW_STMT
);
bsi_insert_after
(
&
bsi
,
new1
,
BSI_NEW_STMT
);
}
}
/* At this point we know we have a COND_EXPR with two successors.
/* At this point we know we have a COND_EXPR with two successors.
One successor is BB, the other successor is an empty block which
One successor is BB, the other successor is an empty block which
falls through into BB.
falls through into BB.
There is a single PHI node at the join point (BB) and its arguments
are constants (0, 1).
So, given the condition COND, and the two PHI arguments, we can
There is a single PHI node at the join point (BB) and its arguments
rewrite this PHI into non-branching code:
are constants (0, 1).
dest = (COND) or dest = COND'
So, given the condition COND, and the two PHI arguments, we can
rewrite this PHI into non-branching code:
We use the condition as-is if the argument associated with the
dest = (COND) or dest = COND'
true edge has the value one or the argument associated with the
false edge as the value zero. Note that those conditions are not
the same since only one of the outgoing edges from the COND_EXPR
will directly reach BB and thus be associated with an argument. */
We use the condition as-is if the argument associated with the
true edge has the value one or the argument associated with the
false edge as the value zero. Note that those conditions are not
the same since only one of the outgoing edges from the COND_EXPR
will directly reach BB and thus be associated with an argument. */
if
((
PHI_ARG_EDGE
(
phi
,
0
)
==
true_edge
&&
integer_onep
(
arg0
))
if
((
PHI_ARG_EDGE
(
phi
,
0
)
==
true_edge
&&
integer_onep
(
arg0
))
||
(
PHI_ARG_EDGE
(
phi
,
0
)
==
false_edge
&&
integer_zerop
(
arg0
))
||
(
PHI_ARG_EDGE
(
phi
,
0
)
==
false_edge
&&
integer_zerop
(
arg0
))
||
(
PHI_ARG_EDGE
(
phi
,
1
)
==
true_edge
&&
integer_onep
(
arg1
))
||
(
PHI_ARG_EDGE
(
phi
,
1
)
==
true_edge
&&
integer_onep
(
arg1
))
||
(
PHI_ARG_EDGE
(
phi
,
1
)
==
false_edge
&&
integer_zerop
(
arg1
)))
||
(
PHI_ARG_EDGE
(
phi
,
1
)
==
false_edge
&&
integer_zerop
(
arg1
)))
{
{
new
=
build
(
MODIFY_EXPR
,
TREE_TYPE
(
PHI_RESULT
(
phi
)),
new
=
build
(
MODIFY_EXPR
,
TREE_TYPE
(
PHI_RESULT
(
phi
)),
PHI_RESULT
(
phi
),
cond
);
PHI_RESULT
(
phi
),
cond
);
}
}
else
else
{
{
...
@@ -254,35 +251,35 @@ conditional_replacement (basic_block bb, tree phi, tree arg0, tree arg1)
...
@@ -254,35 +251,35 @@ conditional_replacement (basic_block bb, tree phi, tree arg0, tree arg1)
return
false
;
return
false
;
/* If what we get back is not gimple try to create it as gimple by
/* If what we get back is not gimple try to create it as gimple by
using a temporary variable. */
using a temporary variable. */
if
(
is_gimple_cast
(
cond
)
if
(
is_gimple_cast
(
cond
)
&&
!
is_gimple_val
(
TREE_OPERAND
(
cond
,
0
)))
&&
!
is_gimple_val
(
TREE_OPERAND
(
cond
,
0
)))
{
{
tree
temp
=
TREE_OPERAND
(
cond
,
0
);
tree
temp
=
TREE_OPERAND
(
cond
,
0
);
tree
new_var_1
=
make_rename_temp
(
TREE_TYPE
(
temp
),
NULL
);
tree
new_var_1
=
make_rename_temp
(
TREE_TYPE
(
temp
),
NULL
);
new
=
build
(
MODIFY_EXPR
,
TREE_TYPE
(
new_var_1
),
new_var_1
,
temp
);
new
=
build
(
MODIFY_EXPR
,
TREE_TYPE
(
new_var_1
),
new_var_1
,
temp
);
bsi_insert_after
(
&
bsi
,
new
,
BSI_NEW_STMT
);
bsi_insert_after
(
&
bsi
,
new
,
BSI_NEW_STMT
);
cond
=
fold_convert
(
TREE_TYPE
(
result
),
new_var_1
);
cond
=
fold_convert
(
TREE_TYPE
(
result
),
new_var_1
);
}
}
if
(
TREE_CODE
(
cond
)
==
TRUTH_NOT_EXPR
if
(
TREE_CODE
(
cond
)
==
TRUTH_NOT_EXPR
&&
!
is_gimple_val
(
TREE_OPERAND
(
cond
,
0
)))
&&
!
is_gimple_val
(
TREE_OPERAND
(
cond
,
0
)))
return
false
;
return
false
;
new
=
build
(
MODIFY_EXPR
,
TREE_TYPE
(
PHI_RESULT
(
phi
)),
new
=
build
(
MODIFY_EXPR
,
TREE_TYPE
(
PHI_RESULT
(
phi
)),
PHI_RESULT
(
phi
),
cond
);
PHI_RESULT
(
phi
),
cond
);
}
}
bsi_insert_after
(
&
bsi
,
new
,
BSI_NEW_STMT
);
bsi_insert_after
(
&
bsi
,
new
,
BSI_NEW_STMT
);
/* Register our new statement as the defining statement for
/* Register our new statement as the defining statement for
the result. */
the result. */
SSA_NAME_DEF_STMT
(
PHI_RESULT
(
phi
))
=
new
;
SSA_NAME_DEF_STMT
(
PHI_RESULT
(
phi
))
=
new
;
/* Remove the now useless PHI node.
/* Remove the now useless PHI node.
We do not want to use remove_phi_node since that releases the
We do not want to use remove_phi_node since that releases the
SSA_NAME as well and the SSA_NAME is still being used. */
SSA_NAME as well and the SSA_NAME is still being used. */
release_phi_node
(
phi
);
release_phi_node
(
phi
);
bb_ann
(
bb
)
->
phi_nodes
=
NULL
;
bb_ann
(
bb
)
->
phi_nodes
=
NULL
;
...
@@ -308,10 +305,10 @@ conditional_replacement (basic_block bb, tree phi, tree arg0, tree arg1)
...
@@ -308,10 +305,10 @@ conditional_replacement (basic_block bb, tree phi, tree arg0, tree arg1)
if
(
dump_file
&&
(
dump_flags
&
TDF_DETAILS
))
if
(
dump_file
&&
(
dump_flags
&
TDF_DETAILS
))
fprintf
(
dump_file
,
fprintf
(
dump_file
,
"COND_EXPR in block %d and PHI in block %d converted to straightline code.
\n
"
,
"COND_EXPR in block %d and PHI in block %d converted to straightline code.
\n
"
,
cond_block
->
index
,
cond_block
->
index
,
bb
->
index
);
bb
->
index
);
/* Note that we optimized this PHI. */
/* Note that we optimized this PHI. */
return
true
;
return
true
;
}
}
...
...
Write
Preview
Markdown
is supported
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