2004-05-13 08:41:07 +02:00
|
|
|
/* SSA-PRE for trees.
|
|
|
|
Copyright (C) 2001, 2002, 2003, 2004 Free Software Foundation, Inc.
|
2004-06-12 02:18:35 +02:00
|
|
|
Contributed by Daniel Berlin <dan@dberlin.org> and Steven Bosscher
|
|
|
|
<stevenb@suse.de>
|
2004-05-13 08:41:07 +02:00
|
|
|
|
|
|
|
This file is part of GCC.
|
|
|
|
|
|
|
|
GCC is free software; you can redistribute it and/or modify
|
|
|
|
it under the terms of the GNU General Public License as published by
|
|
|
|
the Free Software Foundation; either version 2, or (at your option)
|
|
|
|
any later version.
|
|
|
|
|
|
|
|
GCC is distributed in the hope that it will be useful,
|
|
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
|
|
GNU General Public License for more details.
|
|
|
|
|
|
|
|
You should have received a copy of the GNU General Public License
|
|
|
|
along with GCC; see the file COPYING. If not, write to
|
|
|
|
the Free Software Foundation, 59 Temple Place - Suite 330,
|
|
|
|
Boston, MA 02111-1307, USA. */
|
2004-06-23 22:12:44 +02:00
|
|
|
|
2004-05-13 08:41:07 +02:00
|
|
|
#include "config.h"
|
|
|
|
#include "system.h"
|
|
|
|
#include "coretypes.h"
|
|
|
|
#include "tm.h"
|
|
|
|
#include "errors.h"
|
|
|
|
#include "ggc.h"
|
|
|
|
#include "tree.h"
|
|
|
|
#include "basic-block.h"
|
|
|
|
#include "diagnostic.h"
|
|
|
|
#include "tree-inline.h"
|
|
|
|
#include "tree-flow.h"
|
tree-gimple.c: Rename from tree-simple.c.
* tree-gimple.c: Rename from tree-simple.c.
* tree-gimple.h: Rename from tree-simple.h.
* c-gimplify.c: Rename from c-simplify.c
* Makefile.in, c-decl.c, gimple-low.c, gimplify.c,
langhooks.c, tree-alias-ander.c, tree-alias-common.c,
tree-complex.c, tree-dfa.c, tree-flow.h, tree-inline.c,
tree-into-ssa.c, tree-iterator.c, tree-mudflap.c,
tree-nested.c, tree-nomudflap.c, tree-outof-ssa.c, tree-sra.c,
tree-ssa-alias.c, tree-ssa-ccp.c, tree-ssa-copyrename.c,
tree-ssa-dce.c, tree-ssa-live.c, tree-ssa-pre.c, tree-ssa.c:
Update.
cp/ChangeLog
* cp-gimplify.c: Rename from cp-simplify.c.
* Make-lang.in, optimize.c: Update.
fortran/ChangeLog
* Make-lang.in, f95-lang.c, trans-array.c, trans-decl.c,
trans-expr.c, trans-intrinsic.c, trans-io.c, trans-stmt.c,
trans.c: Rename tree-simple.[ch] to tree-gimple.[ch].
java/ChangeLog
* Make-lang.in, expr.c, java-gimplify.c: Rename
tree-simple.[ch] to tree-gimple.[ch].
From-SVN: r81829
2004-05-14 04:29:32 +02:00
|
|
|
#include "tree-gimple.h"
|
2004-05-13 08:41:07 +02:00
|
|
|
#include "tree-dump.h"
|
|
|
|
#include "timevar.h"
|
|
|
|
#include "fibheap.h"
|
|
|
|
#include "hashtab.h"
|
|
|
|
#include "tree-iterator.h"
|
|
|
|
#include "real.h"
|
|
|
|
#include "alloc-pool.h"
|
|
|
|
#include "tree-pass.h"
|
|
|
|
#include "flags.h"
|
2004-06-12 02:18:35 +02:00
|
|
|
#include "splay-tree.h"
|
|
|
|
#include "bitmap.h"
|
|
|
|
#include "langhooks.h"
|
2004-06-23 22:12:44 +02:00
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
/* TODO:
|
2004-05-13 08:41:07 +02:00
|
|
|
|
2004-07-02 20:47:29 +02:00
|
|
|
1. Avail sets can be shared by making an avail_find_leader that
|
2004-06-12 02:18:35 +02:00
|
|
|
walks up the dominator tree and looks in those avail sets.
|
|
|
|
This might affect code optimality, it's unclear right now.
|
2004-07-02 20:47:29 +02:00
|
|
|
2. Load motion can be performed by value numbering the loads the
|
2004-06-12 02:18:35 +02:00
|
|
|
same as we do other expressions. This requires iterative
|
|
|
|
hashing the vuses into the values. Right now we simply assign
|
|
|
|
a new value every time we see a statement with a vuse.
|
2004-07-02 20:47:29 +02:00
|
|
|
3. Strength reduction can be performed by anticipating expressions
|
2004-06-12 02:18:35 +02:00
|
|
|
we can repair later on.
|
2004-07-02 20:47:29 +02:00
|
|
|
4. Our canonicalization of expressions during lookups don't take
|
2004-06-21 23:57:33 +02:00
|
|
|
constants into account very well. In particular, we don't fold
|
|
|
|
anywhere, so we can get situations where we stupidly think
|
|
|
|
something is a new value (a + 1 + 1 vs a + 2). This is somewhat
|
|
|
|
expensive to fix, but it does expose a lot more eliminations.
|
|
|
|
It may or not be worth it, depending on how critical you
|
|
|
|
consider PRE vs just plain GRE.
|
2004-06-12 02:18:35 +02:00
|
|
|
*/
|
|
|
|
|
|
|
|
/* For ease of terminology, "expression node" in the below refers to
|
|
|
|
every expression node but MODIFY_EXPR, because MODIFY_EXPR's represent
|
|
|
|
the actual statement containing the expressions we care about, and
|
|
|
|
we cache the value number by putting it in the expression. */
|
|
|
|
|
|
|
|
/* Basic algorithm
|
2004-05-13 08:41:07 +02:00
|
|
|
|
2004-06-21 23:57:33 +02:00
|
|
|
First we walk the statements to generate the AVAIL sets, the
|
|
|
|
EXP_GEN sets, and the tmp_gen sets. EXP_GEN sets represent the
|
|
|
|
generation of values/expressions by a given block. We use them
|
|
|
|
when computing the ANTIC sets. The AVAIL sets consist of
|
|
|
|
SSA_NAME's that represent values, so we know what values are
|
|
|
|
available in what blocks. AVAIL is a forward dataflow problem. In
|
|
|
|
SSA, values are never killed, so we don't need a kill set, or a
|
|
|
|
fixpoint iteration, in order to calculate the AVAIL sets. In
|
|
|
|
traditional parlance, AVAIL sets tell us the downsafety of the
|
2004-06-12 02:18:35 +02:00
|
|
|
expressions/values.
|
2004-05-13 08:41:07 +02:00
|
|
|
|
2004-06-21 23:57:33 +02:00
|
|
|
Next, we generate the ANTIC sets. These sets represent the
|
|
|
|
anticipatable expressions. ANTIC is a backwards dataflow
|
|
|
|
problem.An expression is anticipatable in a given block if it could
|
|
|
|
be generated in that block. This means that if we had to perform
|
|
|
|
an insertion in that block, of the value of that expression, we
|
|
|
|
could. Calculating the ANTIC sets requires phi translation of
|
|
|
|
expressions, because the flow goes backwards through phis. We must
|
|
|
|
iterate to a fixpoint of the ANTIC sets, because we have a kill
|
|
|
|
set. Even in SSA form, values are not live over the entire
|
|
|
|
function, only from their definition point onwards. So we have to
|
|
|
|
remove values from the ANTIC set once we go past the definition
|
|
|
|
point of the leaders that make them up.
|
|
|
|
compute_antic/compute_antic_aux performs this computation.
|
2004-06-12 02:18:35 +02:00
|
|
|
|
|
|
|
Third, we perform insertions to make partially redundant
|
|
|
|
expressions fully redundant.
|
|
|
|
|
|
|
|
An expression is partially redundant (excluding partial
|
|
|
|
anticipation) if:
|
|
|
|
|
|
|
|
1. It is AVAIL in some, but not all, of the predecessors of a
|
|
|
|
given block.
|
|
|
|
2. It is ANTIC in all the predecessors.
|
|
|
|
|
|
|
|
In order to make it fully redundant, we insert the expression into
|
|
|
|
the predecessors where it is not available, but is ANTIC.
|
|
|
|
insert/insert_aux performs this insertion.
|
|
|
|
|
|
|
|
Fourth, we eliminate fully redundant expressions.
|
|
|
|
This is a simple statement walk that replaces redundant
|
|
|
|
calculations with the now available values. */
|
|
|
|
|
|
|
|
/* Representations of value numbers:
|
|
|
|
|
|
|
|
Value numbers are represented using the "value handle" approach.
|
|
|
|
This means that each SSA_NAME (and for other reasons to be
|
2004-06-21 23:57:33 +02:00
|
|
|
disclosed in a moment, expression nodes) has a value handle that
|
|
|
|
can be retrieved through get_value_handle. This value handle, *is*
|
|
|
|
the value number of the SSA_NAME. You can pointer compare the
|
|
|
|
value handles for equivalence purposes.
|
2004-06-12 02:18:35 +02:00
|
|
|
|
|
|
|
For debugging reasons, the value handle is internally more than
|
|
|
|
just a number, it is a VAR_DECL named "value.x", where x is a
|
|
|
|
unique number for each value number in use. This allows
|
|
|
|
expressions with SSA_NAMES replaced by value handles to still be
|
|
|
|
pretty printed in a sane way. They simply print as "value.3 *
|
|
|
|
value.5", etc.
|
|
|
|
|
|
|
|
Expression nodes have value handles associated with them as a
|
|
|
|
cache. Otherwise, we'd have to look them up again in the hash
|
|
|
|
table This makes significant difference (factor of two or more) on
|
2004-06-21 23:57:33 +02:00
|
|
|
some test cases. They can be thrown away after the pass is
|
|
|
|
finished. */
|
2004-06-12 02:18:35 +02:00
|
|
|
|
|
|
|
/* Representation of expressions on value numbers:
|
|
|
|
|
|
|
|
In some portions of this code, you will notice we allocate "fake"
|
|
|
|
analogues to the expression we are value numbering, and replace the
|
|
|
|
operands with the values of the expression. Since we work on
|
|
|
|
values, and not just names, we canonicalize expressions to value
|
|
|
|
expressions for use in the ANTIC sets, the EXP_GEN set, etc.
|
|
|
|
|
|
|
|
This is theoretically unnecessary, it just saves a bunch of
|
|
|
|
repeated get_value_handle and find_leader calls in the remainder of
|
|
|
|
the code, trading off temporary memory usage for speed. The tree
|
|
|
|
nodes aren't actually creating more garbage, since they are
|
|
|
|
allocated in a special pools which are thrown away at the end of
|
|
|
|
this pass.
|
|
|
|
|
|
|
|
All of this also means that if you print the EXP_GEN or ANTIC sets,
|
|
|
|
you will see "value.5 + value.7" in the set, instead of "a_55 +
|
|
|
|
b_66" or something. The only thing that actually cares about
|
|
|
|
seeing the value leaders is phi translation, and it needs to be
|
|
|
|
able to find the leader for a value in an arbitrary block, so this
|
|
|
|
"value expression" form is perfect for it (otherwise you'd do
|
|
|
|
get_value_handle->find_leader->translate->get_value_handle->find_leader).*/
|
|
|
|
|
|
|
|
|
|
|
|
/* Representation of sets:
|
|
|
|
|
2004-07-02 20:47:29 +02:00
|
|
|
There are currently two types of sets used, hopefully to be unified soon.
|
|
|
|
The AVAIL sets do not need to be sorted in any particular order,
|
|
|
|
and thus, are simply represented as two bitmaps, one that keeps
|
|
|
|
track of values present in the set, and one that keeps track of
|
|
|
|
expressions present in the set.
|
|
|
|
|
|
|
|
The other sets are represented as doubly linked lists kept in topological
|
2004-06-12 02:18:35 +02:00
|
|
|
order, with an optional supporting bitmap of values present in the
|
2004-06-21 23:57:33 +02:00
|
|
|
set. The sets represent values, and the elements can be values or
|
|
|
|
expressions. The elements can appear in different sets, but each
|
|
|
|
element can only appear once in each set.
|
2004-06-12 02:18:35 +02:00
|
|
|
|
|
|
|
Since each node in the set represents a value, we also want to be
|
|
|
|
able to map expression, set pairs to something that tells us
|
|
|
|
whether the value is present is a set. We use a per-set bitmap for
|
|
|
|
that. The value handles also point to a linked list of the
|
|
|
|
expressions they represent via a tree annotation. This is mainly
|
|
|
|
useful only for debugging, since we don't do identity lookups. */
|
|
|
|
|
|
|
|
|
|
|
|
/* A value set element. Basically a single linked list of
|
2004-06-21 23:57:33 +02:00
|
|
|
expressions/values. */
|
2004-06-12 02:18:35 +02:00
|
|
|
typedef struct value_set_node
|
2004-05-13 08:41:07 +02:00
|
|
|
{
|
2004-06-17 14:53:33 +02:00
|
|
|
/* An expression. */
|
2004-06-12 02:18:35 +02:00
|
|
|
tree expr;
|
2004-06-17 14:53:33 +02:00
|
|
|
|
|
|
|
/* A pointer to the next element of the value set. */
|
2004-06-12 02:18:35 +02:00
|
|
|
struct value_set_node *next;
|
|
|
|
} *value_set_node_t;
|
2004-05-13 08:41:07 +02:00
|
|
|
|
|
|
|
|
2004-06-17 14:53:33 +02:00
|
|
|
/* A value set. This is a singly linked list of value_set_node
|
|
|
|
elements with a possible bitmap that tells us what values exist in
|
|
|
|
the set. This set must be kept in topologically sorted order. */
|
2004-06-12 02:18:35 +02:00
|
|
|
typedef struct value_set
|
|
|
|
{
|
2004-06-17 14:53:33 +02:00
|
|
|
/* The head of the list. Used for iterating over the list in
|
|
|
|
order. */
|
2004-06-12 02:18:35 +02:00
|
|
|
value_set_node_t head;
|
2004-06-17 14:53:33 +02:00
|
|
|
|
|
|
|
/* The tail of the list. Used for tail insertions, which are
|
|
|
|
necessary to keep the set in topologically sorted order because
|
|
|
|
of how the set is built. */
|
2004-06-12 02:18:35 +02:00
|
|
|
value_set_node_t tail;
|
2004-06-17 14:53:33 +02:00
|
|
|
|
|
|
|
/* The length of the list. */
|
2004-06-12 02:18:35 +02:00
|
|
|
size_t length;
|
2004-06-17 14:53:33 +02:00
|
|
|
|
|
|
|
/* True if the set is indexed, which means it contains a backing
|
|
|
|
bitmap for quick determination of whether certain values exist in the
|
|
|
|
set. */
|
2004-06-12 02:18:35 +02:00
|
|
|
bool indexed;
|
2004-06-17 14:53:33 +02:00
|
|
|
|
|
|
|
/* The bitmap of values that exist in the set. May be NULL in an
|
|
|
|
empty or non-indexed set. */
|
2004-06-12 02:18:35 +02:00
|
|
|
bitmap values;
|
2004-05-13 08:41:07 +02:00
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
} *value_set_t;
|
2004-05-13 08:41:07 +02:00
|
|
|
|
2004-07-02 20:47:29 +02:00
|
|
|
|
|
|
|
/* An unordered bitmap set. One bitmap tracks values, the other,
|
c-common.c, [...]: Fix comment formatting.
* c-common.c, c-decl.c, combine.c, defaults.h, fold-const.c,
gimplify.c, gthr-nks.h, hooks.c, lambda-code.c, lambda-mat.c,
stor-layout.c, target.h, tree-cfg.c, tree-chrec.c,
tree-if-conv.c, tree-inline.c, tree-into-ssa.c,
tree-mudflap.c, tree-optimize.c, tree-scalar-evolution.c,
tree-ssa-alias.c, tree-ssa-ccp.c, tree-ssa-dce.c,
tree-ssa-pre.c, tree-vectorizer.c, tree-vectorizer.h, tree.h,
vec.h: Fix comment formatting.
From-SVN: r87105
2004-09-05 18:05:06 +02:00
|
|
|
expressions. */
|
2004-07-02 20:47:29 +02:00
|
|
|
typedef struct bitmap_set
|
|
|
|
{
|
|
|
|
bitmap expressions;
|
|
|
|
bitmap values;
|
|
|
|
} *bitmap_set_t;
|
|
|
|
|
2004-07-05 00:51:36 +02:00
|
|
|
/* Sets that we need to keep track of. */
|
2004-06-12 02:18:35 +02:00
|
|
|
typedef struct bb_value_sets
|
2004-05-13 08:41:07 +02:00
|
|
|
{
|
2004-06-17 14:53:33 +02:00
|
|
|
/* The EXP_GEN set, which represents expressions/values generated in
|
|
|
|
a basic block. */
|
2004-06-12 02:18:35 +02:00
|
|
|
value_set_t exp_gen;
|
2004-06-17 14:53:33 +02:00
|
|
|
|
|
|
|
/* The PHI_GEN set, which represents PHI results generated in a
|
|
|
|
basic block. */
|
2004-07-05 00:51:36 +02:00
|
|
|
bitmap_set_t phi_gen;
|
2004-06-17 14:53:33 +02:00
|
|
|
|
2004-07-02 02:51:01 +02:00
|
|
|
/* The TMP_GEN set, which represents results/temporaries generated
|
2004-06-17 14:53:33 +02:00
|
|
|
in a basic block. IE the LHS of an expression. */
|
2004-07-05 00:51:36 +02:00
|
|
|
bitmap_set_t tmp_gen;
|
2004-06-17 14:53:33 +02:00
|
|
|
|
|
|
|
/* The AVAIL_OUT set, which represents which values are available in
|
|
|
|
a given basic block. */
|
2004-07-02 20:47:29 +02:00
|
|
|
bitmap_set_t avail_out;
|
2004-06-17 14:53:33 +02:00
|
|
|
|
|
|
|
/* The ANTIC_IN set, which represents which values are anticiptable
|
|
|
|
in a given basic block. */
|
2004-06-12 02:18:35 +02:00
|
|
|
value_set_t antic_in;
|
2004-06-17 14:53:33 +02:00
|
|
|
|
|
|
|
/* The NEW_SETS set, which is used during insertion to augment the
|
|
|
|
AVAIL_OUT set of blocks with the new insertions performed during
|
|
|
|
the current iteration. */
|
2004-07-05 00:51:36 +02:00
|
|
|
bitmap_set_t new_sets;
|
2004-06-12 02:18:35 +02:00
|
|
|
} *bb_value_sets_t;
|
|
|
|
|
|
|
|
#define EXP_GEN(BB) ((bb_value_sets_t) ((BB)->aux))->exp_gen
|
|
|
|
#define PHI_GEN(BB) ((bb_value_sets_t) ((BB)->aux))->phi_gen
|
|
|
|
#define TMP_GEN(BB) ((bb_value_sets_t) ((BB)->aux))->tmp_gen
|
|
|
|
#define AVAIL_OUT(BB) ((bb_value_sets_t) ((BB)->aux))->avail_out
|
|
|
|
#define ANTIC_IN(BB) ((bb_value_sets_t) ((BB)->aux))->antic_in
|
|
|
|
#define NEW_SETS(BB) ((bb_value_sets_t) ((BB)->aux))->new_sets
|
2004-05-13 08:41:07 +02:00
|
|
|
|
2004-06-17 14:53:33 +02:00
|
|
|
/* This structure is used to keep track of statistics on what
|
|
|
|
optimization PRE was able to perform. */
|
2004-06-12 02:18:35 +02:00
|
|
|
static struct
|
2004-05-13 08:41:07 +02:00
|
|
|
{
|
2004-06-17 14:53:33 +02:00
|
|
|
/* The number of RHS computations eliminated by PRE. */
|
2004-06-12 02:18:35 +02:00
|
|
|
int eliminations;
|
2004-06-17 14:53:33 +02:00
|
|
|
|
|
|
|
/* The number of new expressions/temporaries generated by PRE. */
|
2004-06-12 02:18:35 +02:00
|
|
|
int insertions;
|
2004-06-17 14:53:33 +02:00
|
|
|
|
|
|
|
/* The number of new PHI nodes added by PRE. */
|
2004-06-12 02:18:35 +02:00
|
|
|
int phis;
|
|
|
|
} pre_stats;
|
2004-05-13 08:41:07 +02:00
|
|
|
|
2004-07-02 20:47:29 +02:00
|
|
|
|
|
|
|
static tree bitmap_find_leader (bitmap_set_t, tree);
|
2004-06-12 02:18:35 +02:00
|
|
|
static tree find_leader (value_set_t, tree);
|
|
|
|
static void value_insert_into_set (value_set_t, tree);
|
2004-07-02 20:47:29 +02:00
|
|
|
static void bitmap_value_insert_into_set (bitmap_set_t, tree);
|
|
|
|
static void bitmap_value_replace_in_set (bitmap_set_t, tree);
|
2004-06-12 02:18:35 +02:00
|
|
|
static void insert_into_set (value_set_t, tree);
|
2004-07-02 20:47:29 +02:00
|
|
|
static void bitmap_set_copy (bitmap_set_t, bitmap_set_t);
|
|
|
|
static bool bitmap_set_contains_value (bitmap_set_t, tree);
|
|
|
|
static bitmap_set_t bitmap_set_new (void);
|
2004-06-12 02:18:35 +02:00
|
|
|
static value_set_t set_new (bool);
|
|
|
|
static bool is_undefined_value (tree);
|
2004-06-21 23:57:33 +02:00
|
|
|
static tree create_expression_by_pieces (basic_block, tree, tree);
|
2004-05-13 08:41:07 +02:00
|
|
|
|
2004-07-02 20:47:29 +02:00
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
/* We can add and remove elements and entries to and from sets
|
|
|
|
and hash tables, so we use alloc pools for them. */
|
2004-05-13 08:41:07 +02:00
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
static alloc_pool value_set_pool;
|
2004-07-02 20:47:29 +02:00
|
|
|
static alloc_pool bitmap_set_pool;
|
2004-06-12 02:18:35 +02:00
|
|
|
static alloc_pool value_set_node_pool;
|
|
|
|
static alloc_pool binary_node_pool;
|
|
|
|
static alloc_pool unary_node_pool;
|
2004-07-06 21:55:06 +02:00
|
|
|
static alloc_pool reference_node_pool;
|
2004-09-07 22:51:25 +02:00
|
|
|
static struct obstack grand_bitmap_obstack;
|
2004-05-13 08:41:07 +02:00
|
|
|
|
2004-07-22 18:39:49 +02:00
|
|
|
/* Set of blocks with statements that have had its EH information
|
|
|
|
cleaned up. */
|
|
|
|
static bitmap need_eh_cleanup;
|
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
/* The phi_translate_table caches phi translations for a given
|
|
|
|
expression and predecessor. */
|
2004-06-17 14:53:33 +02:00
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
static htab_t phi_translate_table;
|
2004-05-13 08:41:07 +02:00
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
/* A three tuple {e, pred, v} used to cache phi translations in the
|
|
|
|
phi_translate_table. */
|
2004-05-13 08:41:07 +02:00
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
typedef struct expr_pred_trans_d
|
2004-05-13 08:41:07 +02:00
|
|
|
{
|
c-common.c, [...]: Fix comment formatting.
* c-common.c, c-decl.c, combine.c, defaults.h, fold-const.c,
gimplify.c, gthr-nks.h, hooks.c, lambda-code.c, lambda-mat.c,
stor-layout.c, target.h, tree-cfg.c, tree-chrec.c,
tree-if-conv.c, tree-inline.c, tree-into-ssa.c,
tree-mudflap.c, tree-optimize.c, tree-scalar-evolution.c,
tree-ssa-alias.c, tree-ssa-ccp.c, tree-ssa-dce.c,
tree-ssa-pre.c, tree-vectorizer.c, tree-vectorizer.h, tree.h,
vec.h: Fix comment formatting.
From-SVN: r87105
2004-09-05 18:05:06 +02:00
|
|
|
/* The expression. */
|
2004-06-12 02:18:35 +02:00
|
|
|
tree e;
|
2004-06-17 14:53:33 +02:00
|
|
|
|
|
|
|
/* The predecessor block along which we translated the expression. */
|
2004-06-12 02:18:35 +02:00
|
|
|
basic_block pred;
|
2004-06-17 14:53:33 +02:00
|
|
|
|
|
|
|
/* The value that resulted from the translation. */
|
2004-06-12 02:18:35 +02:00
|
|
|
tree v;
|
2004-06-17 14:53:33 +02:00
|
|
|
|
|
|
|
/* The hashcode for the expression, pred pair. This is cached for
|
|
|
|
speed reasons. */
|
2004-06-12 02:18:35 +02:00
|
|
|
hashval_t hashcode;
|
|
|
|
} *expr_pred_trans_t;
|
2004-05-13 08:41:07 +02:00
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
/* Return the hash value for a phi translation table entry. */
|
2004-05-13 08:41:07 +02:00
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
static hashval_t
|
|
|
|
expr_pred_trans_hash (const void *p)
|
|
|
|
{
|
|
|
|
const expr_pred_trans_t ve = (expr_pred_trans_t) p;
|
|
|
|
return ve->hashcode;
|
|
|
|
}
|
2004-05-13 08:41:07 +02:00
|
|
|
|
2004-06-17 14:53:33 +02:00
|
|
|
/* Return true if two phi translation table entries are the same.
|
|
|
|
P1 and P2 should point to the expr_pred_trans_t's to be compared.*/
|
2004-06-12 02:18:35 +02:00
|
|
|
|
|
|
|
static int
|
|
|
|
expr_pred_trans_eq (const void *p1, const void *p2)
|
|
|
|
{
|
|
|
|
const expr_pred_trans_t ve1 = (expr_pred_trans_t) p1;
|
|
|
|
const expr_pred_trans_t ve2 = (expr_pred_trans_t) p2;
|
|
|
|
basic_block b1 = ve1->pred;
|
|
|
|
basic_block b2 = ve2->pred;
|
|
|
|
|
2004-06-17 14:53:33 +02:00
|
|
|
|
|
|
|
/* If they are not translations for the same basic block, they can't
|
|
|
|
be equal. */
|
2004-06-12 02:18:35 +02:00
|
|
|
if (b1 != b2)
|
2004-05-13 08:41:07 +02:00
|
|
|
return false;
|
|
|
|
|
2004-06-17 14:53:33 +02:00
|
|
|
/* If they are for the same basic block, determine if the
|
|
|
|
expressions are equal. */
|
|
|
|
if (expressions_equal_p (ve1->e, ve2->e))
|
2004-06-12 02:18:35 +02:00
|
|
|
return true;
|
|
|
|
|
|
|
|
return false;
|
2004-05-13 08:41:07 +02:00
|
|
|
}
|
|
|
|
|
2004-06-17 14:53:33 +02:00
|
|
|
/* Search in the phi translation table for the translation of
|
|
|
|
expression E in basic block PRED. Return the translated value, if
|
c-common.c, [...]: Fix comment formatting.
* c-common.c, c-decl.c, combine.c, defaults.h, fold-const.c,
gimplify.c, gthr-nks.h, hooks.c, lambda-code.c, lambda-mat.c,
stor-layout.c, target.h, tree-cfg.c, tree-chrec.c,
tree-if-conv.c, tree-inline.c, tree-into-ssa.c,
tree-mudflap.c, tree-optimize.c, tree-scalar-evolution.c,
tree-ssa-alias.c, tree-ssa-ccp.c, tree-ssa-dce.c,
tree-ssa-pre.c, tree-vectorizer.c, tree-vectorizer.h, tree.h,
vec.h: Fix comment formatting.
From-SVN: r87105
2004-09-05 18:05:06 +02:00
|
|
|
found, NULL otherwise. */
|
2004-05-13 08:41:07 +02:00
|
|
|
|
|
|
|
static inline tree
|
2004-06-12 02:18:35 +02:00
|
|
|
phi_trans_lookup (tree e, basic_block pred)
|
2004-05-13 08:41:07 +02:00
|
|
|
{
|
2004-06-12 02:18:35 +02:00
|
|
|
void **slot;
|
2004-06-17 14:53:33 +02:00
|
|
|
struct expr_pred_trans_d ept;
|
|
|
|
ept.e = e;
|
|
|
|
ept.pred = pred;
|
2004-06-29 03:53:04 +02:00
|
|
|
ept.hashcode = vn_compute (e, (unsigned long) pred, NULL);
|
2004-06-17 14:53:33 +02:00
|
|
|
slot = htab_find_slot_with_hash (phi_translate_table, &ept, ept.hashcode,
|
2004-06-12 02:18:35 +02:00
|
|
|
NO_INSERT);
|
|
|
|
if (!slot)
|
|
|
|
return NULL;
|
|
|
|
else
|
|
|
|
return ((expr_pred_trans_t) *slot)->v;
|
|
|
|
}
|
2004-05-13 08:41:07 +02:00
|
|
|
|
|
|
|
|
2004-06-17 14:53:33 +02:00
|
|
|
/* Add the tuple mapping from {expression E, basic block PRED} to
|
|
|
|
value V, to the phi translation table. */
|
2004-06-12 02:18:35 +02:00
|
|
|
|
|
|
|
static inline void
|
|
|
|
phi_trans_add (tree e, tree v, basic_block pred)
|
|
|
|
{
|
|
|
|
void **slot;
|
|
|
|
expr_pred_trans_t new_pair = xmalloc (sizeof (*new_pair));
|
|
|
|
new_pair->e = e;
|
|
|
|
new_pair->pred = pred;
|
|
|
|
new_pair->v = v;
|
2004-06-29 03:53:04 +02:00
|
|
|
new_pair->hashcode = vn_compute (e, (unsigned long) pred, NULL);
|
2004-06-12 02:18:35 +02:00
|
|
|
slot = htab_find_slot_with_hash (phi_translate_table, new_pair,
|
|
|
|
new_pair->hashcode, INSERT);
|
|
|
|
if (*slot)
|
|
|
|
free (*slot);
|
|
|
|
*slot = (void *) new_pair;
|
2004-05-13 08:41:07 +02:00
|
|
|
}
|
|
|
|
|
2004-06-29 03:53:04 +02:00
|
|
|
|
2004-06-17 14:53:33 +02:00
|
|
|
/* Add expression E to the expression set of value V. */
|
2004-05-13 08:41:07 +02:00
|
|
|
|
2004-06-23 22:12:44 +02:00
|
|
|
void
|
2004-06-12 02:18:35 +02:00
|
|
|
add_to_value (tree v, tree e)
|
2004-05-13 08:41:07 +02:00
|
|
|
{
|
2004-06-30 13:06:28 +02:00
|
|
|
/* Constants have no expression sets. */
|
|
|
|
if (is_gimple_min_invariant (v))
|
2004-06-21 23:57:33 +02:00
|
|
|
return;
|
2004-05-13 08:41:07 +02:00
|
|
|
|
2004-06-23 22:12:44 +02:00
|
|
|
if (VALUE_HANDLE_EXPR_SET (v) == NULL)
|
|
|
|
VALUE_HANDLE_EXPR_SET (v) = set_new (false);
|
2004-06-12 02:18:35 +02:00
|
|
|
|
2004-06-23 22:12:44 +02:00
|
|
|
insert_into_set (VALUE_HANDLE_EXPR_SET (v), e);
|
2004-06-12 02:18:35 +02:00
|
|
|
}
|
2004-05-13 08:41:07 +02:00
|
|
|
|
|
|
|
|
2004-06-17 14:53:33 +02:00
|
|
|
/* Return true if value V exists in the bitmap for SET. */
|
2004-05-13 08:41:07 +02:00
|
|
|
|
|
|
|
static inline bool
|
2004-06-17 14:53:33 +02:00
|
|
|
value_exists_in_set_bitmap (value_set_t set, tree v)
|
2004-05-13 08:41:07 +02:00
|
|
|
{
|
2004-06-12 02:18:35 +02:00
|
|
|
if (!set->values)
|
|
|
|
return false;
|
2004-06-23 22:12:44 +02:00
|
|
|
|
|
|
|
return bitmap_bit_p (set->values, VALUE_HANDLE_ID (v));
|
2004-05-13 08:41:07 +02:00
|
|
|
}
|
|
|
|
|
2004-06-23 22:12:44 +02:00
|
|
|
|
2004-06-17 14:53:33 +02:00
|
|
|
/* Remove value V from the bitmap for SET. */
|
2004-05-13 08:41:07 +02:00
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
static void
|
2004-06-17 14:53:33 +02:00
|
|
|
value_remove_from_set_bitmap (value_set_t set, tree v)
|
2004-06-12 02:18:35 +02:00
|
|
|
{
|
targhooks.c (default_unwind_emit, [...]): Use gcc_assert, gcc_unreachable & internal_error instead of abort.
* targhooks.c (default_unwind_emit, default_scalar_mode_supported_p):
Use gcc_assert, gcc_unreachable & internal_error instead of abort.
* timevar.c (timevar_push, timevar_pop, timevar_start,
timevar_stop): Likewise.
* toplev.c (default_pch_valid_p): Likewise.
* tracer.c (tail_duplicate): Likewise.
* tree-alias-common.c (get_alias_var_decl,
get_values_from_constructor, create_alias_var, delete_alias_vars,
empty_points_to_set, same_points_to_set, ptr_may_alias_var):
Likewise.
* tree.c (tree_size, make_node_stat, copy_node_stat,
build_int_cst_wide, integer_all_onesp, list_length, chainon,
tree_node_structure, type_contains_placeholder_p, substitute_in_expr,
substitute_placeholder_in_expr, tabilize_reference_1, build0_stat,
build1_stat, build2_stat, build3_stat, build4_stat, is_attribute_p,
lookup_attribute, type_hash_canon, host_integerp, iterative_hash_expr,
build_method_type_directly, decl_type_context, get_callee_fndecl,
get_set_constructor_bits, build_vector_type_for_mode, int_cst_value,
tree_fold_gcd): Likewise.
* tree-cfg.c (create_bb, make_ctrl_stmt_edges, make_exit_edges,
make_cond_expr_edges, group_case_labels, tree_merge_blocks,
cleanup_control_expr_graph, find_taken_edge,
find_taken_edge_switch_expr, phi_alternatives_equal,
is_ctrl_altering_stmt, disband_implicit_edges, set_bb_for_stmt,
stmt_for_bsi, tree_find_edge_insert_loc, bsi_insert_on_edge_immediate,
tree_split_edge, tree_verify_flow_info, thread_jumps,
tree_redirect_edge_and_branch, tree_flow_call_edges_add): Likewise.
* tree-chrec.c (chrec_fold_poly_cst, chrec_fold_plus_poly_poly,
chrec_fold_multiply_poly_poly): Likewise.
* tree-complex.c (extract_component, expand_complex_division,
expand_complex_comparison, expand_complex_operations_1,
build_replicated_const, expand_vector_operations_1): Likewise.
* tree-data-ref.c (tree_fold_bezout, build_classic_dist_vector,
build_classic_dir_vector): Likewise.
* tree-dfa.c (compute_immediate_uses_for_phi,
compute_immediate_uses_for_stmt, create_var_ann, create_stmt_ann,
create_tree_ann, collect_dfa_stats, get_virtual_var): Likewise.
* tree-dump.c (dequeue_and_dump): Likewise.
* tree-eh.c (record_stmt_eh_region, add_stmt_to_eh_region,
record_in_finally_tree, replace_goto_queue_1,
maybe_record_in_goto_queue, verify_norecord_switch_expr,
do_return_redirection): Likewise.
* tree-if-conv.c (tree_if_convert_stmt, tree_if_convert_cond_expr,
add_to_dst_predicate_list, find_phi_replacement_condition,
replace_phi_with_cond_modify_expr, get_loop_body_in_if_conv_order):
Likewise.
* tree-inline.c (remap_decl, remap_type, remap_decls, copy_body_r,
initialize_inlined_parameters, declare_return_variable,
estimate_num_insns_1, expand_call_inline, expand_calls_inline,
optimize_inline_calls, copy_tree_r): Likewise.
* tree-into-ssa.c (rewrite_initialize_block_local_data, rewrite_stmt,
ssa_rewrite_stmt, rewrite_into_ssa): Likewise.
* tree-iterator.c (alloc_stmt_list, tsi_link_before, tsi_link_after,
tsi_split_statement_list_after, tsi_split_statement_list_before):
Likewise.
* tree-mudflap.c (mf_varname_tree): Likewise.
* tree-nested.c (create_tmp_var_for, lookup_field_for_decl,
lookup_tramp_for_decl, convert_all_function_calls): Likewise.
* tree-optimize.c (tree_rest_of_compilation): Likewise.
* tree-outof-ssa.c (create_temp, eliminate_build, eliminate_phi,
coalesce_abnormal_edges, coalesce_ssa_name, eliminate_virtual_phis,
free_temp_expr_table, add_dependance, finish_expr, rewrite_trees):
Likewise.
* tree-phinodes.c (resize_phi_node, add_phi_arg,
remove_all_phi_nodes_for): Likewise.
* tree-pretty-print.c (op_prio, print_call_name): Likewise.
* tree-profile.c (tree_gen_interval_profiler, tree_gen_pow2_profiler,
tree_gen_one_value_profiler, tree_gen_const_delta_profiler): Likewise.
* tree-sra.c (type_can_instantiate_all_elements, sra_hash_tree,
sra_elt_eq, sra_walk_expr, instantiate_missing_elements,
generate_one_element_ref, generate_element_copy,
generate_element_zero, scalarize_copy, scalarize_init,
scalarize_ldst): Likewise.
* tree-ssa-alias.c (delete_alias_info, group_aliases, may_alias_p,
add_may_alias, add_pointed_to_expr, add_pointed_to_var,
collect_points_to_info_r, get_tmt_for, get_ptr_info): Likewise.
* tree-ssa.c (walk_use_def_chains, check_phi_redundancy): Likewise.
* tree-ssa-ccp.c (dump_lattice_value, get_default_value, get_value,
set_lattice_value, likely_value, ccp_visit_phi_node, visit_assignment,
widen_bitfield, ccp_fold_builtin): Likewise.
* tree-ssa-copy.c (may_propagate_copy, merge_alias_info,
replace_exp_1, propagate_tree_value): Likewise.
* tree-ssa-copyrename.c (copy_rename_partition_coalesce): Likewise.
* tree-ssa-dce.c (set_control_dependence_map_bit,
find_control_dependence, find_pdom, mark_operand_necessary,
mark_stmt_if_obviously_necessary,
mark_control_dependent_edges_necessary, remove_dead_stmt): Likewise.
* tree-ssa-dom.c (dom_opt_initialize_block_local_data,
simplify_switch_and_lookup_avail_expr, cprop_into_successor_phis,
eliminate_redundant_computations, avail_expr_eq): Likewise.
* tree-ssa-dse.c (fix_stmt_v_may_defs): Likewise.
* tree-ssa-loop-ch.c (should_duplicate_loop_header_p,
duplicate_blocks): Likewise.
* tree-ssa-loop-im.c (for_each_index, set_level,
is_call_clobbered_ref): Likewise.
* tree-ssa-loop-ivopts.c (dump_use, divide, stmt_after_ip_normal_pos,
stmt_after_increment, set_iv, contains_abnormal_ssa_name_p,
find_interesting_uses_outer_or_nonlin, add_derived_ivs_candidates,
peel_address, ptr_difference_cost, may_replace_final_value,
determine_use_iv_cost, rewrite_use_nonlinear_expr, rewrite_use_outer,
rewrite_use, rewrite_uses): Likewise.
* tree-ssa-loop-manip.c (rewrite_into_loop_closed_ssa,
check_loop_closed_ssa_use): Likewise.
* tree-ssanames.c (make_ssa_name): Likewise.
* tree-ssa-operands.c (finalize_ssa_defs, finalize_ssa_uses,
finalize_ssa_v_must_defs, finalize_ssa_stmt_operands,
get_stmt_operands, get_expr_operands, get_asm_expr_operands,
get_indirect_ref_operands, add_stmt_operand): Likewise.
* tree-ssa-pre.c (value_exists_in_set_bitmap,
value_remove_from_set_bitmap, bitmap_insert_into_set, insert_into_set,
phi_translate, valid_in_set, compute_antic,
find_or_generate_expression, create_expression_by_pieces, insert_aux,
create_value_expr_from, eliminate): Likewise.
* tree-ssa-propagate.c (cfg_blocks_get): Likewise.
* tree-ssa-threadupdate.c (remove_last_stmt_and_useless_edges):
Likewise.
* tree-tailcall.c (independent_of_stmt_p, adjust_return_value,
eliminate_tail_call): Likewise.
* tree-vectorizer.c (vect_create_index_for_array_ref,
vect_align_data_ref, vect_create_data_ref,
vect_create_destination_var, vect_get_vec_def_for_operand,
vect_finish_stmt_generation, vect_transform_stmt,
vect_transform_loop_bound, vect_transform_loop,
vect_analyze_operations): Likewise.
* tree-vn.c (vn_compute, set_value_handle, get_value_handle):
Likewise.
* tree-flow-inline.h (var_ann, get_var_ann, get_def_from_ptr,
get_use_op_ptr, immediate_use, phi_ssa_name_p, bsi_start,
bsi_after_labels, bsi_last): Likewise.
* tree-ssa-live.c (var_union, change_partition_var,
create_ssa_var_map, calculate_live_on_entry, root_var_init,
type_var_init, add_coalesce, sort_coalesce_list, pop_best_coalesce):
Likewise.
* tree-ssa-live.h (partition_is_global, live_entry_blocks,
tpa_find_tree): Likewise.
(register_ssa_partition_check): Declare.
(register_ssa_partition): use it.
* tree-ssa-live.c: Include errors.h.
(register_ssa_partition_check): New.
* tree-ssa-operands.c: Include errors.h.
* Makefile.in (tree-ssa-operands.o): Depend on errors.h.
Co-Authored-By: Nathan Sidwell <nathan@codesourcery.com>
From-SVN: r87223
2004-09-09 09:54:12 +02:00
|
|
|
gcc_assert (set->indexed);
|
2004-06-23 22:12:44 +02:00
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
if (!set->values)
|
|
|
|
return;
|
2004-06-23 22:12:44 +02:00
|
|
|
|
|
|
|
bitmap_clear_bit (set->values, VALUE_HANDLE_ID (v));
|
2004-06-12 02:18:35 +02:00
|
|
|
}
|
2004-05-13 08:41:07 +02:00
|
|
|
|
|
|
|
|
2004-06-17 14:53:33 +02:00
|
|
|
/* Insert the value number V into the bitmap of values existing in
|
2004-06-12 02:18:35 +02:00
|
|
|
SET. */
|
2004-05-13 08:41:07 +02:00
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
static inline void
|
2004-06-17 14:53:33 +02:00
|
|
|
value_insert_into_set_bitmap (value_set_t set, tree v)
|
2004-05-13 08:41:07 +02:00
|
|
|
{
|
targhooks.c (default_unwind_emit, [...]): Use gcc_assert, gcc_unreachable & internal_error instead of abort.
* targhooks.c (default_unwind_emit, default_scalar_mode_supported_p):
Use gcc_assert, gcc_unreachable & internal_error instead of abort.
* timevar.c (timevar_push, timevar_pop, timevar_start,
timevar_stop): Likewise.
* toplev.c (default_pch_valid_p): Likewise.
* tracer.c (tail_duplicate): Likewise.
* tree-alias-common.c (get_alias_var_decl,
get_values_from_constructor, create_alias_var, delete_alias_vars,
empty_points_to_set, same_points_to_set, ptr_may_alias_var):
Likewise.
* tree.c (tree_size, make_node_stat, copy_node_stat,
build_int_cst_wide, integer_all_onesp, list_length, chainon,
tree_node_structure, type_contains_placeholder_p, substitute_in_expr,
substitute_placeholder_in_expr, tabilize_reference_1, build0_stat,
build1_stat, build2_stat, build3_stat, build4_stat, is_attribute_p,
lookup_attribute, type_hash_canon, host_integerp, iterative_hash_expr,
build_method_type_directly, decl_type_context, get_callee_fndecl,
get_set_constructor_bits, build_vector_type_for_mode, int_cst_value,
tree_fold_gcd): Likewise.
* tree-cfg.c (create_bb, make_ctrl_stmt_edges, make_exit_edges,
make_cond_expr_edges, group_case_labels, tree_merge_blocks,
cleanup_control_expr_graph, find_taken_edge,
find_taken_edge_switch_expr, phi_alternatives_equal,
is_ctrl_altering_stmt, disband_implicit_edges, set_bb_for_stmt,
stmt_for_bsi, tree_find_edge_insert_loc, bsi_insert_on_edge_immediate,
tree_split_edge, tree_verify_flow_info, thread_jumps,
tree_redirect_edge_and_branch, tree_flow_call_edges_add): Likewise.
* tree-chrec.c (chrec_fold_poly_cst, chrec_fold_plus_poly_poly,
chrec_fold_multiply_poly_poly): Likewise.
* tree-complex.c (extract_component, expand_complex_division,
expand_complex_comparison, expand_complex_operations_1,
build_replicated_const, expand_vector_operations_1): Likewise.
* tree-data-ref.c (tree_fold_bezout, build_classic_dist_vector,
build_classic_dir_vector): Likewise.
* tree-dfa.c (compute_immediate_uses_for_phi,
compute_immediate_uses_for_stmt, create_var_ann, create_stmt_ann,
create_tree_ann, collect_dfa_stats, get_virtual_var): Likewise.
* tree-dump.c (dequeue_and_dump): Likewise.
* tree-eh.c (record_stmt_eh_region, add_stmt_to_eh_region,
record_in_finally_tree, replace_goto_queue_1,
maybe_record_in_goto_queue, verify_norecord_switch_expr,
do_return_redirection): Likewise.
* tree-if-conv.c (tree_if_convert_stmt, tree_if_convert_cond_expr,
add_to_dst_predicate_list, find_phi_replacement_condition,
replace_phi_with_cond_modify_expr, get_loop_body_in_if_conv_order):
Likewise.
* tree-inline.c (remap_decl, remap_type, remap_decls, copy_body_r,
initialize_inlined_parameters, declare_return_variable,
estimate_num_insns_1, expand_call_inline, expand_calls_inline,
optimize_inline_calls, copy_tree_r): Likewise.
* tree-into-ssa.c (rewrite_initialize_block_local_data, rewrite_stmt,
ssa_rewrite_stmt, rewrite_into_ssa): Likewise.
* tree-iterator.c (alloc_stmt_list, tsi_link_before, tsi_link_after,
tsi_split_statement_list_after, tsi_split_statement_list_before):
Likewise.
* tree-mudflap.c (mf_varname_tree): Likewise.
* tree-nested.c (create_tmp_var_for, lookup_field_for_decl,
lookup_tramp_for_decl, convert_all_function_calls): Likewise.
* tree-optimize.c (tree_rest_of_compilation): Likewise.
* tree-outof-ssa.c (create_temp, eliminate_build, eliminate_phi,
coalesce_abnormal_edges, coalesce_ssa_name, eliminate_virtual_phis,
free_temp_expr_table, add_dependance, finish_expr, rewrite_trees):
Likewise.
* tree-phinodes.c (resize_phi_node, add_phi_arg,
remove_all_phi_nodes_for): Likewise.
* tree-pretty-print.c (op_prio, print_call_name): Likewise.
* tree-profile.c (tree_gen_interval_profiler, tree_gen_pow2_profiler,
tree_gen_one_value_profiler, tree_gen_const_delta_profiler): Likewise.
* tree-sra.c (type_can_instantiate_all_elements, sra_hash_tree,
sra_elt_eq, sra_walk_expr, instantiate_missing_elements,
generate_one_element_ref, generate_element_copy,
generate_element_zero, scalarize_copy, scalarize_init,
scalarize_ldst): Likewise.
* tree-ssa-alias.c (delete_alias_info, group_aliases, may_alias_p,
add_may_alias, add_pointed_to_expr, add_pointed_to_var,
collect_points_to_info_r, get_tmt_for, get_ptr_info): Likewise.
* tree-ssa.c (walk_use_def_chains, check_phi_redundancy): Likewise.
* tree-ssa-ccp.c (dump_lattice_value, get_default_value, get_value,
set_lattice_value, likely_value, ccp_visit_phi_node, visit_assignment,
widen_bitfield, ccp_fold_builtin): Likewise.
* tree-ssa-copy.c (may_propagate_copy, merge_alias_info,
replace_exp_1, propagate_tree_value): Likewise.
* tree-ssa-copyrename.c (copy_rename_partition_coalesce): Likewise.
* tree-ssa-dce.c (set_control_dependence_map_bit,
find_control_dependence, find_pdom, mark_operand_necessary,
mark_stmt_if_obviously_necessary,
mark_control_dependent_edges_necessary, remove_dead_stmt): Likewise.
* tree-ssa-dom.c (dom_opt_initialize_block_local_data,
simplify_switch_and_lookup_avail_expr, cprop_into_successor_phis,
eliminate_redundant_computations, avail_expr_eq): Likewise.
* tree-ssa-dse.c (fix_stmt_v_may_defs): Likewise.
* tree-ssa-loop-ch.c (should_duplicate_loop_header_p,
duplicate_blocks): Likewise.
* tree-ssa-loop-im.c (for_each_index, set_level,
is_call_clobbered_ref): Likewise.
* tree-ssa-loop-ivopts.c (dump_use, divide, stmt_after_ip_normal_pos,
stmt_after_increment, set_iv, contains_abnormal_ssa_name_p,
find_interesting_uses_outer_or_nonlin, add_derived_ivs_candidates,
peel_address, ptr_difference_cost, may_replace_final_value,
determine_use_iv_cost, rewrite_use_nonlinear_expr, rewrite_use_outer,
rewrite_use, rewrite_uses): Likewise.
* tree-ssa-loop-manip.c (rewrite_into_loop_closed_ssa,
check_loop_closed_ssa_use): Likewise.
* tree-ssanames.c (make_ssa_name): Likewise.
* tree-ssa-operands.c (finalize_ssa_defs, finalize_ssa_uses,
finalize_ssa_v_must_defs, finalize_ssa_stmt_operands,
get_stmt_operands, get_expr_operands, get_asm_expr_operands,
get_indirect_ref_operands, add_stmt_operand): Likewise.
* tree-ssa-pre.c (value_exists_in_set_bitmap,
value_remove_from_set_bitmap, bitmap_insert_into_set, insert_into_set,
phi_translate, valid_in_set, compute_antic,
find_or_generate_expression, create_expression_by_pieces, insert_aux,
create_value_expr_from, eliminate): Likewise.
* tree-ssa-propagate.c (cfg_blocks_get): Likewise.
* tree-ssa-threadupdate.c (remove_last_stmt_and_useless_edges):
Likewise.
* tree-tailcall.c (independent_of_stmt_p, adjust_return_value,
eliminate_tail_call): Likewise.
* tree-vectorizer.c (vect_create_index_for_array_ref,
vect_align_data_ref, vect_create_data_ref,
vect_create_destination_var, vect_get_vec_def_for_operand,
vect_finish_stmt_generation, vect_transform_stmt,
vect_transform_loop_bound, vect_transform_loop,
vect_analyze_operations): Likewise.
* tree-vn.c (vn_compute, set_value_handle, get_value_handle):
Likewise.
* tree-flow-inline.h (var_ann, get_var_ann, get_def_from_ptr,
get_use_op_ptr, immediate_use, phi_ssa_name_p, bsi_start,
bsi_after_labels, bsi_last): Likewise.
* tree-ssa-live.c (var_union, change_partition_var,
create_ssa_var_map, calculate_live_on_entry, root_var_init,
type_var_init, add_coalesce, sort_coalesce_list, pop_best_coalesce):
Likewise.
* tree-ssa-live.h (partition_is_global, live_entry_blocks,
tpa_find_tree): Likewise.
(register_ssa_partition_check): Declare.
(register_ssa_partition): use it.
* tree-ssa-live.c: Include errors.h.
(register_ssa_partition_check): New.
* tree-ssa-operands.c: Include errors.h.
* Makefile.in (tree-ssa-operands.o): Depend on errors.h.
Co-Authored-By: Nathan Sidwell <nathan@codesourcery.com>
From-SVN: r87223
2004-09-09 09:54:12 +02:00
|
|
|
gcc_assert (set->indexed);
|
2004-06-23 22:12:44 +02:00
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
if (set->values == NULL)
|
2004-05-13 08:41:07 +02:00
|
|
|
{
|
2004-09-07 22:51:25 +02:00
|
|
|
set->values = BITMAP_OBSTACK_ALLOC (&grand_bitmap_obstack);
|
2004-06-12 02:18:35 +02:00
|
|
|
bitmap_clear (set->values);
|
2004-05-13 08:41:07 +02:00
|
|
|
}
|
2004-06-23 22:12:44 +02:00
|
|
|
|
|
|
|
bitmap_set_bit (set->values, VALUE_HANDLE_ID (v));
|
2004-06-12 02:18:35 +02:00
|
|
|
}
|
2004-05-13 08:41:07 +02:00
|
|
|
|
2004-06-23 22:12:44 +02:00
|
|
|
|
2004-07-02 20:47:29 +02:00
|
|
|
/* Create a new bitmap set and return it. */
|
|
|
|
|
|
|
|
static bitmap_set_t
|
|
|
|
bitmap_set_new (void)
|
|
|
|
{
|
|
|
|
bitmap_set_t ret = pool_alloc (bitmap_set_pool);
|
2004-09-07 22:51:25 +02:00
|
|
|
ret->expressions = BITMAP_OBSTACK_ALLOC (&grand_bitmap_obstack);
|
|
|
|
ret->values = BITMAP_OBSTACK_ALLOC (&grand_bitmap_obstack);
|
2004-07-02 20:47:29 +02:00
|
|
|
bitmap_clear (ret->expressions);
|
|
|
|
bitmap_clear (ret->values);
|
|
|
|
return ret;
|
|
|
|
}
|
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
/* Create a new set. */
|
|
|
|
|
|
|
|
static value_set_t
|
|
|
|
set_new (bool indexed)
|
|
|
|
{
|
|
|
|
value_set_t ret;
|
|
|
|
ret = pool_alloc (value_set_pool);
|
|
|
|
ret->head = ret->tail = NULL;
|
|
|
|
ret->length = 0;
|
|
|
|
ret->indexed = indexed;
|
|
|
|
ret->values = NULL;
|
2004-05-13 08:41:07 +02:00
|
|
|
return ret;
|
|
|
|
}
|
|
|
|
|
2004-07-05 00:51:36 +02:00
|
|
|
/* Insert an expression EXPR into a bitmapped set. */
|
2004-07-02 20:47:29 +02:00
|
|
|
|
|
|
|
static void
|
|
|
|
bitmap_insert_into_set (bitmap_set_t set, tree expr)
|
|
|
|
{
|
|
|
|
tree val;
|
|
|
|
/* XXX: For now, we only let SSA_NAMES into the bitmap sets. */
|
targhooks.c (default_unwind_emit, [...]): Use gcc_assert, gcc_unreachable & internal_error instead of abort.
* targhooks.c (default_unwind_emit, default_scalar_mode_supported_p):
Use gcc_assert, gcc_unreachable & internal_error instead of abort.
* timevar.c (timevar_push, timevar_pop, timevar_start,
timevar_stop): Likewise.
* toplev.c (default_pch_valid_p): Likewise.
* tracer.c (tail_duplicate): Likewise.
* tree-alias-common.c (get_alias_var_decl,
get_values_from_constructor, create_alias_var, delete_alias_vars,
empty_points_to_set, same_points_to_set, ptr_may_alias_var):
Likewise.
* tree.c (tree_size, make_node_stat, copy_node_stat,
build_int_cst_wide, integer_all_onesp, list_length, chainon,
tree_node_structure, type_contains_placeholder_p, substitute_in_expr,
substitute_placeholder_in_expr, tabilize_reference_1, build0_stat,
build1_stat, build2_stat, build3_stat, build4_stat, is_attribute_p,
lookup_attribute, type_hash_canon, host_integerp, iterative_hash_expr,
build_method_type_directly, decl_type_context, get_callee_fndecl,
get_set_constructor_bits, build_vector_type_for_mode, int_cst_value,
tree_fold_gcd): Likewise.
* tree-cfg.c (create_bb, make_ctrl_stmt_edges, make_exit_edges,
make_cond_expr_edges, group_case_labels, tree_merge_blocks,
cleanup_control_expr_graph, find_taken_edge,
find_taken_edge_switch_expr, phi_alternatives_equal,
is_ctrl_altering_stmt, disband_implicit_edges, set_bb_for_stmt,
stmt_for_bsi, tree_find_edge_insert_loc, bsi_insert_on_edge_immediate,
tree_split_edge, tree_verify_flow_info, thread_jumps,
tree_redirect_edge_and_branch, tree_flow_call_edges_add): Likewise.
* tree-chrec.c (chrec_fold_poly_cst, chrec_fold_plus_poly_poly,
chrec_fold_multiply_poly_poly): Likewise.
* tree-complex.c (extract_component, expand_complex_division,
expand_complex_comparison, expand_complex_operations_1,
build_replicated_const, expand_vector_operations_1): Likewise.
* tree-data-ref.c (tree_fold_bezout, build_classic_dist_vector,
build_classic_dir_vector): Likewise.
* tree-dfa.c (compute_immediate_uses_for_phi,
compute_immediate_uses_for_stmt, create_var_ann, create_stmt_ann,
create_tree_ann, collect_dfa_stats, get_virtual_var): Likewise.
* tree-dump.c (dequeue_and_dump): Likewise.
* tree-eh.c (record_stmt_eh_region, add_stmt_to_eh_region,
record_in_finally_tree, replace_goto_queue_1,
maybe_record_in_goto_queue, verify_norecord_switch_expr,
do_return_redirection): Likewise.
* tree-if-conv.c (tree_if_convert_stmt, tree_if_convert_cond_expr,
add_to_dst_predicate_list, find_phi_replacement_condition,
replace_phi_with_cond_modify_expr, get_loop_body_in_if_conv_order):
Likewise.
* tree-inline.c (remap_decl, remap_type, remap_decls, copy_body_r,
initialize_inlined_parameters, declare_return_variable,
estimate_num_insns_1, expand_call_inline, expand_calls_inline,
optimize_inline_calls, copy_tree_r): Likewise.
* tree-into-ssa.c (rewrite_initialize_block_local_data, rewrite_stmt,
ssa_rewrite_stmt, rewrite_into_ssa): Likewise.
* tree-iterator.c (alloc_stmt_list, tsi_link_before, tsi_link_after,
tsi_split_statement_list_after, tsi_split_statement_list_before):
Likewise.
* tree-mudflap.c (mf_varname_tree): Likewise.
* tree-nested.c (create_tmp_var_for, lookup_field_for_decl,
lookup_tramp_for_decl, convert_all_function_calls): Likewise.
* tree-optimize.c (tree_rest_of_compilation): Likewise.
* tree-outof-ssa.c (create_temp, eliminate_build, eliminate_phi,
coalesce_abnormal_edges, coalesce_ssa_name, eliminate_virtual_phis,
free_temp_expr_table, add_dependance, finish_expr, rewrite_trees):
Likewise.
* tree-phinodes.c (resize_phi_node, add_phi_arg,
remove_all_phi_nodes_for): Likewise.
* tree-pretty-print.c (op_prio, print_call_name): Likewise.
* tree-profile.c (tree_gen_interval_profiler, tree_gen_pow2_profiler,
tree_gen_one_value_profiler, tree_gen_const_delta_profiler): Likewise.
* tree-sra.c (type_can_instantiate_all_elements, sra_hash_tree,
sra_elt_eq, sra_walk_expr, instantiate_missing_elements,
generate_one_element_ref, generate_element_copy,
generate_element_zero, scalarize_copy, scalarize_init,
scalarize_ldst): Likewise.
* tree-ssa-alias.c (delete_alias_info, group_aliases, may_alias_p,
add_may_alias, add_pointed_to_expr, add_pointed_to_var,
collect_points_to_info_r, get_tmt_for, get_ptr_info): Likewise.
* tree-ssa.c (walk_use_def_chains, check_phi_redundancy): Likewise.
* tree-ssa-ccp.c (dump_lattice_value, get_default_value, get_value,
set_lattice_value, likely_value, ccp_visit_phi_node, visit_assignment,
widen_bitfield, ccp_fold_builtin): Likewise.
* tree-ssa-copy.c (may_propagate_copy, merge_alias_info,
replace_exp_1, propagate_tree_value): Likewise.
* tree-ssa-copyrename.c (copy_rename_partition_coalesce): Likewise.
* tree-ssa-dce.c (set_control_dependence_map_bit,
find_control_dependence, find_pdom, mark_operand_necessary,
mark_stmt_if_obviously_necessary,
mark_control_dependent_edges_necessary, remove_dead_stmt): Likewise.
* tree-ssa-dom.c (dom_opt_initialize_block_local_data,
simplify_switch_and_lookup_avail_expr, cprop_into_successor_phis,
eliminate_redundant_computations, avail_expr_eq): Likewise.
* tree-ssa-dse.c (fix_stmt_v_may_defs): Likewise.
* tree-ssa-loop-ch.c (should_duplicate_loop_header_p,
duplicate_blocks): Likewise.
* tree-ssa-loop-im.c (for_each_index, set_level,
is_call_clobbered_ref): Likewise.
* tree-ssa-loop-ivopts.c (dump_use, divide, stmt_after_ip_normal_pos,
stmt_after_increment, set_iv, contains_abnormal_ssa_name_p,
find_interesting_uses_outer_or_nonlin, add_derived_ivs_candidates,
peel_address, ptr_difference_cost, may_replace_final_value,
determine_use_iv_cost, rewrite_use_nonlinear_expr, rewrite_use_outer,
rewrite_use, rewrite_uses): Likewise.
* tree-ssa-loop-manip.c (rewrite_into_loop_closed_ssa,
check_loop_closed_ssa_use): Likewise.
* tree-ssanames.c (make_ssa_name): Likewise.
* tree-ssa-operands.c (finalize_ssa_defs, finalize_ssa_uses,
finalize_ssa_v_must_defs, finalize_ssa_stmt_operands,
get_stmt_operands, get_expr_operands, get_asm_expr_operands,
get_indirect_ref_operands, add_stmt_operand): Likewise.
* tree-ssa-pre.c (value_exists_in_set_bitmap,
value_remove_from_set_bitmap, bitmap_insert_into_set, insert_into_set,
phi_translate, valid_in_set, compute_antic,
find_or_generate_expression, create_expression_by_pieces, insert_aux,
create_value_expr_from, eliminate): Likewise.
* tree-ssa-propagate.c (cfg_blocks_get): Likewise.
* tree-ssa-threadupdate.c (remove_last_stmt_and_useless_edges):
Likewise.
* tree-tailcall.c (independent_of_stmt_p, adjust_return_value,
eliminate_tail_call): Likewise.
* tree-vectorizer.c (vect_create_index_for_array_ref,
vect_align_data_ref, vect_create_data_ref,
vect_create_destination_var, vect_get_vec_def_for_operand,
vect_finish_stmt_generation, vect_transform_stmt,
vect_transform_loop_bound, vect_transform_loop,
vect_analyze_operations): Likewise.
* tree-vn.c (vn_compute, set_value_handle, get_value_handle):
Likewise.
* tree-flow-inline.h (var_ann, get_var_ann, get_def_from_ptr,
get_use_op_ptr, immediate_use, phi_ssa_name_p, bsi_start,
bsi_after_labels, bsi_last): Likewise.
* tree-ssa-live.c (var_union, change_partition_var,
create_ssa_var_map, calculate_live_on_entry, root_var_init,
type_var_init, add_coalesce, sort_coalesce_list, pop_best_coalesce):
Likewise.
* tree-ssa-live.h (partition_is_global, live_entry_blocks,
tpa_find_tree): Likewise.
(register_ssa_partition_check): Declare.
(register_ssa_partition): use it.
* tree-ssa-live.c: Include errors.h.
(register_ssa_partition_check): New.
* tree-ssa-operands.c: Include errors.h.
* Makefile.in (tree-ssa-operands.o): Depend on errors.h.
Co-Authored-By: Nathan Sidwell <nathan@codesourcery.com>
From-SVN: r87223
2004-09-09 09:54:12 +02:00
|
|
|
gcc_assert (TREE_CODE (expr) == SSA_NAME);
|
2004-07-02 20:47:29 +02:00
|
|
|
val = get_value_handle (expr);
|
|
|
|
|
targhooks.c (default_unwind_emit, [...]): Use gcc_assert, gcc_unreachable & internal_error instead of abort.
* targhooks.c (default_unwind_emit, default_scalar_mode_supported_p):
Use gcc_assert, gcc_unreachable & internal_error instead of abort.
* timevar.c (timevar_push, timevar_pop, timevar_start,
timevar_stop): Likewise.
* toplev.c (default_pch_valid_p): Likewise.
* tracer.c (tail_duplicate): Likewise.
* tree-alias-common.c (get_alias_var_decl,
get_values_from_constructor, create_alias_var, delete_alias_vars,
empty_points_to_set, same_points_to_set, ptr_may_alias_var):
Likewise.
* tree.c (tree_size, make_node_stat, copy_node_stat,
build_int_cst_wide, integer_all_onesp, list_length, chainon,
tree_node_structure, type_contains_placeholder_p, substitute_in_expr,
substitute_placeholder_in_expr, tabilize_reference_1, build0_stat,
build1_stat, build2_stat, build3_stat, build4_stat, is_attribute_p,
lookup_attribute, type_hash_canon, host_integerp, iterative_hash_expr,
build_method_type_directly, decl_type_context, get_callee_fndecl,
get_set_constructor_bits, build_vector_type_for_mode, int_cst_value,
tree_fold_gcd): Likewise.
* tree-cfg.c (create_bb, make_ctrl_stmt_edges, make_exit_edges,
make_cond_expr_edges, group_case_labels, tree_merge_blocks,
cleanup_control_expr_graph, find_taken_edge,
find_taken_edge_switch_expr, phi_alternatives_equal,
is_ctrl_altering_stmt, disband_implicit_edges, set_bb_for_stmt,
stmt_for_bsi, tree_find_edge_insert_loc, bsi_insert_on_edge_immediate,
tree_split_edge, tree_verify_flow_info, thread_jumps,
tree_redirect_edge_and_branch, tree_flow_call_edges_add): Likewise.
* tree-chrec.c (chrec_fold_poly_cst, chrec_fold_plus_poly_poly,
chrec_fold_multiply_poly_poly): Likewise.
* tree-complex.c (extract_component, expand_complex_division,
expand_complex_comparison, expand_complex_operations_1,
build_replicated_const, expand_vector_operations_1): Likewise.
* tree-data-ref.c (tree_fold_bezout, build_classic_dist_vector,
build_classic_dir_vector): Likewise.
* tree-dfa.c (compute_immediate_uses_for_phi,
compute_immediate_uses_for_stmt, create_var_ann, create_stmt_ann,
create_tree_ann, collect_dfa_stats, get_virtual_var): Likewise.
* tree-dump.c (dequeue_and_dump): Likewise.
* tree-eh.c (record_stmt_eh_region, add_stmt_to_eh_region,
record_in_finally_tree, replace_goto_queue_1,
maybe_record_in_goto_queue, verify_norecord_switch_expr,
do_return_redirection): Likewise.
* tree-if-conv.c (tree_if_convert_stmt, tree_if_convert_cond_expr,
add_to_dst_predicate_list, find_phi_replacement_condition,
replace_phi_with_cond_modify_expr, get_loop_body_in_if_conv_order):
Likewise.
* tree-inline.c (remap_decl, remap_type, remap_decls, copy_body_r,
initialize_inlined_parameters, declare_return_variable,
estimate_num_insns_1, expand_call_inline, expand_calls_inline,
optimize_inline_calls, copy_tree_r): Likewise.
* tree-into-ssa.c (rewrite_initialize_block_local_data, rewrite_stmt,
ssa_rewrite_stmt, rewrite_into_ssa): Likewise.
* tree-iterator.c (alloc_stmt_list, tsi_link_before, tsi_link_after,
tsi_split_statement_list_after, tsi_split_statement_list_before):
Likewise.
* tree-mudflap.c (mf_varname_tree): Likewise.
* tree-nested.c (create_tmp_var_for, lookup_field_for_decl,
lookup_tramp_for_decl, convert_all_function_calls): Likewise.
* tree-optimize.c (tree_rest_of_compilation): Likewise.
* tree-outof-ssa.c (create_temp, eliminate_build, eliminate_phi,
coalesce_abnormal_edges, coalesce_ssa_name, eliminate_virtual_phis,
free_temp_expr_table, add_dependance, finish_expr, rewrite_trees):
Likewise.
* tree-phinodes.c (resize_phi_node, add_phi_arg,
remove_all_phi_nodes_for): Likewise.
* tree-pretty-print.c (op_prio, print_call_name): Likewise.
* tree-profile.c (tree_gen_interval_profiler, tree_gen_pow2_profiler,
tree_gen_one_value_profiler, tree_gen_const_delta_profiler): Likewise.
* tree-sra.c (type_can_instantiate_all_elements, sra_hash_tree,
sra_elt_eq, sra_walk_expr, instantiate_missing_elements,
generate_one_element_ref, generate_element_copy,
generate_element_zero, scalarize_copy, scalarize_init,
scalarize_ldst): Likewise.
* tree-ssa-alias.c (delete_alias_info, group_aliases, may_alias_p,
add_may_alias, add_pointed_to_expr, add_pointed_to_var,
collect_points_to_info_r, get_tmt_for, get_ptr_info): Likewise.
* tree-ssa.c (walk_use_def_chains, check_phi_redundancy): Likewise.
* tree-ssa-ccp.c (dump_lattice_value, get_default_value, get_value,
set_lattice_value, likely_value, ccp_visit_phi_node, visit_assignment,
widen_bitfield, ccp_fold_builtin): Likewise.
* tree-ssa-copy.c (may_propagate_copy, merge_alias_info,
replace_exp_1, propagate_tree_value): Likewise.
* tree-ssa-copyrename.c (copy_rename_partition_coalesce): Likewise.
* tree-ssa-dce.c (set_control_dependence_map_bit,
find_control_dependence, find_pdom, mark_operand_necessary,
mark_stmt_if_obviously_necessary,
mark_control_dependent_edges_necessary, remove_dead_stmt): Likewise.
* tree-ssa-dom.c (dom_opt_initialize_block_local_data,
simplify_switch_and_lookup_avail_expr, cprop_into_successor_phis,
eliminate_redundant_computations, avail_expr_eq): Likewise.
* tree-ssa-dse.c (fix_stmt_v_may_defs): Likewise.
* tree-ssa-loop-ch.c (should_duplicate_loop_header_p,
duplicate_blocks): Likewise.
* tree-ssa-loop-im.c (for_each_index, set_level,
is_call_clobbered_ref): Likewise.
* tree-ssa-loop-ivopts.c (dump_use, divide, stmt_after_ip_normal_pos,
stmt_after_increment, set_iv, contains_abnormal_ssa_name_p,
find_interesting_uses_outer_or_nonlin, add_derived_ivs_candidates,
peel_address, ptr_difference_cost, may_replace_final_value,
determine_use_iv_cost, rewrite_use_nonlinear_expr, rewrite_use_outer,
rewrite_use, rewrite_uses): Likewise.
* tree-ssa-loop-manip.c (rewrite_into_loop_closed_ssa,
check_loop_closed_ssa_use): Likewise.
* tree-ssanames.c (make_ssa_name): Likewise.
* tree-ssa-operands.c (finalize_ssa_defs, finalize_ssa_uses,
finalize_ssa_v_must_defs, finalize_ssa_stmt_operands,
get_stmt_operands, get_expr_operands, get_asm_expr_operands,
get_indirect_ref_operands, add_stmt_operand): Likewise.
* tree-ssa-pre.c (value_exists_in_set_bitmap,
value_remove_from_set_bitmap, bitmap_insert_into_set, insert_into_set,
phi_translate, valid_in_set, compute_antic,
find_or_generate_expression, create_expression_by_pieces, insert_aux,
create_value_expr_from, eliminate): Likewise.
* tree-ssa-propagate.c (cfg_blocks_get): Likewise.
* tree-ssa-threadupdate.c (remove_last_stmt_and_useless_edges):
Likewise.
* tree-tailcall.c (independent_of_stmt_p, adjust_return_value,
eliminate_tail_call): Likewise.
* tree-vectorizer.c (vect_create_index_for_array_ref,
vect_align_data_ref, vect_create_data_ref,
vect_create_destination_var, vect_get_vec_def_for_operand,
vect_finish_stmt_generation, vect_transform_stmt,
vect_transform_loop_bound, vect_transform_loop,
vect_analyze_operations): Likewise.
* tree-vn.c (vn_compute, set_value_handle, get_value_handle):
Likewise.
* tree-flow-inline.h (var_ann, get_var_ann, get_def_from_ptr,
get_use_op_ptr, immediate_use, phi_ssa_name_p, bsi_start,
bsi_after_labels, bsi_last): Likewise.
* tree-ssa-live.c (var_union, change_partition_var,
create_ssa_var_map, calculate_live_on_entry, root_var_init,
type_var_init, add_coalesce, sort_coalesce_list, pop_best_coalesce):
Likewise.
* tree-ssa-live.h (partition_is_global, live_entry_blocks,
tpa_find_tree): Likewise.
(register_ssa_partition_check): Declare.
(register_ssa_partition): use it.
* tree-ssa-live.c: Include errors.h.
(register_ssa_partition_check): New.
* tree-ssa-operands.c: Include errors.h.
* Makefile.in (tree-ssa-operands.o): Depend on errors.h.
Co-Authored-By: Nathan Sidwell <nathan@codesourcery.com>
From-SVN: r87223
2004-09-09 09:54:12 +02:00
|
|
|
gcc_assert (val);
|
2004-07-05 00:51:36 +02:00
|
|
|
if (!is_gimple_min_invariant (val))
|
|
|
|
bitmap_set_bit (set->values, VALUE_HANDLE_ID (val));
|
2004-07-02 20:47:29 +02:00
|
|
|
bitmap_set_bit (set->expressions, SSA_NAME_VERSION (expr));
|
|
|
|
}
|
2004-05-13 08:41:07 +02:00
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
/* Insert EXPR into SET. */
|
|
|
|
|
|
|
|
static void
|
|
|
|
insert_into_set (value_set_t set, tree expr)
|
|
|
|
{
|
|
|
|
value_set_node_t newnode = pool_alloc (value_set_node_pool);
|
|
|
|
tree val = get_value_handle (expr);
|
targhooks.c (default_unwind_emit, [...]): Use gcc_assert, gcc_unreachable & internal_error instead of abort.
* targhooks.c (default_unwind_emit, default_scalar_mode_supported_p):
Use gcc_assert, gcc_unreachable & internal_error instead of abort.
* timevar.c (timevar_push, timevar_pop, timevar_start,
timevar_stop): Likewise.
* toplev.c (default_pch_valid_p): Likewise.
* tracer.c (tail_duplicate): Likewise.
* tree-alias-common.c (get_alias_var_decl,
get_values_from_constructor, create_alias_var, delete_alias_vars,
empty_points_to_set, same_points_to_set, ptr_may_alias_var):
Likewise.
* tree.c (tree_size, make_node_stat, copy_node_stat,
build_int_cst_wide, integer_all_onesp, list_length, chainon,
tree_node_structure, type_contains_placeholder_p, substitute_in_expr,
substitute_placeholder_in_expr, tabilize_reference_1, build0_stat,
build1_stat, build2_stat, build3_stat, build4_stat, is_attribute_p,
lookup_attribute, type_hash_canon, host_integerp, iterative_hash_expr,
build_method_type_directly, decl_type_context, get_callee_fndecl,
get_set_constructor_bits, build_vector_type_for_mode, int_cst_value,
tree_fold_gcd): Likewise.
* tree-cfg.c (create_bb, make_ctrl_stmt_edges, make_exit_edges,
make_cond_expr_edges, group_case_labels, tree_merge_blocks,
cleanup_control_expr_graph, find_taken_edge,
find_taken_edge_switch_expr, phi_alternatives_equal,
is_ctrl_altering_stmt, disband_implicit_edges, set_bb_for_stmt,
stmt_for_bsi, tree_find_edge_insert_loc, bsi_insert_on_edge_immediate,
tree_split_edge, tree_verify_flow_info, thread_jumps,
tree_redirect_edge_and_branch, tree_flow_call_edges_add): Likewise.
* tree-chrec.c (chrec_fold_poly_cst, chrec_fold_plus_poly_poly,
chrec_fold_multiply_poly_poly): Likewise.
* tree-complex.c (extract_component, expand_complex_division,
expand_complex_comparison, expand_complex_operations_1,
build_replicated_const, expand_vector_operations_1): Likewise.
* tree-data-ref.c (tree_fold_bezout, build_classic_dist_vector,
build_classic_dir_vector): Likewise.
* tree-dfa.c (compute_immediate_uses_for_phi,
compute_immediate_uses_for_stmt, create_var_ann, create_stmt_ann,
create_tree_ann, collect_dfa_stats, get_virtual_var): Likewise.
* tree-dump.c (dequeue_and_dump): Likewise.
* tree-eh.c (record_stmt_eh_region, add_stmt_to_eh_region,
record_in_finally_tree, replace_goto_queue_1,
maybe_record_in_goto_queue, verify_norecord_switch_expr,
do_return_redirection): Likewise.
* tree-if-conv.c (tree_if_convert_stmt, tree_if_convert_cond_expr,
add_to_dst_predicate_list, find_phi_replacement_condition,
replace_phi_with_cond_modify_expr, get_loop_body_in_if_conv_order):
Likewise.
* tree-inline.c (remap_decl, remap_type, remap_decls, copy_body_r,
initialize_inlined_parameters, declare_return_variable,
estimate_num_insns_1, expand_call_inline, expand_calls_inline,
optimize_inline_calls, copy_tree_r): Likewise.
* tree-into-ssa.c (rewrite_initialize_block_local_data, rewrite_stmt,
ssa_rewrite_stmt, rewrite_into_ssa): Likewise.
* tree-iterator.c (alloc_stmt_list, tsi_link_before, tsi_link_after,
tsi_split_statement_list_after, tsi_split_statement_list_before):
Likewise.
* tree-mudflap.c (mf_varname_tree): Likewise.
* tree-nested.c (create_tmp_var_for, lookup_field_for_decl,
lookup_tramp_for_decl, convert_all_function_calls): Likewise.
* tree-optimize.c (tree_rest_of_compilation): Likewise.
* tree-outof-ssa.c (create_temp, eliminate_build, eliminate_phi,
coalesce_abnormal_edges, coalesce_ssa_name, eliminate_virtual_phis,
free_temp_expr_table, add_dependance, finish_expr, rewrite_trees):
Likewise.
* tree-phinodes.c (resize_phi_node, add_phi_arg,
remove_all_phi_nodes_for): Likewise.
* tree-pretty-print.c (op_prio, print_call_name): Likewise.
* tree-profile.c (tree_gen_interval_profiler, tree_gen_pow2_profiler,
tree_gen_one_value_profiler, tree_gen_const_delta_profiler): Likewise.
* tree-sra.c (type_can_instantiate_all_elements, sra_hash_tree,
sra_elt_eq, sra_walk_expr, instantiate_missing_elements,
generate_one_element_ref, generate_element_copy,
generate_element_zero, scalarize_copy, scalarize_init,
scalarize_ldst): Likewise.
* tree-ssa-alias.c (delete_alias_info, group_aliases, may_alias_p,
add_may_alias, add_pointed_to_expr, add_pointed_to_var,
collect_points_to_info_r, get_tmt_for, get_ptr_info): Likewise.
* tree-ssa.c (walk_use_def_chains, check_phi_redundancy): Likewise.
* tree-ssa-ccp.c (dump_lattice_value, get_default_value, get_value,
set_lattice_value, likely_value, ccp_visit_phi_node, visit_assignment,
widen_bitfield, ccp_fold_builtin): Likewise.
* tree-ssa-copy.c (may_propagate_copy, merge_alias_info,
replace_exp_1, propagate_tree_value): Likewise.
* tree-ssa-copyrename.c (copy_rename_partition_coalesce): Likewise.
* tree-ssa-dce.c (set_control_dependence_map_bit,
find_control_dependence, find_pdom, mark_operand_necessary,
mark_stmt_if_obviously_necessary,
mark_control_dependent_edges_necessary, remove_dead_stmt): Likewise.
* tree-ssa-dom.c (dom_opt_initialize_block_local_data,
simplify_switch_and_lookup_avail_expr, cprop_into_successor_phis,
eliminate_redundant_computations, avail_expr_eq): Likewise.
* tree-ssa-dse.c (fix_stmt_v_may_defs): Likewise.
* tree-ssa-loop-ch.c (should_duplicate_loop_header_p,
duplicate_blocks): Likewise.
* tree-ssa-loop-im.c (for_each_index, set_level,
is_call_clobbered_ref): Likewise.
* tree-ssa-loop-ivopts.c (dump_use, divide, stmt_after_ip_normal_pos,
stmt_after_increment, set_iv, contains_abnormal_ssa_name_p,
find_interesting_uses_outer_or_nonlin, add_derived_ivs_candidates,
peel_address, ptr_difference_cost, may_replace_final_value,
determine_use_iv_cost, rewrite_use_nonlinear_expr, rewrite_use_outer,
rewrite_use, rewrite_uses): Likewise.
* tree-ssa-loop-manip.c (rewrite_into_loop_closed_ssa,
check_loop_closed_ssa_use): Likewise.
* tree-ssanames.c (make_ssa_name): Likewise.
* tree-ssa-operands.c (finalize_ssa_defs, finalize_ssa_uses,
finalize_ssa_v_must_defs, finalize_ssa_stmt_operands,
get_stmt_operands, get_expr_operands, get_asm_expr_operands,
get_indirect_ref_operands, add_stmt_operand): Likewise.
* tree-ssa-pre.c (value_exists_in_set_bitmap,
value_remove_from_set_bitmap, bitmap_insert_into_set, insert_into_set,
phi_translate, valid_in_set, compute_antic,
find_or_generate_expression, create_expression_by_pieces, insert_aux,
create_value_expr_from, eliminate): Likewise.
* tree-ssa-propagate.c (cfg_blocks_get): Likewise.
* tree-ssa-threadupdate.c (remove_last_stmt_and_useless_edges):
Likewise.
* tree-tailcall.c (independent_of_stmt_p, adjust_return_value,
eliminate_tail_call): Likewise.
* tree-vectorizer.c (vect_create_index_for_array_ref,
vect_align_data_ref, vect_create_data_ref,
vect_create_destination_var, vect_get_vec_def_for_operand,
vect_finish_stmt_generation, vect_transform_stmt,
vect_transform_loop_bound, vect_transform_loop,
vect_analyze_operations): Likewise.
* tree-vn.c (vn_compute, set_value_handle, get_value_handle):
Likewise.
* tree-flow-inline.h (var_ann, get_var_ann, get_def_from_ptr,
get_use_op_ptr, immediate_use, phi_ssa_name_p, bsi_start,
bsi_after_labels, bsi_last): Likewise.
* tree-ssa-live.c (var_union, change_partition_var,
create_ssa_var_map, calculate_live_on_entry, root_var_init,
type_var_init, add_coalesce, sort_coalesce_list, pop_best_coalesce):
Likewise.
* tree-ssa-live.h (partition_is_global, live_entry_blocks,
tpa_find_tree): Likewise.
(register_ssa_partition_check): Declare.
(register_ssa_partition): use it.
* tree-ssa-live.c: Include errors.h.
(register_ssa_partition_check): New.
* tree-ssa-operands.c: Include errors.h.
* Makefile.in (tree-ssa-operands.o): Depend on errors.h.
Co-Authored-By: Nathan Sidwell <nathan@codesourcery.com>
From-SVN: r87223
2004-09-09 09:54:12 +02:00
|
|
|
gcc_assert (val);
|
2004-05-13 08:41:07 +02:00
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
/* For indexed sets, insert the value into the set value bitmap.
|
|
|
|
For all sets, add it to the linked list and increment the list
|
|
|
|
length. */
|
|
|
|
if (set->indexed)
|
|
|
|
value_insert_into_set_bitmap (set, val);
|
2004-05-13 08:41:07 +02:00
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
newnode->next = NULL;
|
|
|
|
newnode->expr = expr;
|
|
|
|
set->length ++;
|
|
|
|
if (set->head == NULL)
|
|
|
|
{
|
|
|
|
set->head = set->tail = newnode;
|
|
|
|
}
|
|
|
|
else
|
|
|
|
{
|
|
|
|
set->tail->next = newnode;
|
|
|
|
set->tail = newnode;
|
|
|
|
}
|
|
|
|
}
|
2004-05-13 08:41:07 +02:00
|
|
|
|
2004-07-02 20:47:29 +02:00
|
|
|
/* Copy a bitmapped set ORIG, into bitmapped set DEST. */
|
|
|
|
|
|
|
|
static void
|
|
|
|
bitmap_set_copy (bitmap_set_t dest, bitmap_set_t orig)
|
|
|
|
{
|
|
|
|
bitmap_copy (dest->expressions, orig->expressions);
|
|
|
|
bitmap_copy (dest->values, orig->values);
|
|
|
|
}
|
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
/* Copy the set ORIG to the set DEST. */
|
2004-05-13 08:41:07 +02:00
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
static void
|
|
|
|
set_copy (value_set_t dest, value_set_t orig)
|
|
|
|
{
|
|
|
|
value_set_node_t node;
|
|
|
|
|
|
|
|
if (!orig || !orig->head)
|
|
|
|
return;
|
2004-05-13 08:41:07 +02:00
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
for (node = orig->head;
|
|
|
|
node;
|
|
|
|
node = node->next)
|
|
|
|
{
|
|
|
|
insert_into_set (dest, node->expr);
|
|
|
|
}
|
|
|
|
}
|
2004-05-13 08:41:07 +02:00
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
/* Remove EXPR from SET. */
|
2004-05-13 08:41:07 +02:00
|
|
|
|
|
|
|
static void
|
2004-06-12 02:18:35 +02:00
|
|
|
set_remove (value_set_t set, tree expr)
|
2004-05-13 08:41:07 +02:00
|
|
|
{
|
2004-06-12 02:18:35 +02:00
|
|
|
value_set_node_t node, prev;
|
2004-05-13 08:41:07 +02:00
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
/* Remove the value of EXPR from the bitmap, decrement the set
|
|
|
|
length, and remove it from the actual double linked list. */
|
|
|
|
value_remove_from_set_bitmap (set, get_value_handle (expr));
|
|
|
|
set->length--;
|
|
|
|
prev = NULL;
|
|
|
|
for (node = set->head;
|
|
|
|
node != NULL;
|
|
|
|
prev = node, node = node->next)
|
|
|
|
{
|
|
|
|
if (node->expr == expr)
|
|
|
|
{
|
|
|
|
if (prev == NULL)
|
|
|
|
set->head = node->next;
|
|
|
|
else
|
|
|
|
prev->next= node->next;
|
|
|
|
|
|
|
|
if (node == set->tail)
|
|
|
|
set->tail = prev;
|
|
|
|
pool_free (value_set_node_pool, node);
|
|
|
|
return;
|
|
|
|
}
|
2004-05-13 08:41:07 +02:00
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
/* Return true if SET contains the value VAL. */
|
|
|
|
|
|
|
|
static bool
|
|
|
|
set_contains_value (value_set_t set, tree val)
|
|
|
|
{
|
2004-06-30 13:06:28 +02:00
|
|
|
/* All constants are in every set. */
|
|
|
|
if (is_gimple_min_invariant (val))
|
2004-06-12 02:18:35 +02:00
|
|
|
return true;
|
|
|
|
|
|
|
|
if (set->length == 0)
|
|
|
|
return false;
|
|
|
|
|
|
|
|
return value_exists_in_set_bitmap (set, val);
|
|
|
|
}
|
2004-05-13 08:41:07 +02:00
|
|
|
|
2004-07-05 00:51:36 +02:00
|
|
|
/* Return true if bitmapped set SET contains the expression EXPR. */
|
|
|
|
static bool
|
|
|
|
bitmap_set_contains (bitmap_set_t set, tree expr)
|
|
|
|
{
|
2004-08-20 18:48:00 +02:00
|
|
|
/* All constants are in every set. */
|
|
|
|
if (is_gimple_min_invariant (get_value_handle (expr)))
|
|
|
|
return true;
|
|
|
|
|
2004-07-05 00:51:36 +02:00
|
|
|
/* XXX: Bitmapped sets only contain SSA_NAME's for now. */
|
|
|
|
if (TREE_CODE (expr) != SSA_NAME)
|
|
|
|
return false;
|
|
|
|
return bitmap_bit_p (set->expressions, SSA_NAME_VERSION (expr));
|
|
|
|
}
|
|
|
|
|
|
|
|
|
2004-07-02 20:47:29 +02:00
|
|
|
/* Return true if bitmapped set SET contains the value VAL. */
|
2004-05-13 08:41:07 +02:00
|
|
|
|
2004-07-02 20:47:29 +02:00
|
|
|
static bool
|
|
|
|
bitmap_set_contains_value (bitmap_set_t set, tree val)
|
2004-05-13 08:41:07 +02:00
|
|
|
{
|
2004-07-02 20:47:29 +02:00
|
|
|
if (is_gimple_min_invariant (val))
|
|
|
|
return true;
|
|
|
|
return bitmap_bit_p (set->values, VALUE_HANDLE_ID (val));
|
|
|
|
}
|
2004-06-12 02:18:35 +02:00
|
|
|
|
2004-07-02 20:47:29 +02:00
|
|
|
/* Replace an instance of value LOOKFOR with expression EXPR in SET. */
|
2004-06-12 02:18:35 +02:00
|
|
|
|
2004-07-02 20:47:29 +02:00
|
|
|
static void
|
|
|
|
bitmap_set_replace_value (bitmap_set_t set, tree lookfor, tree expr)
|
|
|
|
{
|
|
|
|
value_set_t exprset;
|
|
|
|
value_set_node_t node;
|
|
|
|
if (is_gimple_min_invariant (lookfor))
|
|
|
|
return;
|
|
|
|
if (!bitmap_set_contains_value (set, lookfor))
|
|
|
|
return;
|
2004-07-05 00:51:36 +02:00
|
|
|
/* The number of expressions having a given value is usually
|
|
|
|
significantly less than the total number of expressions in SET.
|
|
|
|
Thus, rather than check, for each expression in SET, whether it
|
|
|
|
has the value LOOKFOR, we walk the reverse mapping that tells us
|
|
|
|
what expressions have a given value, and see if any of those
|
|
|
|
expressions are in our set. For large testcases, this is about
|
|
|
|
5-10x faster than walking the bitmap. If this is somehow a
|
|
|
|
significant lose for some cases, we can choose which set to walk
|
|
|
|
based on the set size. */
|
2004-07-02 20:47:29 +02:00
|
|
|
exprset = VALUE_HANDLE_EXPR_SET (lookfor);
|
|
|
|
for (node = exprset->head; node; node = node->next)
|
2004-05-13 08:41:07 +02:00
|
|
|
{
|
2004-07-02 20:47:29 +02:00
|
|
|
if (TREE_CODE (node->expr) == SSA_NAME)
|
2004-05-13 08:41:07 +02:00
|
|
|
{
|
2004-07-02 20:47:29 +02:00
|
|
|
if (bitmap_bit_p (set->expressions, SSA_NAME_VERSION (node->expr)))
|
|
|
|
{
|
|
|
|
bitmap_clear_bit (set->expressions, SSA_NAME_VERSION (node->expr));
|
|
|
|
bitmap_set_bit (set->expressions, SSA_NAME_VERSION (expr));
|
|
|
|
return;
|
|
|
|
}
|
2004-05-13 08:41:07 +02:00
|
|
|
}
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2004-07-05 00:51:36 +02:00
|
|
|
/* Subtract bitmapped set B from value set A, and return the new set. */
|
2004-05-13 08:41:07 +02:00
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
static value_set_t
|
2004-07-05 00:51:36 +02:00
|
|
|
bitmap_set_subtract_from_value_set (value_set_t a, bitmap_set_t b,
|
|
|
|
bool indexed)
|
2004-06-12 02:18:35 +02:00
|
|
|
{
|
|
|
|
value_set_t ret = set_new (indexed);
|
|
|
|
value_set_node_t node;
|
|
|
|
for (node = a->head;
|
|
|
|
node;
|
|
|
|
node = node->next)
|
|
|
|
{
|
2004-07-05 00:51:36 +02:00
|
|
|
if (!bitmap_set_contains (b, node->expr))
|
2004-06-12 02:18:35 +02:00
|
|
|
insert_into_set (ret, node->expr);
|
|
|
|
}
|
|
|
|
return ret;
|
2004-05-13 08:41:07 +02:00
|
|
|
}
|
|
|
|
|
c-common.c, [...]: Fix comment formatting.
* c-common.c, c-decl.c, combine.c, defaults.h, fold-const.c,
gimplify.c, gthr-nks.h, hooks.c, lambda-code.c, lambda-mat.c,
stor-layout.c, target.h, tree-cfg.c, tree-chrec.c,
tree-if-conv.c, tree-inline.c, tree-into-ssa.c,
tree-mudflap.c, tree-optimize.c, tree-scalar-evolution.c,
tree-ssa-alias.c, tree-ssa-ccp.c, tree-ssa-dce.c,
tree-ssa-pre.c, tree-vectorizer.c, tree-vectorizer.h, tree.h,
vec.h: Fix comment formatting.
From-SVN: r87105
2004-09-05 18:05:06 +02:00
|
|
|
/* Return true if two sets are equal. */
|
2004-05-13 08:41:07 +02:00
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
static bool
|
|
|
|
set_equal (value_set_t a, value_set_t b)
|
2004-05-13 08:41:07 +02:00
|
|
|
{
|
2004-06-12 02:18:35 +02:00
|
|
|
value_set_node_t node;
|
|
|
|
|
|
|
|
if (a->length != b->length)
|
|
|
|
return false;
|
|
|
|
for (node = a->head;
|
|
|
|
node;
|
|
|
|
node = node->next)
|
|
|
|
{
|
|
|
|
if (!set_contains_value (b, get_value_handle (node->expr)))
|
|
|
|
return false;
|
|
|
|
}
|
|
|
|
return true;
|
2004-05-13 08:41:07 +02:00
|
|
|
}
|
|
|
|
|
2004-07-02 20:47:29 +02:00
|
|
|
/* Replace an instance of EXPR's VALUE with EXPR in SET. */
|
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
static void
|
2004-07-02 20:47:29 +02:00
|
|
|
bitmap_value_replace_in_set (bitmap_set_t set, tree expr)
|
2004-06-12 02:18:35 +02:00
|
|
|
{
|
|
|
|
tree val = get_value_handle (expr);
|
2004-07-02 20:47:29 +02:00
|
|
|
bitmap_set_replace_value (set, val, expr);
|
|
|
|
}
|
2004-06-12 02:18:35 +02:00
|
|
|
|
2004-07-02 20:47:29 +02:00
|
|
|
/* Insert EXPR into SET if EXPR's value is not already present in
|
|
|
|
SET. */
|
|
|
|
|
|
|
|
static void
|
|
|
|
bitmap_value_insert_into_set (bitmap_set_t set, tree expr)
|
|
|
|
{
|
|
|
|
tree val = get_value_handle (expr);
|
2004-08-20 18:48:00 +02:00
|
|
|
|
2004-07-02 20:47:29 +02:00
|
|
|
if (is_gimple_min_invariant (val))
|
2004-06-12 02:18:35 +02:00
|
|
|
return;
|
|
|
|
|
2004-07-02 20:47:29 +02:00
|
|
|
if (!bitmap_set_contains_value (set, val))
|
|
|
|
bitmap_insert_into_set (set, expr);
|
2004-06-12 02:18:35 +02:00
|
|
|
}
|
2004-05-13 08:41:07 +02:00
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
/* Insert the value for EXPR into SET, if it doesn't exist already. */
|
2004-05-13 08:41:07 +02:00
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
static void
|
|
|
|
value_insert_into_set (value_set_t set, tree expr)
|
2004-05-13 08:41:07 +02:00
|
|
|
{
|
2004-06-12 02:18:35 +02:00
|
|
|
tree val = get_value_handle (expr);
|
2004-05-13 08:41:07 +02:00
|
|
|
|
2004-06-21 23:57:33 +02:00
|
|
|
/* Constant and invariant values exist everywhere, and thus,
|
|
|
|
actually keeping them in the sets is pointless. */
|
2004-06-30 13:06:28 +02:00
|
|
|
if (is_gimple_min_invariant (val))
|
2004-06-12 02:18:35 +02:00
|
|
|
return;
|
2004-05-13 08:41:07 +02:00
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
if (!set_contains_value (set, val))
|
|
|
|
insert_into_set (set, expr);
|
2004-05-13 08:41:07 +02:00
|
|
|
}
|
|
|
|
|
|
|
|
|
2004-07-02 20:47:29 +02:00
|
|
|
/* Print out SET to OUTFILE. */
|
|
|
|
|
|
|
|
static void
|
|
|
|
bitmap_print_value_set (FILE *outfile, bitmap_set_t set,
|
|
|
|
const char *setname, int blockindex)
|
|
|
|
{
|
|
|
|
fprintf (outfile, "%s[%d] := { ", setname, blockindex);
|
|
|
|
if (set)
|
|
|
|
{
|
|
|
|
int i;
|
|
|
|
EXECUTE_IF_SET_IN_BITMAP (set->expressions, 0, i,
|
|
|
|
{
|
|
|
|
print_generic_expr (outfile, ssa_name (i), 0);
|
|
|
|
|
|
|
|
fprintf (outfile, " (");
|
|
|
|
print_generic_expr (outfile, get_value_handle (ssa_name (i)), 0);
|
|
|
|
fprintf (outfile, ") ");
|
|
|
|
if (bitmap_last_set_bit (set->expressions) != i)
|
|
|
|
fprintf (outfile, ", ");
|
|
|
|
});
|
|
|
|
}
|
|
|
|
fprintf (outfile, " }\n");
|
|
|
|
}
|
2004-06-12 02:18:35 +02:00
|
|
|
/* Print out the value_set SET to OUTFILE. */
|
2004-05-13 08:41:07 +02:00
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
static void
|
|
|
|
print_value_set (FILE *outfile, value_set_t set,
|
|
|
|
const char *setname, int blockindex)
|
2004-05-13 08:41:07 +02:00
|
|
|
{
|
2004-06-12 02:18:35 +02:00
|
|
|
value_set_node_t node;
|
|
|
|
fprintf (outfile, "%s[%d] := { ", setname, blockindex);
|
|
|
|
if (set)
|
2004-05-13 08:41:07 +02:00
|
|
|
{
|
2004-06-12 02:18:35 +02:00
|
|
|
for (node = set->head;
|
|
|
|
node;
|
|
|
|
node = node->next)
|
2004-05-13 08:41:07 +02:00
|
|
|
{
|
2004-06-12 02:18:35 +02:00
|
|
|
print_generic_expr (outfile, node->expr, 0);
|
2004-06-17 14:53:33 +02:00
|
|
|
|
|
|
|
fprintf (outfile, " (");
|
|
|
|
print_generic_expr (outfile, get_value_handle (node->expr), 0);
|
|
|
|
fprintf (outfile, ") ");
|
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
if (node->next)
|
|
|
|
fprintf (outfile, ", ");
|
2004-05-13 08:41:07 +02:00
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
fprintf (outfile, " }\n");
|
|
|
|
}
|
|
|
|
|
|
|
|
/* Print out the expressions that have VAL to OUTFILE. */
|
2004-06-23 22:12:44 +02:00
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
void
|
|
|
|
print_value_expressions (FILE *outfile, tree val)
|
|
|
|
{
|
2004-06-23 22:12:44 +02:00
|
|
|
if (VALUE_HANDLE_EXPR_SET (val))
|
|
|
|
{
|
|
|
|
char s[10];
|
|
|
|
sprintf (s, "VH.%04d", VALUE_HANDLE_ID (val));
|
|
|
|
print_value_set (outfile, VALUE_HANDLE_EXPR_SET (val), s, 0);
|
|
|
|
}
|
2004-05-13 08:41:07 +02:00
|
|
|
}
|
|
|
|
|
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
void
|
|
|
|
debug_value_expressions (tree val)
|
2004-05-13 08:41:07 +02:00
|
|
|
{
|
2004-06-12 02:18:35 +02:00
|
|
|
print_value_expressions (stderr, val);
|
|
|
|
}
|
|
|
|
|
2004-05-13 08:41:07 +02:00
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
void debug_value_set (value_set_t, const char *, int);
|
2004-05-13 08:41:07 +02:00
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
void
|
|
|
|
debug_value_set (value_set_t set, const char *setname, int blockindex)
|
2004-05-13 08:41:07 +02:00
|
|
|
{
|
2004-06-12 02:18:35 +02:00
|
|
|
print_value_set (stderr, set, setname, blockindex);
|
2004-05-13 08:41:07 +02:00
|
|
|
}
|
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
/* Translate EXPR using phis in PHIBLOCK, so that it has the values of
|
|
|
|
the phis in PRED. Return NULL if we can't find a leader for each
|
|
|
|
part of the translated expression. */
|
2004-05-13 08:41:07 +02:00
|
|
|
|
|
|
|
static tree
|
2004-06-29 03:53:04 +02:00
|
|
|
phi_translate (tree expr, value_set_t set, basic_block pred,
|
2004-06-12 02:18:35 +02:00
|
|
|
basic_block phiblock)
|
2004-05-13 08:41:07 +02:00
|
|
|
{
|
2004-06-12 02:18:35 +02:00
|
|
|
tree phitrans = NULL;
|
|
|
|
tree oldexpr = expr;
|
2004-05-13 08:41:07 +02:00
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
if (expr == NULL)
|
|
|
|
return NULL;
|
2004-05-13 08:41:07 +02:00
|
|
|
|
alias.c (find_base_decl): Remove unreachable case '3' block.
2004-09-17 Jeffrey D. Oldham <oldham@codesourcery.com>
Zack Weinberg <zack@codesourcery.com>
* alias.c (find_base_decl): Remove unreachable case '3' block.
* expr.c (safe_from_p): Abort if passed a type.
* tree-gimple.c (recalculate_side_effects): Abort if passed
anything other than an expression.
* tree-ssa-pre.c (phi_translate): Return expr immediately if
is_gimple_min_invariant is true for it. Reorder cases for clarity.
Abort on un-handled tree classes.
(valid_in_set): Likewise.
* tree.c (tree_code_class_strings): New static data.
* tree.h (enum tree_code_class): New.
(tree_code_class_strings): Declare.
(TREE_CODE_CLASS_STRING, EXCEPTIONAL_CLASS_P, CONSTANT_CLASS_P)
(REFERENCE_CLASS_P, COMPARISON_CLASS_P, UNARY_CLASS_P, BINARY_CLASS_P)
(STATEMENT_CLASS_P, EXPRESSION_CLASS_P, IS_TYPE_OR_DECL_P): New macros.
(TYPE_P, DECL_P, IS_NON_TYPE_CODE_CLASS, IS_EXPR_CODE_CLASS)
(checking macros, EXPR_LOCATION, SET_EXPR_LOCATION, EXPR_LOCUS): Update.
* tree.def, c-common.def, objc/objc-tree.def: Use
tree_code_class enumeration constants instead of code letters.
* alias.c, builtins.c, c-common.c, c-format.c, c-lang.c, c-pragma.c
* c-typeck.c, cgraphunit.c, convert.c, dbxout.c, dwarf2out.c
* emit-rtl.c expr.c, fold-const.c, gimplify.c, lambda-code.c
* langhooks.c, langhooks.h, predict.c, print-tree.c, reload1.c, stmt.c
* tree-browser.c, tree-cfg.c, tree-chrec.c, tree-complex.c, tree-dfa.c
* tree-dump.c, tree-eh.c, tree-gimple.c, tree-inline.c, tree-nested.c
* tree-outof-ssa.c, tree-pretty-print.c, tree-sra.c, tree-ssa-ccp.c
* tree-ssa-dce.c, tree-ssa-dom.c, tree-ssa-forwprop.c, tree-ssa-live.c
* tree-ssa-loop-im.c, tree-ssa-loop-ivopts.c, tree-ssa-operands.c
* tree-ssa-phiopt.c, tree-ssa-pre.c, tree-ssa-propagate.c
* tree-ssa.c, tree-ssanames.c, tree-tailcall.c, tree.c, varasm.c
* config/sol2-c.c, config/arm/arm.c, config/i386/winnt.c
* config/pa/pa.c, config/pa/pa.h, config/sh/sh.c, objc/objc-lang.c
Update to match.
* LANGUAGES: Add note about change.
ada:
* ada-tree.def: Use tree_code_class enumeration constants
instead of code letters.
* ada-tree.h, decl.c, misc.c, trans.c, utils.c, utils2.c:
Update for new tree-class enumeration constants.
cp:
* cp-tree.def: Use tree_code_class enumeration constants
instead of code letters.
* call.c, class.c, cp-gimplify.c, cp-lang.c, cxx-pretty-print.c
* mangle.c, pt.c, semantics.c, tree.c, typeck.c:
Update for new tree-class enumeration constants.
fortran:
* f95-lang.c, trans-expr.c, trans.c: Update for new tree-class
enumeration constants.
java:
* java-tree.def: Use tree_code_class enumeration constants
instead of code letters.
* java-gimplify.c, jcf-write.c, lang.c, parse.y: Update for
new tree-class enumeration constants.
treelang:
* treetree.c: Update for new tree-class enumeration constants.
From-SVN: r87675
2004-09-17 23:55:02 +02:00
|
|
|
if (is_gimple_min_invariant (expr))
|
|
|
|
return expr;
|
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
/* Phi translations of a given expression don't change, */
|
|
|
|
phitrans = phi_trans_lookup (expr, pred);
|
|
|
|
if (phitrans)
|
|
|
|
return phitrans;
|
|
|
|
|
|
|
|
switch (TREE_CODE_CLASS (TREE_CODE (expr)))
|
2004-05-13 08:41:07 +02:00
|
|
|
{
|
alias.c (find_base_decl): Remove unreachable case '3' block.
2004-09-17 Jeffrey D. Oldham <oldham@codesourcery.com>
Zack Weinberg <zack@codesourcery.com>
* alias.c (find_base_decl): Remove unreachable case '3' block.
* expr.c (safe_from_p): Abort if passed a type.
* tree-gimple.c (recalculate_side_effects): Abort if passed
anything other than an expression.
* tree-ssa-pre.c (phi_translate): Return expr immediately if
is_gimple_min_invariant is true for it. Reorder cases for clarity.
Abort on un-handled tree classes.
(valid_in_set): Likewise.
* tree.c (tree_code_class_strings): New static data.
* tree.h (enum tree_code_class): New.
(tree_code_class_strings): Declare.
(TREE_CODE_CLASS_STRING, EXCEPTIONAL_CLASS_P, CONSTANT_CLASS_P)
(REFERENCE_CLASS_P, COMPARISON_CLASS_P, UNARY_CLASS_P, BINARY_CLASS_P)
(STATEMENT_CLASS_P, EXPRESSION_CLASS_P, IS_TYPE_OR_DECL_P): New macros.
(TYPE_P, DECL_P, IS_NON_TYPE_CODE_CLASS, IS_EXPR_CODE_CLASS)
(checking macros, EXPR_LOCATION, SET_EXPR_LOCATION, EXPR_LOCUS): Update.
* tree.def, c-common.def, objc/objc-tree.def: Use
tree_code_class enumeration constants instead of code letters.
* alias.c, builtins.c, c-common.c, c-format.c, c-lang.c, c-pragma.c
* c-typeck.c, cgraphunit.c, convert.c, dbxout.c, dwarf2out.c
* emit-rtl.c expr.c, fold-const.c, gimplify.c, lambda-code.c
* langhooks.c, langhooks.h, predict.c, print-tree.c, reload1.c, stmt.c
* tree-browser.c, tree-cfg.c, tree-chrec.c, tree-complex.c, tree-dfa.c
* tree-dump.c, tree-eh.c, tree-gimple.c, tree-inline.c, tree-nested.c
* tree-outof-ssa.c, tree-pretty-print.c, tree-sra.c, tree-ssa-ccp.c
* tree-ssa-dce.c, tree-ssa-dom.c, tree-ssa-forwprop.c, tree-ssa-live.c
* tree-ssa-loop-im.c, tree-ssa-loop-ivopts.c, tree-ssa-operands.c
* tree-ssa-phiopt.c, tree-ssa-pre.c, tree-ssa-propagate.c
* tree-ssa.c, tree-ssanames.c, tree-tailcall.c, tree.c, varasm.c
* config/sol2-c.c, config/arm/arm.c, config/i386/winnt.c
* config/pa/pa.c, config/pa/pa.h, config/sh/sh.c, objc/objc-lang.c
Update to match.
* LANGUAGES: Add note about change.
ada:
* ada-tree.def: Use tree_code_class enumeration constants
instead of code letters.
* ada-tree.h, decl.c, misc.c, trans.c, utils.c, utils2.c:
Update for new tree-class enumeration constants.
cp:
* cp-tree.def: Use tree_code_class enumeration constants
instead of code letters.
* call.c, class.c, cp-gimplify.c, cp-lang.c, cxx-pretty-print.c
* mangle.c, pt.c, semantics.c, tree.c, typeck.c:
Update for new tree-class enumeration constants.
fortran:
* f95-lang.c, trans-expr.c, trans.c: Update for new tree-class
enumeration constants.
java:
* java-tree.def: Use tree_code_class enumeration constants
instead of code letters.
* java-gimplify.c, jcf-write.c, lang.c, parse.y: Update for
new tree-class enumeration constants.
treelang:
* treetree.c: Update for new tree-class enumeration constants.
From-SVN: r87675
2004-09-17 23:55:02 +02:00
|
|
|
case tcc_reference:
|
|
|
|
/* XXX: Until we have PRE of loads working, none will be ANTIC. */
|
|
|
|
return NULL;
|
|
|
|
|
|
|
|
case tcc_binary:
|
2004-06-12 02:18:35 +02:00
|
|
|
{
|
|
|
|
tree oldop1 = TREE_OPERAND (expr, 0);
|
|
|
|
tree oldop2 = TREE_OPERAND (expr, 1);
|
|
|
|
tree newop1;
|
|
|
|
tree newop2;
|
|
|
|
tree newexpr;
|
|
|
|
|
|
|
|
newop1 = phi_translate (find_leader (set, oldop1),
|
|
|
|
set, pred, phiblock);
|
|
|
|
if (newop1 == NULL)
|
|
|
|
return NULL;
|
|
|
|
newop2 = phi_translate (find_leader (set, oldop2),
|
|
|
|
set, pred, phiblock);
|
|
|
|
if (newop2 == NULL)
|
|
|
|
return NULL;
|
|
|
|
if (newop1 != oldop1 || newop2 != oldop2)
|
|
|
|
{
|
|
|
|
newexpr = pool_alloc (binary_node_pool);
|
|
|
|
memcpy (newexpr, expr, tree_size (expr));
|
2004-06-18 16:05:20 +02:00
|
|
|
create_tree_ann (newexpr);
|
2004-06-12 02:18:35 +02:00
|
|
|
TREE_OPERAND (newexpr, 0) = newop1 == oldop1 ? oldop1 : get_value_handle (newop1);
|
|
|
|
TREE_OPERAND (newexpr, 1) = newop2 == oldop2 ? oldop2 : get_value_handle (newop2);
|
2004-06-29 03:53:04 +02:00
|
|
|
vn_lookup_or_add (newexpr, NULL);
|
2004-06-12 02:18:35 +02:00
|
|
|
expr = newexpr;
|
|
|
|
phi_trans_add (oldexpr, newexpr, pred);
|
|
|
|
}
|
|
|
|
}
|
alias.c (find_base_decl): Remove unreachable case '3' block.
2004-09-17 Jeffrey D. Oldham <oldham@codesourcery.com>
Zack Weinberg <zack@codesourcery.com>
* alias.c (find_base_decl): Remove unreachable case '3' block.
* expr.c (safe_from_p): Abort if passed a type.
* tree-gimple.c (recalculate_side_effects): Abort if passed
anything other than an expression.
* tree-ssa-pre.c (phi_translate): Return expr immediately if
is_gimple_min_invariant is true for it. Reorder cases for clarity.
Abort on un-handled tree classes.
(valid_in_set): Likewise.
* tree.c (tree_code_class_strings): New static data.
* tree.h (enum tree_code_class): New.
(tree_code_class_strings): Declare.
(TREE_CODE_CLASS_STRING, EXCEPTIONAL_CLASS_P, CONSTANT_CLASS_P)
(REFERENCE_CLASS_P, COMPARISON_CLASS_P, UNARY_CLASS_P, BINARY_CLASS_P)
(STATEMENT_CLASS_P, EXPRESSION_CLASS_P, IS_TYPE_OR_DECL_P): New macros.
(TYPE_P, DECL_P, IS_NON_TYPE_CODE_CLASS, IS_EXPR_CODE_CLASS)
(checking macros, EXPR_LOCATION, SET_EXPR_LOCATION, EXPR_LOCUS): Update.
* tree.def, c-common.def, objc/objc-tree.def: Use
tree_code_class enumeration constants instead of code letters.
* alias.c, builtins.c, c-common.c, c-format.c, c-lang.c, c-pragma.c
* c-typeck.c, cgraphunit.c, convert.c, dbxout.c, dwarf2out.c
* emit-rtl.c expr.c, fold-const.c, gimplify.c, lambda-code.c
* langhooks.c, langhooks.h, predict.c, print-tree.c, reload1.c, stmt.c
* tree-browser.c, tree-cfg.c, tree-chrec.c, tree-complex.c, tree-dfa.c
* tree-dump.c, tree-eh.c, tree-gimple.c, tree-inline.c, tree-nested.c
* tree-outof-ssa.c, tree-pretty-print.c, tree-sra.c, tree-ssa-ccp.c
* tree-ssa-dce.c, tree-ssa-dom.c, tree-ssa-forwprop.c, tree-ssa-live.c
* tree-ssa-loop-im.c, tree-ssa-loop-ivopts.c, tree-ssa-operands.c
* tree-ssa-phiopt.c, tree-ssa-pre.c, tree-ssa-propagate.c
* tree-ssa.c, tree-ssanames.c, tree-tailcall.c, tree.c, varasm.c
* config/sol2-c.c, config/arm/arm.c, config/i386/winnt.c
* config/pa/pa.c, config/pa/pa.h, config/sh/sh.c, objc/objc-lang.c
Update to match.
* LANGUAGES: Add note about change.
ada:
* ada-tree.def: Use tree_code_class enumeration constants
instead of code letters.
* ada-tree.h, decl.c, misc.c, trans.c, utils.c, utils2.c:
Update for new tree-class enumeration constants.
cp:
* cp-tree.def: Use tree_code_class enumeration constants
instead of code letters.
* call.c, class.c, cp-gimplify.c, cp-lang.c, cxx-pretty-print.c
* mangle.c, pt.c, semantics.c, tree.c, typeck.c:
Update for new tree-class enumeration constants.
fortran:
* f95-lang.c, trans-expr.c, trans.c: Update for new tree-class
enumeration constants.
java:
* java-tree.def: Use tree_code_class enumeration constants
instead of code letters.
* java-gimplify.c, jcf-write.c, lang.c, parse.y: Update for
new tree-class enumeration constants.
treelang:
* treetree.c: Update for new tree-class enumeration constants.
From-SVN: r87675
2004-09-17 23:55:02 +02:00
|
|
|
return expr;
|
|
|
|
|
|
|
|
case tcc_unary:
|
2004-06-12 02:18:35 +02:00
|
|
|
{
|
|
|
|
tree oldop1 = TREE_OPERAND (expr, 0);
|
|
|
|
tree newop1;
|
|
|
|
tree newexpr;
|
|
|
|
|
|
|
|
newop1 = phi_translate (find_leader (set, oldop1),
|
|
|
|
set, pred, phiblock);
|
|
|
|
if (newop1 == NULL)
|
|
|
|
return NULL;
|
|
|
|
if (newop1 != oldop1)
|
|
|
|
{
|
2004-06-17 14:53:33 +02:00
|
|
|
newexpr = pool_alloc (unary_node_pool);
|
2004-06-12 02:18:35 +02:00
|
|
|
memcpy (newexpr, expr, tree_size (expr));
|
2004-06-18 16:05:20 +02:00
|
|
|
create_tree_ann (newexpr);
|
2004-06-12 02:18:35 +02:00
|
|
|
TREE_OPERAND (newexpr, 0) = get_value_handle (newop1);
|
2004-06-29 03:53:04 +02:00
|
|
|
vn_lookup_or_add (newexpr, NULL);
|
2004-06-12 02:18:35 +02:00
|
|
|
expr = newexpr;
|
|
|
|
phi_trans_add (oldexpr, newexpr, pred);
|
|
|
|
}
|
|
|
|
}
|
alias.c (find_base_decl): Remove unreachable case '3' block.
2004-09-17 Jeffrey D. Oldham <oldham@codesourcery.com>
Zack Weinberg <zack@codesourcery.com>
* alias.c (find_base_decl): Remove unreachable case '3' block.
* expr.c (safe_from_p): Abort if passed a type.
* tree-gimple.c (recalculate_side_effects): Abort if passed
anything other than an expression.
* tree-ssa-pre.c (phi_translate): Return expr immediately if
is_gimple_min_invariant is true for it. Reorder cases for clarity.
Abort on un-handled tree classes.
(valid_in_set): Likewise.
* tree.c (tree_code_class_strings): New static data.
* tree.h (enum tree_code_class): New.
(tree_code_class_strings): Declare.
(TREE_CODE_CLASS_STRING, EXCEPTIONAL_CLASS_P, CONSTANT_CLASS_P)
(REFERENCE_CLASS_P, COMPARISON_CLASS_P, UNARY_CLASS_P, BINARY_CLASS_P)
(STATEMENT_CLASS_P, EXPRESSION_CLASS_P, IS_TYPE_OR_DECL_P): New macros.
(TYPE_P, DECL_P, IS_NON_TYPE_CODE_CLASS, IS_EXPR_CODE_CLASS)
(checking macros, EXPR_LOCATION, SET_EXPR_LOCATION, EXPR_LOCUS): Update.
* tree.def, c-common.def, objc/objc-tree.def: Use
tree_code_class enumeration constants instead of code letters.
* alias.c, builtins.c, c-common.c, c-format.c, c-lang.c, c-pragma.c
* c-typeck.c, cgraphunit.c, convert.c, dbxout.c, dwarf2out.c
* emit-rtl.c expr.c, fold-const.c, gimplify.c, lambda-code.c
* langhooks.c, langhooks.h, predict.c, print-tree.c, reload1.c, stmt.c
* tree-browser.c, tree-cfg.c, tree-chrec.c, tree-complex.c, tree-dfa.c
* tree-dump.c, tree-eh.c, tree-gimple.c, tree-inline.c, tree-nested.c
* tree-outof-ssa.c, tree-pretty-print.c, tree-sra.c, tree-ssa-ccp.c
* tree-ssa-dce.c, tree-ssa-dom.c, tree-ssa-forwprop.c, tree-ssa-live.c
* tree-ssa-loop-im.c, tree-ssa-loop-ivopts.c, tree-ssa-operands.c
* tree-ssa-phiopt.c, tree-ssa-pre.c, tree-ssa-propagate.c
* tree-ssa.c, tree-ssanames.c, tree-tailcall.c, tree.c, varasm.c
* config/sol2-c.c, config/arm/arm.c, config/i386/winnt.c
* config/pa/pa.c, config/pa/pa.h, config/sh/sh.c, objc/objc-lang.c
Update to match.
* LANGUAGES: Add note about change.
ada:
* ada-tree.def: Use tree_code_class enumeration constants
instead of code letters.
* ada-tree.h, decl.c, misc.c, trans.c, utils.c, utils2.c:
Update for new tree-class enumeration constants.
cp:
* cp-tree.def: Use tree_code_class enumeration constants
instead of code letters.
* call.c, class.c, cp-gimplify.c, cp-lang.c, cxx-pretty-print.c
* mangle.c, pt.c, semantics.c, tree.c, typeck.c:
Update for new tree-class enumeration constants.
fortran:
* f95-lang.c, trans-expr.c, trans.c: Update for new tree-class
enumeration constants.
java:
* java-tree.def: Use tree_code_class enumeration constants
instead of code letters.
* java-gimplify.c, jcf-write.c, lang.c, parse.y: Update for
new tree-class enumeration constants.
treelang:
* treetree.c: Update for new tree-class enumeration constants.
From-SVN: r87675
2004-09-17 23:55:02 +02:00
|
|
|
return expr;
|
|
|
|
|
|
|
|
case tcc_exceptional:
|
2004-06-12 02:18:35 +02:00
|
|
|
{
|
|
|
|
tree phi = NULL;
|
|
|
|
int i;
|
targhooks.c (default_unwind_emit, [...]): Use gcc_assert, gcc_unreachable & internal_error instead of abort.
* targhooks.c (default_unwind_emit, default_scalar_mode_supported_p):
Use gcc_assert, gcc_unreachable & internal_error instead of abort.
* timevar.c (timevar_push, timevar_pop, timevar_start,
timevar_stop): Likewise.
* toplev.c (default_pch_valid_p): Likewise.
* tracer.c (tail_duplicate): Likewise.
* tree-alias-common.c (get_alias_var_decl,
get_values_from_constructor, create_alias_var, delete_alias_vars,
empty_points_to_set, same_points_to_set, ptr_may_alias_var):
Likewise.
* tree.c (tree_size, make_node_stat, copy_node_stat,
build_int_cst_wide, integer_all_onesp, list_length, chainon,
tree_node_structure, type_contains_placeholder_p, substitute_in_expr,
substitute_placeholder_in_expr, tabilize_reference_1, build0_stat,
build1_stat, build2_stat, build3_stat, build4_stat, is_attribute_p,
lookup_attribute, type_hash_canon, host_integerp, iterative_hash_expr,
build_method_type_directly, decl_type_context, get_callee_fndecl,
get_set_constructor_bits, build_vector_type_for_mode, int_cst_value,
tree_fold_gcd): Likewise.
* tree-cfg.c (create_bb, make_ctrl_stmt_edges, make_exit_edges,
make_cond_expr_edges, group_case_labels, tree_merge_blocks,
cleanup_control_expr_graph, find_taken_edge,
find_taken_edge_switch_expr, phi_alternatives_equal,
is_ctrl_altering_stmt, disband_implicit_edges, set_bb_for_stmt,
stmt_for_bsi, tree_find_edge_insert_loc, bsi_insert_on_edge_immediate,
tree_split_edge, tree_verify_flow_info, thread_jumps,
tree_redirect_edge_and_branch, tree_flow_call_edges_add): Likewise.
* tree-chrec.c (chrec_fold_poly_cst, chrec_fold_plus_poly_poly,
chrec_fold_multiply_poly_poly): Likewise.
* tree-complex.c (extract_component, expand_complex_division,
expand_complex_comparison, expand_complex_operations_1,
build_replicated_const, expand_vector_operations_1): Likewise.
* tree-data-ref.c (tree_fold_bezout, build_classic_dist_vector,
build_classic_dir_vector): Likewise.
* tree-dfa.c (compute_immediate_uses_for_phi,
compute_immediate_uses_for_stmt, create_var_ann, create_stmt_ann,
create_tree_ann, collect_dfa_stats, get_virtual_var): Likewise.
* tree-dump.c (dequeue_and_dump): Likewise.
* tree-eh.c (record_stmt_eh_region, add_stmt_to_eh_region,
record_in_finally_tree, replace_goto_queue_1,
maybe_record_in_goto_queue, verify_norecord_switch_expr,
do_return_redirection): Likewise.
* tree-if-conv.c (tree_if_convert_stmt, tree_if_convert_cond_expr,
add_to_dst_predicate_list, find_phi_replacement_condition,
replace_phi_with_cond_modify_expr, get_loop_body_in_if_conv_order):
Likewise.
* tree-inline.c (remap_decl, remap_type, remap_decls, copy_body_r,
initialize_inlined_parameters, declare_return_variable,
estimate_num_insns_1, expand_call_inline, expand_calls_inline,
optimize_inline_calls, copy_tree_r): Likewise.
* tree-into-ssa.c (rewrite_initialize_block_local_data, rewrite_stmt,
ssa_rewrite_stmt, rewrite_into_ssa): Likewise.
* tree-iterator.c (alloc_stmt_list, tsi_link_before, tsi_link_after,
tsi_split_statement_list_after, tsi_split_statement_list_before):
Likewise.
* tree-mudflap.c (mf_varname_tree): Likewise.
* tree-nested.c (create_tmp_var_for, lookup_field_for_decl,
lookup_tramp_for_decl, convert_all_function_calls): Likewise.
* tree-optimize.c (tree_rest_of_compilation): Likewise.
* tree-outof-ssa.c (create_temp, eliminate_build, eliminate_phi,
coalesce_abnormal_edges, coalesce_ssa_name, eliminate_virtual_phis,
free_temp_expr_table, add_dependance, finish_expr, rewrite_trees):
Likewise.
* tree-phinodes.c (resize_phi_node, add_phi_arg,
remove_all_phi_nodes_for): Likewise.
* tree-pretty-print.c (op_prio, print_call_name): Likewise.
* tree-profile.c (tree_gen_interval_profiler, tree_gen_pow2_profiler,
tree_gen_one_value_profiler, tree_gen_const_delta_profiler): Likewise.
* tree-sra.c (type_can_instantiate_all_elements, sra_hash_tree,
sra_elt_eq, sra_walk_expr, instantiate_missing_elements,
generate_one_element_ref, generate_element_copy,
generate_element_zero, scalarize_copy, scalarize_init,
scalarize_ldst): Likewise.
* tree-ssa-alias.c (delete_alias_info, group_aliases, may_alias_p,
add_may_alias, add_pointed_to_expr, add_pointed_to_var,
collect_points_to_info_r, get_tmt_for, get_ptr_info): Likewise.
* tree-ssa.c (walk_use_def_chains, check_phi_redundancy): Likewise.
* tree-ssa-ccp.c (dump_lattice_value, get_default_value, get_value,
set_lattice_value, likely_value, ccp_visit_phi_node, visit_assignment,
widen_bitfield, ccp_fold_builtin): Likewise.
* tree-ssa-copy.c (may_propagate_copy, merge_alias_info,
replace_exp_1, propagate_tree_value): Likewise.
* tree-ssa-copyrename.c (copy_rename_partition_coalesce): Likewise.
* tree-ssa-dce.c (set_control_dependence_map_bit,
find_control_dependence, find_pdom, mark_operand_necessary,
mark_stmt_if_obviously_necessary,
mark_control_dependent_edges_necessary, remove_dead_stmt): Likewise.
* tree-ssa-dom.c (dom_opt_initialize_block_local_data,
simplify_switch_and_lookup_avail_expr, cprop_into_successor_phis,
eliminate_redundant_computations, avail_expr_eq): Likewise.
* tree-ssa-dse.c (fix_stmt_v_may_defs): Likewise.
* tree-ssa-loop-ch.c (should_duplicate_loop_header_p,
duplicate_blocks): Likewise.
* tree-ssa-loop-im.c (for_each_index, set_level,
is_call_clobbered_ref): Likewise.
* tree-ssa-loop-ivopts.c (dump_use, divide, stmt_after_ip_normal_pos,
stmt_after_increment, set_iv, contains_abnormal_ssa_name_p,
find_interesting_uses_outer_or_nonlin, add_derived_ivs_candidates,
peel_address, ptr_difference_cost, may_replace_final_value,
determine_use_iv_cost, rewrite_use_nonlinear_expr, rewrite_use_outer,
rewrite_use, rewrite_uses): Likewise.
* tree-ssa-loop-manip.c (rewrite_into_loop_closed_ssa,
check_loop_closed_ssa_use): Likewise.
* tree-ssanames.c (make_ssa_name): Likewise.
* tree-ssa-operands.c (finalize_ssa_defs, finalize_ssa_uses,
finalize_ssa_v_must_defs, finalize_ssa_stmt_operands,
get_stmt_operands, get_expr_operands, get_asm_expr_operands,
get_indirect_ref_operands, add_stmt_operand): Likewise.
* tree-ssa-pre.c (value_exists_in_set_bitmap,
value_remove_from_set_bitmap, bitmap_insert_into_set, insert_into_set,
phi_translate, valid_in_set, compute_antic,
find_or_generate_expression, create_expression_by_pieces, insert_aux,
create_value_expr_from, eliminate): Likewise.
* tree-ssa-propagate.c (cfg_blocks_get): Likewise.
* tree-ssa-threadupdate.c (remove_last_stmt_and_useless_edges):
Likewise.
* tree-tailcall.c (independent_of_stmt_p, adjust_return_value,
eliminate_tail_call): Likewise.
* tree-vectorizer.c (vect_create_index_for_array_ref,
vect_align_data_ref, vect_create_data_ref,
vect_create_destination_var, vect_get_vec_def_for_operand,
vect_finish_stmt_generation, vect_transform_stmt,
vect_transform_loop_bound, vect_transform_loop,
vect_analyze_operations): Likewise.
* tree-vn.c (vn_compute, set_value_handle, get_value_handle):
Likewise.
* tree-flow-inline.h (var_ann, get_var_ann, get_def_from_ptr,
get_use_op_ptr, immediate_use, phi_ssa_name_p, bsi_start,
bsi_after_labels, bsi_last): Likewise.
* tree-ssa-live.c (var_union, change_partition_var,
create_ssa_var_map, calculate_live_on_entry, root_var_init,
type_var_init, add_coalesce, sort_coalesce_list, pop_best_coalesce):
Likewise.
* tree-ssa-live.h (partition_is_global, live_entry_blocks,
tpa_find_tree): Likewise.
(register_ssa_partition_check): Declare.
(register_ssa_partition): use it.
* tree-ssa-live.c: Include errors.h.
(register_ssa_partition_check): New.
* tree-ssa-operands.c: Include errors.h.
* Makefile.in (tree-ssa-operands.o): Depend on errors.h.
Co-Authored-By: Nathan Sidwell <nathan@codesourcery.com>
From-SVN: r87223
2004-09-09 09:54:12 +02:00
|
|
|
gcc_assert (TREE_CODE (expr) == SSA_NAME);
|
2004-06-12 02:18:35 +02:00
|
|
|
if (TREE_CODE (SSA_NAME_DEF_STMT (expr)) == PHI_NODE)
|
|
|
|
phi = SSA_NAME_DEF_STMT (expr);
|
|
|
|
else
|
|
|
|
return expr;
|
|
|
|
|
|
|
|
for (i = 0; i < PHI_NUM_ARGS (phi); i++)
|
|
|
|
if (PHI_ARG_EDGE (phi, i)->src == pred)
|
2004-05-13 08:41:07 +02:00
|
|
|
{
|
2004-06-12 02:18:35 +02:00
|
|
|
tree val;
|
|
|
|
if (is_undefined_value (PHI_ARG_DEF (phi, i)))
|
|
|
|
return NULL;
|
2004-06-29 03:53:04 +02:00
|
|
|
val = vn_lookup_or_add (PHI_ARG_DEF (phi, i), NULL);
|
2004-06-12 02:18:35 +02:00
|
|
|
return PHI_ARG_DEF (phi, i);
|
2004-05-13 08:41:07 +02:00
|
|
|
}
|
2004-06-12 02:18:35 +02:00
|
|
|
}
|
alias.c (find_base_decl): Remove unreachable case '3' block.
2004-09-17 Jeffrey D. Oldham <oldham@codesourcery.com>
Zack Weinberg <zack@codesourcery.com>
* alias.c (find_base_decl): Remove unreachable case '3' block.
* expr.c (safe_from_p): Abort if passed a type.
* tree-gimple.c (recalculate_side_effects): Abort if passed
anything other than an expression.
* tree-ssa-pre.c (phi_translate): Return expr immediately if
is_gimple_min_invariant is true for it. Reorder cases for clarity.
Abort on un-handled tree classes.
(valid_in_set): Likewise.
* tree.c (tree_code_class_strings): New static data.
* tree.h (enum tree_code_class): New.
(tree_code_class_strings): Declare.
(TREE_CODE_CLASS_STRING, EXCEPTIONAL_CLASS_P, CONSTANT_CLASS_P)
(REFERENCE_CLASS_P, COMPARISON_CLASS_P, UNARY_CLASS_P, BINARY_CLASS_P)
(STATEMENT_CLASS_P, EXPRESSION_CLASS_P, IS_TYPE_OR_DECL_P): New macros.
(TYPE_P, DECL_P, IS_NON_TYPE_CODE_CLASS, IS_EXPR_CODE_CLASS)
(checking macros, EXPR_LOCATION, SET_EXPR_LOCATION, EXPR_LOCUS): Update.
* tree.def, c-common.def, objc/objc-tree.def: Use
tree_code_class enumeration constants instead of code letters.
* alias.c, builtins.c, c-common.c, c-format.c, c-lang.c, c-pragma.c
* c-typeck.c, cgraphunit.c, convert.c, dbxout.c, dwarf2out.c
* emit-rtl.c expr.c, fold-const.c, gimplify.c, lambda-code.c
* langhooks.c, langhooks.h, predict.c, print-tree.c, reload1.c, stmt.c
* tree-browser.c, tree-cfg.c, tree-chrec.c, tree-complex.c, tree-dfa.c
* tree-dump.c, tree-eh.c, tree-gimple.c, tree-inline.c, tree-nested.c
* tree-outof-ssa.c, tree-pretty-print.c, tree-sra.c, tree-ssa-ccp.c
* tree-ssa-dce.c, tree-ssa-dom.c, tree-ssa-forwprop.c, tree-ssa-live.c
* tree-ssa-loop-im.c, tree-ssa-loop-ivopts.c, tree-ssa-operands.c
* tree-ssa-phiopt.c, tree-ssa-pre.c, tree-ssa-propagate.c
* tree-ssa.c, tree-ssanames.c, tree-tailcall.c, tree.c, varasm.c
* config/sol2-c.c, config/arm/arm.c, config/i386/winnt.c
* config/pa/pa.c, config/pa/pa.h, config/sh/sh.c, objc/objc-lang.c
Update to match.
* LANGUAGES: Add note about change.
ada:
* ada-tree.def: Use tree_code_class enumeration constants
instead of code letters.
* ada-tree.h, decl.c, misc.c, trans.c, utils.c, utils2.c:
Update for new tree-class enumeration constants.
cp:
* cp-tree.def: Use tree_code_class enumeration constants
instead of code letters.
* call.c, class.c, cp-gimplify.c, cp-lang.c, cxx-pretty-print.c
* mangle.c, pt.c, semantics.c, tree.c, typeck.c:
Update for new tree-class enumeration constants.
fortran:
* f95-lang.c, trans-expr.c, trans.c: Update for new tree-class
enumeration constants.
java:
* java-tree.def: Use tree_code_class enumeration constants
instead of code letters.
* java-gimplify.c, jcf-write.c, lang.c, parse.y: Update for
new tree-class enumeration constants.
treelang:
* treetree.c: Update for new tree-class enumeration constants.
From-SVN: r87675
2004-09-17 23:55:02 +02:00
|
|
|
return expr;
|
|
|
|
|
|
|
|
default:
|
|
|
|
gcc_unreachable ();
|
2004-05-13 08:41:07 +02:00
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
static void
|
2004-06-12 02:18:35 +02:00
|
|
|
phi_translate_set (value_set_t dest, value_set_t set, basic_block pred,
|
|
|
|
basic_block phiblock)
|
2004-05-13 08:41:07 +02:00
|
|
|
{
|
2004-06-12 02:18:35 +02:00
|
|
|
value_set_node_t node;
|
|
|
|
for (node = set->head;
|
|
|
|
node;
|
|
|
|
node = node->next)
|
2004-05-13 08:41:07 +02:00
|
|
|
{
|
2004-06-12 02:18:35 +02:00
|
|
|
tree translated;
|
|
|
|
translated = phi_translate (node->expr, set, pred, phiblock);
|
|
|
|
phi_trans_add (node->expr, translated, pred);
|
2004-05-13 08:41:07 +02:00
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
if (translated != NULL)
|
|
|
|
value_insert_into_set (dest, translated);
|
|
|
|
}
|
2004-05-13 08:41:07 +02:00
|
|
|
}
|
|
|
|
|
2004-07-02 20:47:29 +02:00
|
|
|
/* Find the leader for a value (i.e., the name representing that
|
|
|
|
value) in a given set, and return it. Return NULL if no leader is
|
|
|
|
found. */
|
|
|
|
|
|
|
|
static tree
|
|
|
|
bitmap_find_leader (bitmap_set_t set, tree val)
|
|
|
|
{
|
|
|
|
if (val == NULL)
|
|
|
|
return NULL;
|
|
|
|
|
|
|
|
if (is_gimple_min_invariant (val))
|
|
|
|
return val;
|
|
|
|
if (bitmap_set_contains_value (set, val))
|
|
|
|
{
|
2004-07-05 00:51:36 +02:00
|
|
|
/* Rather than walk the entire bitmap of expressions, and see
|
|
|
|
whether any of them has the value we are looking for, we look
|
|
|
|
at the reverse mapping, which tells us the set of expressions
|
|
|
|
that have a given value (IE value->expressions with that
|
|
|
|
value) and see if any of those expressions are in our set.
|
|
|
|
The number of expressions per value is usually significantly
|
|
|
|
less than the number of expressions in the set. In fact, for
|
|
|
|
large testcases, doing it this way is roughly 5-10x faster
|
|
|
|
than walking the bitmap.
|
|
|
|
If this is somehow a significant lose for some cases, we can
|
|
|
|
choose which set to walk based on which set is smaller. */
|
|
|
|
value_set_t exprset;
|
|
|
|
value_set_node_t node;
|
|
|
|
exprset = VALUE_HANDLE_EXPR_SET (val);
|
|
|
|
for (node = exprset->head; node; node = node->next)
|
|
|
|
{
|
|
|
|
if (TREE_CODE (node->expr) == SSA_NAME)
|
|
|
|
{
|
|
|
|
if (bitmap_bit_p (set->expressions,
|
|
|
|
SSA_NAME_VERSION (node->expr)))
|
|
|
|
return node->expr;
|
|
|
|
}
|
|
|
|
}
|
2004-07-02 20:47:29 +02:00
|
|
|
}
|
|
|
|
return NULL;
|
|
|
|
}
|
|
|
|
|
|
|
|
|
2004-06-29 03:53:04 +02:00
|
|
|
/* Find the leader for a value (i.e., the name representing that
|
2004-06-12 02:18:35 +02:00
|
|
|
value) in a given set, and return it. Return NULL if no leader is
|
|
|
|
found. */
|
2004-05-13 08:41:07 +02:00
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
static tree
|
|
|
|
find_leader (value_set_t set, tree val)
|
2004-05-13 08:41:07 +02:00
|
|
|
{
|
2004-06-12 02:18:35 +02:00
|
|
|
value_set_node_t node;
|
2004-05-13 08:41:07 +02:00
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
if (val == NULL)
|
|
|
|
return NULL;
|
2004-06-29 03:53:04 +02:00
|
|
|
|
2004-06-30 13:06:28 +02:00
|
|
|
/* Constants represent themselves. */
|
|
|
|
if (is_gimple_min_invariant (val))
|
2004-06-21 23:57:33 +02:00
|
|
|
return val;
|
2004-06-29 03:53:04 +02:00
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
if (set->length == 0)
|
|
|
|
return NULL;
|
2004-05-13 08:41:07 +02:00
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
if (value_exists_in_set_bitmap (set, val))
|
2004-05-13 08:41:07 +02:00
|
|
|
{
|
2004-06-12 02:18:35 +02:00
|
|
|
for (node = set->head;
|
|
|
|
node;
|
|
|
|
node = node->next)
|
2004-05-13 08:41:07 +02:00
|
|
|
{
|
2004-06-12 02:18:35 +02:00
|
|
|
if (get_value_handle (node->expr) == val)
|
|
|
|
return node->expr;
|
2004-05-13 08:41:07 +02:00
|
|
|
}
|
|
|
|
}
|
2004-06-29 03:53:04 +02:00
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
return NULL;
|
2004-05-13 08:41:07 +02:00
|
|
|
}
|
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
/* Determine if the expression EXPR is valid in SET. This means that
|
|
|
|
we have a leader for each part of the expression (if it consists of
|
|
|
|
values), or the expression is an SSA_NAME.
|
2004-05-13 08:41:07 +02:00
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
NB: We never should run into a case where we have SSA_NAME +
|
|
|
|
SSA_NAME or SSA_NAME + value. The sets valid_in_set is called on,
|
|
|
|
the ANTIC sets, will only ever have SSA_NAME's or binary value
|
|
|
|
expression (IE VALUE1 + VALUE2) */
|
2004-05-13 08:41:07 +02:00
|
|
|
|
|
|
|
static bool
|
2004-06-12 02:18:35 +02:00
|
|
|
valid_in_set (value_set_t set, tree expr)
|
2004-05-13 08:41:07 +02:00
|
|
|
{
|
2004-06-12 02:18:35 +02:00
|
|
|
switch (TREE_CODE_CLASS (TREE_CODE (expr)))
|
|
|
|
{
|
alias.c (find_base_decl): Remove unreachable case '3' block.
2004-09-17 Jeffrey D. Oldham <oldham@codesourcery.com>
Zack Weinberg <zack@codesourcery.com>
* alias.c (find_base_decl): Remove unreachable case '3' block.
* expr.c (safe_from_p): Abort if passed a type.
* tree-gimple.c (recalculate_side_effects): Abort if passed
anything other than an expression.
* tree-ssa-pre.c (phi_translate): Return expr immediately if
is_gimple_min_invariant is true for it. Reorder cases for clarity.
Abort on un-handled tree classes.
(valid_in_set): Likewise.
* tree.c (tree_code_class_strings): New static data.
* tree.h (enum tree_code_class): New.
(tree_code_class_strings): Declare.
(TREE_CODE_CLASS_STRING, EXCEPTIONAL_CLASS_P, CONSTANT_CLASS_P)
(REFERENCE_CLASS_P, COMPARISON_CLASS_P, UNARY_CLASS_P, BINARY_CLASS_P)
(STATEMENT_CLASS_P, EXPRESSION_CLASS_P, IS_TYPE_OR_DECL_P): New macros.
(TYPE_P, DECL_P, IS_NON_TYPE_CODE_CLASS, IS_EXPR_CODE_CLASS)
(checking macros, EXPR_LOCATION, SET_EXPR_LOCATION, EXPR_LOCUS): Update.
* tree.def, c-common.def, objc/objc-tree.def: Use
tree_code_class enumeration constants instead of code letters.
* alias.c, builtins.c, c-common.c, c-format.c, c-lang.c, c-pragma.c
* c-typeck.c, cgraphunit.c, convert.c, dbxout.c, dwarf2out.c
* emit-rtl.c expr.c, fold-const.c, gimplify.c, lambda-code.c
* langhooks.c, langhooks.h, predict.c, print-tree.c, reload1.c, stmt.c
* tree-browser.c, tree-cfg.c, tree-chrec.c, tree-complex.c, tree-dfa.c
* tree-dump.c, tree-eh.c, tree-gimple.c, tree-inline.c, tree-nested.c
* tree-outof-ssa.c, tree-pretty-print.c, tree-sra.c, tree-ssa-ccp.c
* tree-ssa-dce.c, tree-ssa-dom.c, tree-ssa-forwprop.c, tree-ssa-live.c
* tree-ssa-loop-im.c, tree-ssa-loop-ivopts.c, tree-ssa-operands.c
* tree-ssa-phiopt.c, tree-ssa-pre.c, tree-ssa-propagate.c
* tree-ssa.c, tree-ssanames.c, tree-tailcall.c, tree.c, varasm.c
* config/sol2-c.c, config/arm/arm.c, config/i386/winnt.c
* config/pa/pa.c, config/pa/pa.h, config/sh/sh.c, objc/objc-lang.c
Update to match.
* LANGUAGES: Add note about change.
ada:
* ada-tree.def: Use tree_code_class enumeration constants
instead of code letters.
* ada-tree.h, decl.c, misc.c, trans.c, utils.c, utils2.c:
Update for new tree-class enumeration constants.
cp:
* cp-tree.def: Use tree_code_class enumeration constants
instead of code letters.
* call.c, class.c, cp-gimplify.c, cp-lang.c, cxx-pretty-print.c
* mangle.c, pt.c, semantics.c, tree.c, typeck.c:
Update for new tree-class enumeration constants.
fortran:
* f95-lang.c, trans-expr.c, trans.c: Update for new tree-class
enumeration constants.
java:
* java-tree.def: Use tree_code_class enumeration constants
instead of code letters.
* java-gimplify.c, jcf-write.c, lang.c, parse.y: Update for
new tree-class enumeration constants.
treelang:
* treetree.c: Update for new tree-class enumeration constants.
From-SVN: r87675
2004-09-17 23:55:02 +02:00
|
|
|
case tcc_binary:
|
2004-05-13 08:41:07 +02:00
|
|
|
{
|
2004-06-12 02:18:35 +02:00
|
|
|
tree op1 = TREE_OPERAND (expr, 0);
|
|
|
|
tree op2 = TREE_OPERAND (expr, 1);
|
|
|
|
return set_contains_value (set, op1) && set_contains_value (set, op2);
|
2004-05-13 08:41:07 +02:00
|
|
|
}
|
alias.c (find_base_decl): Remove unreachable case '3' block.
2004-09-17 Jeffrey D. Oldham <oldham@codesourcery.com>
Zack Weinberg <zack@codesourcery.com>
* alias.c (find_base_decl): Remove unreachable case '3' block.
* expr.c (safe_from_p): Abort if passed a type.
* tree-gimple.c (recalculate_side_effects): Abort if passed
anything other than an expression.
* tree-ssa-pre.c (phi_translate): Return expr immediately if
is_gimple_min_invariant is true for it. Reorder cases for clarity.
Abort on un-handled tree classes.
(valid_in_set): Likewise.
* tree.c (tree_code_class_strings): New static data.
* tree.h (enum tree_code_class): New.
(tree_code_class_strings): Declare.
(TREE_CODE_CLASS_STRING, EXCEPTIONAL_CLASS_P, CONSTANT_CLASS_P)
(REFERENCE_CLASS_P, COMPARISON_CLASS_P, UNARY_CLASS_P, BINARY_CLASS_P)
(STATEMENT_CLASS_P, EXPRESSION_CLASS_P, IS_TYPE_OR_DECL_P): New macros.
(TYPE_P, DECL_P, IS_NON_TYPE_CODE_CLASS, IS_EXPR_CODE_CLASS)
(checking macros, EXPR_LOCATION, SET_EXPR_LOCATION, EXPR_LOCUS): Update.
* tree.def, c-common.def, objc/objc-tree.def: Use
tree_code_class enumeration constants instead of code letters.
* alias.c, builtins.c, c-common.c, c-format.c, c-lang.c, c-pragma.c
* c-typeck.c, cgraphunit.c, convert.c, dbxout.c, dwarf2out.c
* emit-rtl.c expr.c, fold-const.c, gimplify.c, lambda-code.c
* langhooks.c, langhooks.h, predict.c, print-tree.c, reload1.c, stmt.c
* tree-browser.c, tree-cfg.c, tree-chrec.c, tree-complex.c, tree-dfa.c
* tree-dump.c, tree-eh.c, tree-gimple.c, tree-inline.c, tree-nested.c
* tree-outof-ssa.c, tree-pretty-print.c, tree-sra.c, tree-ssa-ccp.c
* tree-ssa-dce.c, tree-ssa-dom.c, tree-ssa-forwprop.c, tree-ssa-live.c
* tree-ssa-loop-im.c, tree-ssa-loop-ivopts.c, tree-ssa-operands.c
* tree-ssa-phiopt.c, tree-ssa-pre.c, tree-ssa-propagate.c
* tree-ssa.c, tree-ssanames.c, tree-tailcall.c, tree.c, varasm.c
* config/sol2-c.c, config/arm/arm.c, config/i386/winnt.c
* config/pa/pa.c, config/pa/pa.h, config/sh/sh.c, objc/objc-lang.c
Update to match.
* LANGUAGES: Add note about change.
ada:
* ada-tree.def: Use tree_code_class enumeration constants
instead of code letters.
* ada-tree.h, decl.c, misc.c, trans.c, utils.c, utils2.c:
Update for new tree-class enumeration constants.
cp:
* cp-tree.def: Use tree_code_class enumeration constants
instead of code letters.
* call.c, class.c, cp-gimplify.c, cp-lang.c, cxx-pretty-print.c
* mangle.c, pt.c, semantics.c, tree.c, typeck.c:
Update for new tree-class enumeration constants.
fortran:
* f95-lang.c, trans-expr.c, trans.c: Update for new tree-class
enumeration constants.
java:
* java-tree.def: Use tree_code_class enumeration constants
instead of code letters.
* java-gimplify.c, jcf-write.c, lang.c, parse.y: Update for
new tree-class enumeration constants.
treelang:
* treetree.c: Update for new tree-class enumeration constants.
From-SVN: r87675
2004-09-17 23:55:02 +02:00
|
|
|
|
|
|
|
case tcc_unary:
|
2004-06-12 02:18:35 +02:00
|
|
|
{
|
|
|
|
tree op1 = TREE_OPERAND (expr, 0);
|
|
|
|
return set_contains_value (set, op1);
|
|
|
|
}
|
alias.c (find_base_decl): Remove unreachable case '3' block.
2004-09-17 Jeffrey D. Oldham <oldham@codesourcery.com>
Zack Weinberg <zack@codesourcery.com>
* alias.c (find_base_decl): Remove unreachable case '3' block.
* expr.c (safe_from_p): Abort if passed a type.
* tree-gimple.c (recalculate_side_effects): Abort if passed
anything other than an expression.
* tree-ssa-pre.c (phi_translate): Return expr immediately if
is_gimple_min_invariant is true for it. Reorder cases for clarity.
Abort on un-handled tree classes.
(valid_in_set): Likewise.
* tree.c (tree_code_class_strings): New static data.
* tree.h (enum tree_code_class): New.
(tree_code_class_strings): Declare.
(TREE_CODE_CLASS_STRING, EXCEPTIONAL_CLASS_P, CONSTANT_CLASS_P)
(REFERENCE_CLASS_P, COMPARISON_CLASS_P, UNARY_CLASS_P, BINARY_CLASS_P)
(STATEMENT_CLASS_P, EXPRESSION_CLASS_P, IS_TYPE_OR_DECL_P): New macros.
(TYPE_P, DECL_P, IS_NON_TYPE_CODE_CLASS, IS_EXPR_CODE_CLASS)
(checking macros, EXPR_LOCATION, SET_EXPR_LOCATION, EXPR_LOCUS): Update.
* tree.def, c-common.def, objc/objc-tree.def: Use
tree_code_class enumeration constants instead of code letters.
* alias.c, builtins.c, c-common.c, c-format.c, c-lang.c, c-pragma.c
* c-typeck.c, cgraphunit.c, convert.c, dbxout.c, dwarf2out.c
* emit-rtl.c expr.c, fold-const.c, gimplify.c, lambda-code.c
* langhooks.c, langhooks.h, predict.c, print-tree.c, reload1.c, stmt.c
* tree-browser.c, tree-cfg.c, tree-chrec.c, tree-complex.c, tree-dfa.c
* tree-dump.c, tree-eh.c, tree-gimple.c, tree-inline.c, tree-nested.c
* tree-outof-ssa.c, tree-pretty-print.c, tree-sra.c, tree-ssa-ccp.c
* tree-ssa-dce.c, tree-ssa-dom.c, tree-ssa-forwprop.c, tree-ssa-live.c
* tree-ssa-loop-im.c, tree-ssa-loop-ivopts.c, tree-ssa-operands.c
* tree-ssa-phiopt.c, tree-ssa-pre.c, tree-ssa-propagate.c
* tree-ssa.c, tree-ssanames.c, tree-tailcall.c, tree.c, varasm.c
* config/sol2-c.c, config/arm/arm.c, config/i386/winnt.c
* config/pa/pa.c, config/pa/pa.h, config/sh/sh.c, objc/objc-lang.c
Update to match.
* LANGUAGES: Add note about change.
ada:
* ada-tree.def: Use tree_code_class enumeration constants
instead of code letters.
* ada-tree.h, decl.c, misc.c, trans.c, utils.c, utils2.c:
Update for new tree-class enumeration constants.
cp:
* cp-tree.def: Use tree_code_class enumeration constants
instead of code letters.
* call.c, class.c, cp-gimplify.c, cp-lang.c, cxx-pretty-print.c
* mangle.c, pt.c, semantics.c, tree.c, typeck.c:
Update for new tree-class enumeration constants.
fortran:
* f95-lang.c, trans-expr.c, trans.c: Update for new tree-class
enumeration constants.
java:
* java-tree.def: Use tree_code_class enumeration constants
instead of code letters.
* java-gimplify.c, jcf-write.c, lang.c, parse.y: Update for
new tree-class enumeration constants.
treelang:
* treetree.c: Update for new tree-class enumeration constants.
From-SVN: r87675
2004-09-17 23:55:02 +02:00
|
|
|
|
|
|
|
case tcc_reference:
|
|
|
|
/* XXX: Until PRE of loads works, no reference nodes are ANTIC. */
|
|
|
|
return false;
|
|
|
|
|
|
|
|
case tcc_exceptional:
|
|
|
|
gcc_assert (TREE_CODE (expr) == SSA_NAME);
|
|
|
|
return true;
|
|
|
|
|
|
|
|
default:
|
|
|
|
/* No other cases should be encountered. */
|
|
|
|
gcc_unreachable ();
|
|
|
|
}
|
2004-05-13 08:41:07 +02:00
|
|
|
}
|
|
|
|
|
2004-06-17 14:53:33 +02:00
|
|
|
/* Clean the set of expressions that are no longer valid in SET. This
|
|
|
|
means expressions that are made up of values we have no leaders for
|
|
|
|
in SET. */
|
2004-05-13 08:41:07 +02:00
|
|
|
|
|
|
|
static void
|
2004-06-12 02:18:35 +02:00
|
|
|
clean (value_set_t set)
|
2004-05-13 08:41:07 +02:00
|
|
|
{
|
2004-06-12 02:18:35 +02:00
|
|
|
value_set_node_t node;
|
|
|
|
value_set_node_t next;
|
|
|
|
node = set->head;
|
|
|
|
while (node)
|
2004-05-13 08:41:07 +02:00
|
|
|
{
|
2004-06-12 02:18:35 +02:00
|
|
|
next = node->next;
|
|
|
|
if (!valid_in_set (set, node->expr))
|
|
|
|
set_remove (set, node->expr);
|
|
|
|
node = next;
|
2004-05-13 08:41:07 +02:00
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
/* Compute the ANTIC set for BLOCK.
|
2004-05-13 08:41:07 +02:00
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
ANTIC_OUT[BLOCK] = intersection of ANTIC_IN[b] for all succ(BLOCK), if
|
|
|
|
succs(BLOCK) > 1
|
|
|
|
ANTIC_OUT[BLOCK] = phi_translate (ANTIC_IN[succ(BLOCK)]) if
|
|
|
|
succs(BLOCK) == 1
|
2004-05-13 08:41:07 +02:00
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
ANTIC_IN[BLOCK] = clean(ANTIC_OUT[BLOCK] U EXP_GEN[BLOCK] -
|
|
|
|
TMP_GEN[BLOCK])
|
2004-05-13 08:41:07 +02:00
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
Iterate until fixpointed.
|
2004-05-13 08:41:07 +02:00
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
XXX: It would be nice to either write a set_clear, and use it for
|
|
|
|
antic_out, or to mark the antic_out set as deleted at the end
|
|
|
|
of this routine, so that the pool can hand the same memory back out
|
|
|
|
again for the next antic_out. */
|
2004-05-13 08:41:07 +02:00
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
|
|
|
|
static bool
|
|
|
|
compute_antic_aux (basic_block block)
|
2004-05-13 08:41:07 +02:00
|
|
|
{
|
2004-06-12 02:18:35 +02:00
|
|
|
basic_block son;
|
|
|
|
edge e;
|
|
|
|
bool changed = false;
|
|
|
|
value_set_t S, old, ANTIC_OUT;
|
|
|
|
value_set_node_t node;
|
|
|
|
|
|
|
|
ANTIC_OUT = S = NULL;
|
|
|
|
/* If any edges from predecessors are abnormal, antic_in is empty, so
|
|
|
|
punt. Remember that the block has an incoming abnormal edge by
|
|
|
|
setting the BB_VISITED flag. */
|
|
|
|
if (! (block->flags & BB_VISITED))
|
2004-05-13 08:41:07 +02:00
|
|
|
{
|
2004-06-12 02:18:35 +02:00
|
|
|
for (e = block->pred; e; e = e->pred_next)
|
|
|
|
if (e->flags & EDGE_ABNORMAL)
|
|
|
|
{
|
|
|
|
block->flags |= BB_VISITED;
|
|
|
|
break;
|
|
|
|
}
|
2004-05-13 08:41:07 +02:00
|
|
|
}
|
2004-06-12 02:18:35 +02:00
|
|
|
if (block->flags & BB_VISITED)
|
2004-05-13 08:41:07 +02:00
|
|
|
{
|
2004-06-12 02:18:35 +02:00
|
|
|
S = NULL;
|
|
|
|
goto visit_sons;
|
2004-05-13 08:41:07 +02:00
|
|
|
}
|
2004-06-12 02:18:35 +02:00
|
|
|
|
2004-05-13 08:41:07 +02:00
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
old = set_new (false);
|
|
|
|
set_copy (old, ANTIC_IN (block));
|
|
|
|
ANTIC_OUT = set_new (true);
|
2004-05-13 08:41:07 +02:00
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
/* If the block has no successors, ANTIC_OUT is empty, because it is
|
|
|
|
the exit block. */
|
|
|
|
if (block->succ == NULL);
|
2004-05-13 08:41:07 +02:00
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
/* If we have one successor, we could have some phi nodes to
|
|
|
|
translate through. */
|
|
|
|
else if (block->succ->succ_next == NULL)
|
2004-05-13 08:41:07 +02:00
|
|
|
{
|
2004-06-12 02:18:35 +02:00
|
|
|
phi_translate_set (ANTIC_OUT, ANTIC_IN(block->succ->dest),
|
|
|
|
block, block->succ->dest);
|
2004-05-13 08:41:07 +02:00
|
|
|
}
|
2004-06-12 02:18:35 +02:00
|
|
|
/* If we have multiple successors, we take the intersection of all of
|
|
|
|
them. */
|
|
|
|
else
|
2004-05-13 08:41:07 +02:00
|
|
|
{
|
2004-06-12 02:18:35 +02:00
|
|
|
varray_type worklist;
|
|
|
|
edge e;
|
|
|
|
size_t i;
|
|
|
|
basic_block bprime, first;
|
|
|
|
|
|
|
|
VARRAY_BB_INIT (worklist, 1, "succ");
|
|
|
|
e = block->succ;
|
|
|
|
while (e)
|
2004-05-13 08:41:07 +02:00
|
|
|
{
|
2004-06-12 02:18:35 +02:00
|
|
|
VARRAY_PUSH_BB (worklist, e->dest);
|
|
|
|
e = e->succ_next;
|
2004-05-13 08:41:07 +02:00
|
|
|
}
|
2004-06-12 02:18:35 +02:00
|
|
|
first = VARRAY_BB (worklist, 0);
|
|
|
|
set_copy (ANTIC_OUT, ANTIC_IN (first));
|
2004-05-13 08:41:07 +02:00
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
for (i = 1; i < VARRAY_ACTIVE_SIZE (worklist); i++)
|
2004-05-13 08:41:07 +02:00
|
|
|
{
|
2004-06-12 02:18:35 +02:00
|
|
|
bprime = VARRAY_BB (worklist, i);
|
|
|
|
node = ANTIC_OUT->head;
|
|
|
|
while (node)
|
2004-05-13 08:41:07 +02:00
|
|
|
{
|
2004-06-12 02:18:35 +02:00
|
|
|
tree val;
|
|
|
|
value_set_node_t next = node->next;
|
|
|
|
val = get_value_handle (node->expr);
|
|
|
|
if (!set_contains_value (ANTIC_IN (bprime), val))
|
|
|
|
set_remove (ANTIC_OUT, node->expr);
|
|
|
|
node = next;
|
2004-05-13 08:41:07 +02:00
|
|
|
}
|
|
|
|
}
|
2004-06-12 02:18:35 +02:00
|
|
|
VARRAY_CLEAR (worklist);
|
2004-05-13 08:41:07 +02:00
|
|
|
}
|
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
/* Generate ANTIC_OUT - TMP_GEN */
|
2004-07-05 00:51:36 +02:00
|
|
|
S = bitmap_set_subtract_from_value_set (ANTIC_OUT, TMP_GEN (block), false);
|
2004-05-13 08:41:07 +02:00
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
/* Start ANTIC_IN with EXP_GEN - TMP_GEN */
|
2004-07-05 00:51:36 +02:00
|
|
|
ANTIC_IN (block) = bitmap_set_subtract_from_value_set (EXP_GEN (block),
|
|
|
|
TMP_GEN (block),
|
|
|
|
true);
|
2004-05-13 08:41:07 +02:00
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
/* Then union in the ANTIC_OUT - TMP_GEN values, to get ANTIC_OUT U
|
|
|
|
EXP_GEN - TMP_GEN */
|
|
|
|
for (node = S->head;
|
|
|
|
node;
|
|
|
|
node = node->next)
|
2004-05-13 08:41:07 +02:00
|
|
|
{
|
2004-06-12 02:18:35 +02:00
|
|
|
value_insert_into_set (ANTIC_IN (block), node->expr);
|
2004-05-13 08:41:07 +02:00
|
|
|
}
|
2004-06-12 02:18:35 +02:00
|
|
|
clean (ANTIC_IN (block));
|
2004-06-17 14:53:33 +02:00
|
|
|
|
2004-05-13 08:41:07 +02:00
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
if (!set_equal (old, ANTIC_IN (block)))
|
|
|
|
changed = true;
|
2004-05-13 08:41:07 +02:00
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
visit_sons:
|
|
|
|
if (dump_file && (dump_flags & TDF_DETAILS))
|
|
|
|
{
|
|
|
|
if (ANTIC_OUT)
|
|
|
|
print_value_set (dump_file, ANTIC_OUT, "ANTIC_OUT", block->index);
|
|
|
|
print_value_set (dump_file, ANTIC_IN (block), "ANTIC_IN", block->index);
|
|
|
|
if (S)
|
|
|
|
print_value_set (dump_file, S, "S", block->index);
|
2004-05-13 08:41:07 +02:00
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
}
|
2004-05-13 08:41:07 +02:00
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
for (son = first_dom_son (CDI_POST_DOMINATORS, block);
|
|
|
|
son;
|
|
|
|
son = next_dom_son (CDI_POST_DOMINATORS, son))
|
2004-05-13 08:41:07 +02:00
|
|
|
{
|
2004-06-12 02:18:35 +02:00
|
|
|
changed |= compute_antic_aux (son);
|
2004-05-13 08:41:07 +02:00
|
|
|
}
|
2004-06-12 02:18:35 +02:00
|
|
|
return changed;
|
2004-05-13 08:41:07 +02:00
|
|
|
}
|
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
/* Compute ANTIC sets. */
|
2004-05-13 08:41:07 +02:00
|
|
|
|
|
|
|
static void
|
2004-06-12 02:18:35 +02:00
|
|
|
compute_antic (void)
|
2004-05-13 08:41:07 +02:00
|
|
|
{
|
2004-06-12 02:18:35 +02:00
|
|
|
bool changed = true;
|
|
|
|
basic_block bb;
|
|
|
|
int num_iterations = 0;
|
|
|
|
FOR_ALL_BB (bb)
|
|
|
|
{
|
|
|
|
ANTIC_IN (bb) = set_new (true);
|
targhooks.c (default_unwind_emit, [...]): Use gcc_assert, gcc_unreachable & internal_error instead of abort.
* targhooks.c (default_unwind_emit, default_scalar_mode_supported_p):
Use gcc_assert, gcc_unreachable & internal_error instead of abort.
* timevar.c (timevar_push, timevar_pop, timevar_start,
timevar_stop): Likewise.
* toplev.c (default_pch_valid_p): Likewise.
* tracer.c (tail_duplicate): Likewise.
* tree-alias-common.c (get_alias_var_decl,
get_values_from_constructor, create_alias_var, delete_alias_vars,
empty_points_to_set, same_points_to_set, ptr_may_alias_var):
Likewise.
* tree.c (tree_size, make_node_stat, copy_node_stat,
build_int_cst_wide, integer_all_onesp, list_length, chainon,
tree_node_structure, type_contains_placeholder_p, substitute_in_expr,
substitute_placeholder_in_expr, tabilize_reference_1, build0_stat,
build1_stat, build2_stat, build3_stat, build4_stat, is_attribute_p,
lookup_attribute, type_hash_canon, host_integerp, iterative_hash_expr,
build_method_type_directly, decl_type_context, get_callee_fndecl,
get_set_constructor_bits, build_vector_type_for_mode, int_cst_value,
tree_fold_gcd): Likewise.
* tree-cfg.c (create_bb, make_ctrl_stmt_edges, make_exit_edges,
make_cond_expr_edges, group_case_labels, tree_merge_blocks,
cleanup_control_expr_graph, find_taken_edge,
find_taken_edge_switch_expr, phi_alternatives_equal,
is_ctrl_altering_stmt, disband_implicit_edges, set_bb_for_stmt,
stmt_for_bsi, tree_find_edge_insert_loc, bsi_insert_on_edge_immediate,
tree_split_edge, tree_verify_flow_info, thread_jumps,
tree_redirect_edge_and_branch, tree_flow_call_edges_add): Likewise.
* tree-chrec.c (chrec_fold_poly_cst, chrec_fold_plus_poly_poly,
chrec_fold_multiply_poly_poly): Likewise.
* tree-complex.c (extract_component, expand_complex_division,
expand_complex_comparison, expand_complex_operations_1,
build_replicated_const, expand_vector_operations_1): Likewise.
* tree-data-ref.c (tree_fold_bezout, build_classic_dist_vector,
build_classic_dir_vector): Likewise.
* tree-dfa.c (compute_immediate_uses_for_phi,
compute_immediate_uses_for_stmt, create_var_ann, create_stmt_ann,
create_tree_ann, collect_dfa_stats, get_virtual_var): Likewise.
* tree-dump.c (dequeue_and_dump): Likewise.
* tree-eh.c (record_stmt_eh_region, add_stmt_to_eh_region,
record_in_finally_tree, replace_goto_queue_1,
maybe_record_in_goto_queue, verify_norecord_switch_expr,
do_return_redirection): Likewise.
* tree-if-conv.c (tree_if_convert_stmt, tree_if_convert_cond_expr,
add_to_dst_predicate_list, find_phi_replacement_condition,
replace_phi_with_cond_modify_expr, get_loop_body_in_if_conv_order):
Likewise.
* tree-inline.c (remap_decl, remap_type, remap_decls, copy_body_r,
initialize_inlined_parameters, declare_return_variable,
estimate_num_insns_1, expand_call_inline, expand_calls_inline,
optimize_inline_calls, copy_tree_r): Likewise.
* tree-into-ssa.c (rewrite_initialize_block_local_data, rewrite_stmt,
ssa_rewrite_stmt, rewrite_into_ssa): Likewise.
* tree-iterator.c (alloc_stmt_list, tsi_link_before, tsi_link_after,
tsi_split_statement_list_after, tsi_split_statement_list_before):
Likewise.
* tree-mudflap.c (mf_varname_tree): Likewise.
* tree-nested.c (create_tmp_var_for, lookup_field_for_decl,
lookup_tramp_for_decl, convert_all_function_calls): Likewise.
* tree-optimize.c (tree_rest_of_compilation): Likewise.
* tree-outof-ssa.c (create_temp, eliminate_build, eliminate_phi,
coalesce_abnormal_edges, coalesce_ssa_name, eliminate_virtual_phis,
free_temp_expr_table, add_dependance, finish_expr, rewrite_trees):
Likewise.
* tree-phinodes.c (resize_phi_node, add_phi_arg,
remove_all_phi_nodes_for): Likewise.
* tree-pretty-print.c (op_prio, print_call_name): Likewise.
* tree-profile.c (tree_gen_interval_profiler, tree_gen_pow2_profiler,
tree_gen_one_value_profiler, tree_gen_const_delta_profiler): Likewise.
* tree-sra.c (type_can_instantiate_all_elements, sra_hash_tree,
sra_elt_eq, sra_walk_expr, instantiate_missing_elements,
generate_one_element_ref, generate_element_copy,
generate_element_zero, scalarize_copy, scalarize_init,
scalarize_ldst): Likewise.
* tree-ssa-alias.c (delete_alias_info, group_aliases, may_alias_p,
add_may_alias, add_pointed_to_expr, add_pointed_to_var,
collect_points_to_info_r, get_tmt_for, get_ptr_info): Likewise.
* tree-ssa.c (walk_use_def_chains, check_phi_redundancy): Likewise.
* tree-ssa-ccp.c (dump_lattice_value, get_default_value, get_value,
set_lattice_value, likely_value, ccp_visit_phi_node, visit_assignment,
widen_bitfield, ccp_fold_builtin): Likewise.
* tree-ssa-copy.c (may_propagate_copy, merge_alias_info,
replace_exp_1, propagate_tree_value): Likewise.
* tree-ssa-copyrename.c (copy_rename_partition_coalesce): Likewise.
* tree-ssa-dce.c (set_control_dependence_map_bit,
find_control_dependence, find_pdom, mark_operand_necessary,
mark_stmt_if_obviously_necessary,
mark_control_dependent_edges_necessary, remove_dead_stmt): Likewise.
* tree-ssa-dom.c (dom_opt_initialize_block_local_data,
simplify_switch_and_lookup_avail_expr, cprop_into_successor_phis,
eliminate_redundant_computations, avail_expr_eq): Likewise.
* tree-ssa-dse.c (fix_stmt_v_may_defs): Likewise.
* tree-ssa-loop-ch.c (should_duplicate_loop_header_p,
duplicate_blocks): Likewise.
* tree-ssa-loop-im.c (for_each_index, set_level,
is_call_clobbered_ref): Likewise.
* tree-ssa-loop-ivopts.c (dump_use, divide, stmt_after_ip_normal_pos,
stmt_after_increment, set_iv, contains_abnormal_ssa_name_p,
find_interesting_uses_outer_or_nonlin, add_derived_ivs_candidates,
peel_address, ptr_difference_cost, may_replace_final_value,
determine_use_iv_cost, rewrite_use_nonlinear_expr, rewrite_use_outer,
rewrite_use, rewrite_uses): Likewise.
* tree-ssa-loop-manip.c (rewrite_into_loop_closed_ssa,
check_loop_closed_ssa_use): Likewise.
* tree-ssanames.c (make_ssa_name): Likewise.
* tree-ssa-operands.c (finalize_ssa_defs, finalize_ssa_uses,
finalize_ssa_v_must_defs, finalize_ssa_stmt_operands,
get_stmt_operands, get_expr_operands, get_asm_expr_operands,
get_indirect_ref_operands, add_stmt_operand): Likewise.
* tree-ssa-pre.c (value_exists_in_set_bitmap,
value_remove_from_set_bitmap, bitmap_insert_into_set, insert_into_set,
phi_translate, valid_in_set, compute_antic,
find_or_generate_expression, create_expression_by_pieces, insert_aux,
create_value_expr_from, eliminate): Likewise.
* tree-ssa-propagate.c (cfg_blocks_get): Likewise.
* tree-ssa-threadupdate.c (remove_last_stmt_and_useless_edges):
Likewise.
* tree-tailcall.c (independent_of_stmt_p, adjust_return_value,
eliminate_tail_call): Likewise.
* tree-vectorizer.c (vect_create_index_for_array_ref,
vect_align_data_ref, vect_create_data_ref,
vect_create_destination_var, vect_get_vec_def_for_operand,
vect_finish_stmt_generation, vect_transform_stmt,
vect_transform_loop_bound, vect_transform_loop,
vect_analyze_operations): Likewise.
* tree-vn.c (vn_compute, set_value_handle, get_value_handle):
Likewise.
* tree-flow-inline.h (var_ann, get_var_ann, get_def_from_ptr,
get_use_op_ptr, immediate_use, phi_ssa_name_p, bsi_start,
bsi_after_labels, bsi_last): Likewise.
* tree-ssa-live.c (var_union, change_partition_var,
create_ssa_var_map, calculate_live_on_entry, root_var_init,
type_var_init, add_coalesce, sort_coalesce_list, pop_best_coalesce):
Likewise.
* tree-ssa-live.h (partition_is_global, live_entry_blocks,
tpa_find_tree): Likewise.
(register_ssa_partition_check): Declare.
(register_ssa_partition): use it.
* tree-ssa-live.c: Include errors.h.
(register_ssa_partition_check): New.
* tree-ssa-operands.c: Include errors.h.
* Makefile.in (tree-ssa-operands.o): Depend on errors.h.
Co-Authored-By: Nathan Sidwell <nathan@codesourcery.com>
From-SVN: r87223
2004-09-09 09:54:12 +02:00
|
|
|
gcc_assert (!(bb->flags & BB_VISITED));
|
2004-06-12 02:18:35 +02:00
|
|
|
}
|
|
|
|
|
|
|
|
while (changed)
|
|
|
|
{
|
|
|
|
num_iterations++;
|
|
|
|
changed = false;
|
|
|
|
changed = compute_antic_aux (EXIT_BLOCK_PTR);
|
|
|
|
}
|
2004-06-20 23:12:55 +02:00
|
|
|
FOR_ALL_BB (bb)
|
|
|
|
{
|
|
|
|
bb->flags &= ~BB_VISITED;
|
|
|
|
}
|
2004-06-12 02:18:35 +02:00
|
|
|
if (num_iterations > 2 && dump_file && (dump_flags & TDF_STATS))
|
|
|
|
fprintf (dump_file, "compute_antic required %d iterations\n", num_iterations);
|
2004-05-13 08:41:07 +02:00
|
|
|
}
|
|
|
|
|
2004-06-21 23:57:33 +02:00
|
|
|
|
|
|
|
/* Find a leader for an expression, or generate one using
|
|
|
|
create_expression_by_pieces if it's ANTIC but
|
|
|
|
complex.
|
|
|
|
BLOCK is the basic_block we are looking for leaders in.
|
|
|
|
EXPR is the expression to find a leader or generate for.
|
|
|
|
STMTS is the statement list to put the inserted expressions on.
|
|
|
|
Returns the SSA_NAME of the LHS of the generated expression or the
|
|
|
|
leader. */
|
|
|
|
|
|
|
|
static tree
|
|
|
|
find_or_generate_expression (basic_block block, tree expr, tree stmts)
|
|
|
|
{
|
|
|
|
tree genop;
|
2004-07-02 20:47:29 +02:00
|
|
|
genop = bitmap_find_leader (AVAIL_OUT (block), expr);
|
2004-06-21 23:57:33 +02:00
|
|
|
/* Depending on the order we process DOM branches in, the value
|
|
|
|
may not have propagated to all the dom children yet during
|
|
|
|
this iteration. In this case, the value will always be in
|
c-typeck.c, [...]: Fix comment typos.
* c-typeck.c, cfgexpand.c, ddg.c, ddg.h, df.c, fold-const.c,
gcov.c, gimplify.c, modulo-sched.c, passes.c, tree-cfg.c,
tree-mudflap.c, tree-nrv.c, tree-outof-ssa.c, tree-ssa-dom.c,
tree-ssa-dse.c, tree-ssa-operands.c, tree-ssa-pre.c,
tree-tailcall.c: Fix comment typos. Follow spelling
conventions.
From-SVN: r83703
2004-06-26 07:03:55 +02:00
|
|
|
the NEW_SETS for us already, having been propagated from our
|
2004-06-21 23:57:33 +02:00
|
|
|
dominator. */
|
|
|
|
if (genop == NULL)
|
2004-07-05 00:51:36 +02:00
|
|
|
genop = bitmap_find_leader (NEW_SETS (block), expr);
|
2004-06-21 23:57:33 +02:00
|
|
|
/* If it's still NULL, see if it is a complex expression, and if
|
|
|
|
so, generate it recursively, otherwise, abort, because it's
|
|
|
|
not really . */
|
|
|
|
if (genop == NULL)
|
|
|
|
{
|
2004-06-23 22:12:44 +02:00
|
|
|
genop = VALUE_HANDLE_EXPR_SET (expr)->head->expr;
|
alias.c (find_base_decl): Remove unreachable case '3' block.
2004-09-17 Jeffrey D. Oldham <oldham@codesourcery.com>
Zack Weinberg <zack@codesourcery.com>
* alias.c (find_base_decl): Remove unreachable case '3' block.
* expr.c (safe_from_p): Abort if passed a type.
* tree-gimple.c (recalculate_side_effects): Abort if passed
anything other than an expression.
* tree-ssa-pre.c (phi_translate): Return expr immediately if
is_gimple_min_invariant is true for it. Reorder cases for clarity.
Abort on un-handled tree classes.
(valid_in_set): Likewise.
* tree.c (tree_code_class_strings): New static data.
* tree.h (enum tree_code_class): New.
(tree_code_class_strings): Declare.
(TREE_CODE_CLASS_STRING, EXCEPTIONAL_CLASS_P, CONSTANT_CLASS_P)
(REFERENCE_CLASS_P, COMPARISON_CLASS_P, UNARY_CLASS_P, BINARY_CLASS_P)
(STATEMENT_CLASS_P, EXPRESSION_CLASS_P, IS_TYPE_OR_DECL_P): New macros.
(TYPE_P, DECL_P, IS_NON_TYPE_CODE_CLASS, IS_EXPR_CODE_CLASS)
(checking macros, EXPR_LOCATION, SET_EXPR_LOCATION, EXPR_LOCUS): Update.
* tree.def, c-common.def, objc/objc-tree.def: Use
tree_code_class enumeration constants instead of code letters.
* alias.c, builtins.c, c-common.c, c-format.c, c-lang.c, c-pragma.c
* c-typeck.c, cgraphunit.c, convert.c, dbxout.c, dwarf2out.c
* emit-rtl.c expr.c, fold-const.c, gimplify.c, lambda-code.c
* langhooks.c, langhooks.h, predict.c, print-tree.c, reload1.c, stmt.c
* tree-browser.c, tree-cfg.c, tree-chrec.c, tree-complex.c, tree-dfa.c
* tree-dump.c, tree-eh.c, tree-gimple.c, tree-inline.c, tree-nested.c
* tree-outof-ssa.c, tree-pretty-print.c, tree-sra.c, tree-ssa-ccp.c
* tree-ssa-dce.c, tree-ssa-dom.c, tree-ssa-forwprop.c, tree-ssa-live.c
* tree-ssa-loop-im.c, tree-ssa-loop-ivopts.c, tree-ssa-operands.c
* tree-ssa-phiopt.c, tree-ssa-pre.c, tree-ssa-propagate.c
* tree-ssa.c, tree-ssanames.c, tree-tailcall.c, tree.c, varasm.c
* config/sol2-c.c, config/arm/arm.c, config/i386/winnt.c
* config/pa/pa.c, config/pa/pa.h, config/sh/sh.c, objc/objc-lang.c
Update to match.
* LANGUAGES: Add note about change.
ada:
* ada-tree.def: Use tree_code_class enumeration constants
instead of code letters.
* ada-tree.h, decl.c, misc.c, trans.c, utils.c, utils2.c:
Update for new tree-class enumeration constants.
cp:
* cp-tree.def: Use tree_code_class enumeration constants
instead of code letters.
* call.c, class.c, cp-gimplify.c, cp-lang.c, cxx-pretty-print.c
* mangle.c, pt.c, semantics.c, tree.c, typeck.c:
Update for new tree-class enumeration constants.
fortran:
* f95-lang.c, trans-expr.c, trans.c: Update for new tree-class
enumeration constants.
java:
* java-tree.def: Use tree_code_class enumeration constants
instead of code letters.
* java-gimplify.c, jcf-write.c, lang.c, parse.y: Update for
new tree-class enumeration constants.
treelang:
* treetree.c: Update for new tree-class enumeration constants.
From-SVN: r87675
2004-09-17 23:55:02 +02:00
|
|
|
gcc_assert (UNARY_CLASS_P (genop)
|
|
|
|
|| BINARY_CLASS_P (genop)
|
|
|
|
|| REFERENCE_CLASS_P (genop));
|
2004-06-21 23:57:33 +02:00
|
|
|
genop = create_expression_by_pieces (block, genop, stmts);
|
|
|
|
}
|
|
|
|
return genop;
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
/* Create an expression in pieces, so that we can handle very complex
|
|
|
|
expressions that may be ANTIC, but not necessary GIMPLE.
|
|
|
|
BLOCK is the basic block the expression will be inserted into,
|
|
|
|
EXPR is the expression to insert (in value form)
|
|
|
|
STMTS is a statement list to append the necessary insertions into.
|
|
|
|
|
|
|
|
This function will abort if we hit some value that shouldn't be
|
|
|
|
ANTIC but is (IE there is no leader for it, or its components).
|
|
|
|
This function may also generate expressions that are themselves
|
|
|
|
partially or fully redundant. Those that are will be either made
|
|
|
|
fully redundant during the next iteration of insert (for partially
|
|
|
|
redundant ones), or eliminated by eliminate (for fully redundant
|
|
|
|
ones). */
|
|
|
|
|
|
|
|
static tree
|
|
|
|
create_expression_by_pieces (basic_block block, tree expr, tree stmts)
|
|
|
|
{
|
|
|
|
tree name = NULL_TREE;
|
|
|
|
tree newexpr = NULL_TREE;
|
|
|
|
tree v;
|
|
|
|
|
|
|
|
switch (TREE_CODE_CLASS (TREE_CODE (expr)))
|
|
|
|
{
|
alias.c (find_base_decl): Remove unreachable case '3' block.
2004-09-17 Jeffrey D. Oldham <oldham@codesourcery.com>
Zack Weinberg <zack@codesourcery.com>
* alias.c (find_base_decl): Remove unreachable case '3' block.
* expr.c (safe_from_p): Abort if passed a type.
* tree-gimple.c (recalculate_side_effects): Abort if passed
anything other than an expression.
* tree-ssa-pre.c (phi_translate): Return expr immediately if
is_gimple_min_invariant is true for it. Reorder cases for clarity.
Abort on un-handled tree classes.
(valid_in_set): Likewise.
* tree.c (tree_code_class_strings): New static data.
* tree.h (enum tree_code_class): New.
(tree_code_class_strings): Declare.
(TREE_CODE_CLASS_STRING, EXCEPTIONAL_CLASS_P, CONSTANT_CLASS_P)
(REFERENCE_CLASS_P, COMPARISON_CLASS_P, UNARY_CLASS_P, BINARY_CLASS_P)
(STATEMENT_CLASS_P, EXPRESSION_CLASS_P, IS_TYPE_OR_DECL_P): New macros.
(TYPE_P, DECL_P, IS_NON_TYPE_CODE_CLASS, IS_EXPR_CODE_CLASS)
(checking macros, EXPR_LOCATION, SET_EXPR_LOCATION, EXPR_LOCUS): Update.
* tree.def, c-common.def, objc/objc-tree.def: Use
tree_code_class enumeration constants instead of code letters.
* alias.c, builtins.c, c-common.c, c-format.c, c-lang.c, c-pragma.c
* c-typeck.c, cgraphunit.c, convert.c, dbxout.c, dwarf2out.c
* emit-rtl.c expr.c, fold-const.c, gimplify.c, lambda-code.c
* langhooks.c, langhooks.h, predict.c, print-tree.c, reload1.c, stmt.c
* tree-browser.c, tree-cfg.c, tree-chrec.c, tree-complex.c, tree-dfa.c
* tree-dump.c, tree-eh.c, tree-gimple.c, tree-inline.c, tree-nested.c
* tree-outof-ssa.c, tree-pretty-print.c, tree-sra.c, tree-ssa-ccp.c
* tree-ssa-dce.c, tree-ssa-dom.c, tree-ssa-forwprop.c, tree-ssa-live.c
* tree-ssa-loop-im.c, tree-ssa-loop-ivopts.c, tree-ssa-operands.c
* tree-ssa-phiopt.c, tree-ssa-pre.c, tree-ssa-propagate.c
* tree-ssa.c, tree-ssanames.c, tree-tailcall.c, tree.c, varasm.c
* config/sol2-c.c, config/arm/arm.c, config/i386/winnt.c
* config/pa/pa.c, config/pa/pa.h, config/sh/sh.c, objc/objc-lang.c
Update to match.
* LANGUAGES: Add note about change.
ada:
* ada-tree.def: Use tree_code_class enumeration constants
instead of code letters.
* ada-tree.h, decl.c, misc.c, trans.c, utils.c, utils2.c:
Update for new tree-class enumeration constants.
cp:
* cp-tree.def: Use tree_code_class enumeration constants
instead of code letters.
* call.c, class.c, cp-gimplify.c, cp-lang.c, cxx-pretty-print.c
* mangle.c, pt.c, semantics.c, tree.c, typeck.c:
Update for new tree-class enumeration constants.
fortran:
* f95-lang.c, trans-expr.c, trans.c: Update for new tree-class
enumeration constants.
java:
* java-tree.def: Use tree_code_class enumeration constants
instead of code letters.
* java-gimplify.c, jcf-write.c, lang.c, parse.y: Update for
new tree-class enumeration constants.
treelang:
* treetree.c: Update for new tree-class enumeration constants.
From-SVN: r87675
2004-09-17 23:55:02 +02:00
|
|
|
case tcc_binary:
|
2004-06-21 23:57:33 +02:00
|
|
|
{
|
|
|
|
tree_stmt_iterator tsi;
|
|
|
|
tree genop1, genop2;
|
|
|
|
tree temp;
|
|
|
|
tree op1 = TREE_OPERAND (expr, 0);
|
|
|
|
tree op2 = TREE_OPERAND (expr, 1);
|
|
|
|
genop1 = find_or_generate_expression (block, op1, stmts);
|
|
|
|
genop2 = find_or_generate_expression (block, op2, stmts);
|
|
|
|
temp = create_tmp_var (TREE_TYPE (expr), "pretmp");
|
|
|
|
add_referenced_tmp_var (temp);
|
|
|
|
newexpr = build (TREE_CODE (expr), TREE_TYPE (expr),
|
|
|
|
genop1, genop2);
|
|
|
|
newexpr = build (MODIFY_EXPR, TREE_TYPE (expr),
|
|
|
|
temp, newexpr);
|
|
|
|
name = make_ssa_name (temp, newexpr);
|
|
|
|
TREE_OPERAND (newexpr, 0) = name;
|
|
|
|
tsi = tsi_last (stmts);
|
|
|
|
tsi_link_after (&tsi, newexpr, TSI_CONTINUE_LINKING);
|
|
|
|
pre_stats.insertions++;
|
|
|
|
break;
|
|
|
|
}
|
alias.c (find_base_decl): Remove unreachable case '3' block.
2004-09-17 Jeffrey D. Oldham <oldham@codesourcery.com>
Zack Weinberg <zack@codesourcery.com>
* alias.c (find_base_decl): Remove unreachable case '3' block.
* expr.c (safe_from_p): Abort if passed a type.
* tree-gimple.c (recalculate_side_effects): Abort if passed
anything other than an expression.
* tree-ssa-pre.c (phi_translate): Return expr immediately if
is_gimple_min_invariant is true for it. Reorder cases for clarity.
Abort on un-handled tree classes.
(valid_in_set): Likewise.
* tree.c (tree_code_class_strings): New static data.
* tree.h (enum tree_code_class): New.
(tree_code_class_strings): Declare.
(TREE_CODE_CLASS_STRING, EXCEPTIONAL_CLASS_P, CONSTANT_CLASS_P)
(REFERENCE_CLASS_P, COMPARISON_CLASS_P, UNARY_CLASS_P, BINARY_CLASS_P)
(STATEMENT_CLASS_P, EXPRESSION_CLASS_P, IS_TYPE_OR_DECL_P): New macros.
(TYPE_P, DECL_P, IS_NON_TYPE_CODE_CLASS, IS_EXPR_CODE_CLASS)
(checking macros, EXPR_LOCATION, SET_EXPR_LOCATION, EXPR_LOCUS): Update.
* tree.def, c-common.def, objc/objc-tree.def: Use
tree_code_class enumeration constants instead of code letters.
* alias.c, builtins.c, c-common.c, c-format.c, c-lang.c, c-pragma.c
* c-typeck.c, cgraphunit.c, convert.c, dbxout.c, dwarf2out.c
* emit-rtl.c expr.c, fold-const.c, gimplify.c, lambda-code.c
* langhooks.c, langhooks.h, predict.c, print-tree.c, reload1.c, stmt.c
* tree-browser.c, tree-cfg.c, tree-chrec.c, tree-complex.c, tree-dfa.c
* tree-dump.c, tree-eh.c, tree-gimple.c, tree-inline.c, tree-nested.c
* tree-outof-ssa.c, tree-pretty-print.c, tree-sra.c, tree-ssa-ccp.c
* tree-ssa-dce.c, tree-ssa-dom.c, tree-ssa-forwprop.c, tree-ssa-live.c
* tree-ssa-loop-im.c, tree-ssa-loop-ivopts.c, tree-ssa-operands.c
* tree-ssa-phiopt.c, tree-ssa-pre.c, tree-ssa-propagate.c
* tree-ssa.c, tree-ssanames.c, tree-tailcall.c, tree.c, varasm.c
* config/sol2-c.c, config/arm/arm.c, config/i386/winnt.c
* config/pa/pa.c, config/pa/pa.h, config/sh/sh.c, objc/objc-lang.c
Update to match.
* LANGUAGES: Add note about change.
ada:
* ada-tree.def: Use tree_code_class enumeration constants
instead of code letters.
* ada-tree.h, decl.c, misc.c, trans.c, utils.c, utils2.c:
Update for new tree-class enumeration constants.
cp:
* cp-tree.def: Use tree_code_class enumeration constants
instead of code letters.
* call.c, class.c, cp-gimplify.c, cp-lang.c, cxx-pretty-print.c
* mangle.c, pt.c, semantics.c, tree.c, typeck.c:
Update for new tree-class enumeration constants.
fortran:
* f95-lang.c, trans-expr.c, trans.c: Update for new tree-class
enumeration constants.
java:
* java-tree.def: Use tree_code_class enumeration constants
instead of code letters.
* java-gimplify.c, jcf-write.c, lang.c, parse.y: Update for
new tree-class enumeration constants.
treelang:
* treetree.c: Update for new tree-class enumeration constants.
From-SVN: r87675
2004-09-17 23:55:02 +02:00
|
|
|
case tcc_unary:
|
2004-06-21 23:57:33 +02:00
|
|
|
{
|
|
|
|
tree_stmt_iterator tsi;
|
|
|
|
tree genop1;
|
|
|
|
tree temp;
|
|
|
|
tree op1 = TREE_OPERAND (expr, 0);
|
|
|
|
genop1 = find_or_generate_expression (block, op1, stmts);
|
|
|
|
temp = create_tmp_var (TREE_TYPE (expr), "pretmp");
|
|
|
|
add_referenced_tmp_var (temp);
|
|
|
|
newexpr = build (TREE_CODE (expr), TREE_TYPE (expr),
|
|
|
|
genop1);
|
|
|
|
newexpr = build (MODIFY_EXPR, TREE_TYPE (expr),
|
|
|
|
temp, newexpr);
|
|
|
|
name = make_ssa_name (temp, newexpr);
|
|
|
|
TREE_OPERAND (newexpr, 0) = name;
|
|
|
|
tsi = tsi_last (stmts);
|
|
|
|
tsi_link_after (&tsi, newexpr, TSI_CONTINUE_LINKING);
|
|
|
|
pre_stats.insertions++;
|
|
|
|
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
default:
|
targhooks.c (default_unwind_emit, [...]): Use gcc_assert, gcc_unreachable & internal_error instead of abort.
* targhooks.c (default_unwind_emit, default_scalar_mode_supported_p):
Use gcc_assert, gcc_unreachable & internal_error instead of abort.
* timevar.c (timevar_push, timevar_pop, timevar_start,
timevar_stop): Likewise.
* toplev.c (default_pch_valid_p): Likewise.
* tracer.c (tail_duplicate): Likewise.
* tree-alias-common.c (get_alias_var_decl,
get_values_from_constructor, create_alias_var, delete_alias_vars,
empty_points_to_set, same_points_to_set, ptr_may_alias_var):
Likewise.
* tree.c (tree_size, make_node_stat, copy_node_stat,
build_int_cst_wide, integer_all_onesp, list_length, chainon,
tree_node_structure, type_contains_placeholder_p, substitute_in_expr,
substitute_placeholder_in_expr, tabilize_reference_1, build0_stat,
build1_stat, build2_stat, build3_stat, build4_stat, is_attribute_p,
lookup_attribute, type_hash_canon, host_integerp, iterative_hash_expr,
build_method_type_directly, decl_type_context, get_callee_fndecl,
get_set_constructor_bits, build_vector_type_for_mode, int_cst_value,
tree_fold_gcd): Likewise.
* tree-cfg.c (create_bb, make_ctrl_stmt_edges, make_exit_edges,
make_cond_expr_edges, group_case_labels, tree_merge_blocks,
cleanup_control_expr_graph, find_taken_edge,
find_taken_edge_switch_expr, phi_alternatives_equal,
is_ctrl_altering_stmt, disband_implicit_edges, set_bb_for_stmt,
stmt_for_bsi, tree_find_edge_insert_loc, bsi_insert_on_edge_immediate,
tree_split_edge, tree_verify_flow_info, thread_jumps,
tree_redirect_edge_and_branch, tree_flow_call_edges_add): Likewise.
* tree-chrec.c (chrec_fold_poly_cst, chrec_fold_plus_poly_poly,
chrec_fold_multiply_poly_poly): Likewise.
* tree-complex.c (extract_component, expand_complex_division,
expand_complex_comparison, expand_complex_operations_1,
build_replicated_const, expand_vector_operations_1): Likewise.
* tree-data-ref.c (tree_fold_bezout, build_classic_dist_vector,
build_classic_dir_vector): Likewise.
* tree-dfa.c (compute_immediate_uses_for_phi,
compute_immediate_uses_for_stmt, create_var_ann, create_stmt_ann,
create_tree_ann, collect_dfa_stats, get_virtual_var): Likewise.
* tree-dump.c (dequeue_and_dump): Likewise.
* tree-eh.c (record_stmt_eh_region, add_stmt_to_eh_region,
record_in_finally_tree, replace_goto_queue_1,
maybe_record_in_goto_queue, verify_norecord_switch_expr,
do_return_redirection): Likewise.
* tree-if-conv.c (tree_if_convert_stmt, tree_if_convert_cond_expr,
add_to_dst_predicate_list, find_phi_replacement_condition,
replace_phi_with_cond_modify_expr, get_loop_body_in_if_conv_order):
Likewise.
* tree-inline.c (remap_decl, remap_type, remap_decls, copy_body_r,
initialize_inlined_parameters, declare_return_variable,
estimate_num_insns_1, expand_call_inline, expand_calls_inline,
optimize_inline_calls, copy_tree_r): Likewise.
* tree-into-ssa.c (rewrite_initialize_block_local_data, rewrite_stmt,
ssa_rewrite_stmt, rewrite_into_ssa): Likewise.
* tree-iterator.c (alloc_stmt_list, tsi_link_before, tsi_link_after,
tsi_split_statement_list_after, tsi_split_statement_list_before):
Likewise.
* tree-mudflap.c (mf_varname_tree): Likewise.
* tree-nested.c (create_tmp_var_for, lookup_field_for_decl,
lookup_tramp_for_decl, convert_all_function_calls): Likewise.
* tree-optimize.c (tree_rest_of_compilation): Likewise.
* tree-outof-ssa.c (create_temp, eliminate_build, eliminate_phi,
coalesce_abnormal_edges, coalesce_ssa_name, eliminate_virtual_phis,
free_temp_expr_table, add_dependance, finish_expr, rewrite_trees):
Likewise.
* tree-phinodes.c (resize_phi_node, add_phi_arg,
remove_all_phi_nodes_for): Likewise.
* tree-pretty-print.c (op_prio, print_call_name): Likewise.
* tree-profile.c (tree_gen_interval_profiler, tree_gen_pow2_profiler,
tree_gen_one_value_profiler, tree_gen_const_delta_profiler): Likewise.
* tree-sra.c (type_can_instantiate_all_elements, sra_hash_tree,
sra_elt_eq, sra_walk_expr, instantiate_missing_elements,
generate_one_element_ref, generate_element_copy,
generate_element_zero, scalarize_copy, scalarize_init,
scalarize_ldst): Likewise.
* tree-ssa-alias.c (delete_alias_info, group_aliases, may_alias_p,
add_may_alias, add_pointed_to_expr, add_pointed_to_var,
collect_points_to_info_r, get_tmt_for, get_ptr_info): Likewise.
* tree-ssa.c (walk_use_def_chains, check_phi_redundancy): Likewise.
* tree-ssa-ccp.c (dump_lattice_value, get_default_value, get_value,
set_lattice_value, likely_value, ccp_visit_phi_node, visit_assignment,
widen_bitfield, ccp_fold_builtin): Likewise.
* tree-ssa-copy.c (may_propagate_copy, merge_alias_info,
replace_exp_1, propagate_tree_value): Likewise.
* tree-ssa-copyrename.c (copy_rename_partition_coalesce): Likewise.
* tree-ssa-dce.c (set_control_dependence_map_bit,
find_control_dependence, find_pdom, mark_operand_necessary,
mark_stmt_if_obviously_necessary,
mark_control_dependent_edges_necessary, remove_dead_stmt): Likewise.
* tree-ssa-dom.c (dom_opt_initialize_block_local_data,
simplify_switch_and_lookup_avail_expr, cprop_into_successor_phis,
eliminate_redundant_computations, avail_expr_eq): Likewise.
* tree-ssa-dse.c (fix_stmt_v_may_defs): Likewise.
* tree-ssa-loop-ch.c (should_duplicate_loop_header_p,
duplicate_blocks): Likewise.
* tree-ssa-loop-im.c (for_each_index, set_level,
is_call_clobbered_ref): Likewise.
* tree-ssa-loop-ivopts.c (dump_use, divide, stmt_after_ip_normal_pos,
stmt_after_increment, set_iv, contains_abnormal_ssa_name_p,
find_interesting_uses_outer_or_nonlin, add_derived_ivs_candidates,
peel_address, ptr_difference_cost, may_replace_final_value,
determine_use_iv_cost, rewrite_use_nonlinear_expr, rewrite_use_outer,
rewrite_use, rewrite_uses): Likewise.
* tree-ssa-loop-manip.c (rewrite_into_loop_closed_ssa,
check_loop_closed_ssa_use): Likewise.
* tree-ssanames.c (make_ssa_name): Likewise.
* tree-ssa-operands.c (finalize_ssa_defs, finalize_ssa_uses,
finalize_ssa_v_must_defs, finalize_ssa_stmt_operands,
get_stmt_operands, get_expr_operands, get_asm_expr_operands,
get_indirect_ref_operands, add_stmt_operand): Likewise.
* tree-ssa-pre.c (value_exists_in_set_bitmap,
value_remove_from_set_bitmap, bitmap_insert_into_set, insert_into_set,
phi_translate, valid_in_set, compute_antic,
find_or_generate_expression, create_expression_by_pieces, insert_aux,
create_value_expr_from, eliminate): Likewise.
* tree-ssa-propagate.c (cfg_blocks_get): Likewise.
* tree-ssa-threadupdate.c (remove_last_stmt_and_useless_edges):
Likewise.
* tree-tailcall.c (independent_of_stmt_p, adjust_return_value,
eliminate_tail_call): Likewise.
* tree-vectorizer.c (vect_create_index_for_array_ref,
vect_align_data_ref, vect_create_data_ref,
vect_create_destination_var, vect_get_vec_def_for_operand,
vect_finish_stmt_generation, vect_transform_stmt,
vect_transform_loop_bound, vect_transform_loop,
vect_analyze_operations): Likewise.
* tree-vn.c (vn_compute, set_value_handle, get_value_handle):
Likewise.
* tree-flow-inline.h (var_ann, get_var_ann, get_def_from_ptr,
get_use_op_ptr, immediate_use, phi_ssa_name_p, bsi_start,
bsi_after_labels, bsi_last): Likewise.
* tree-ssa-live.c (var_union, change_partition_var,
create_ssa_var_map, calculate_live_on_entry, root_var_init,
type_var_init, add_coalesce, sort_coalesce_list, pop_best_coalesce):
Likewise.
* tree-ssa-live.h (partition_is_global, live_entry_blocks,
tpa_find_tree): Likewise.
(register_ssa_partition_check): Declare.
(register_ssa_partition): use it.
* tree-ssa-live.c: Include errors.h.
(register_ssa_partition_check): New.
* tree-ssa-operands.c: Include errors.h.
* Makefile.in (tree-ssa-operands.o): Depend on errors.h.
Co-Authored-By: Nathan Sidwell <nathan@codesourcery.com>
From-SVN: r87223
2004-09-09 09:54:12 +02:00
|
|
|
gcc_unreachable ();
|
2004-06-21 23:57:33 +02:00
|
|
|
|
|
|
|
}
|
|
|
|
v = get_value_handle (expr);
|
2004-06-29 03:53:04 +02:00
|
|
|
vn_add (name, v, NULL);
|
2004-07-05 00:51:36 +02:00
|
|
|
bitmap_insert_into_set (NEW_SETS (block), name);
|
2004-07-02 20:47:29 +02:00
|
|
|
bitmap_value_insert_into_set (AVAIL_OUT (block), name);
|
2004-06-21 23:57:33 +02:00
|
|
|
if (dump_file && (dump_flags & TDF_DETAILS))
|
|
|
|
{
|
|
|
|
fprintf (dump_file, "Inserted ");
|
|
|
|
print_generic_expr (dump_file, newexpr, 0);
|
|
|
|
fprintf (dump_file, " in predecessor %d\n", block->index);
|
|
|
|
}
|
|
|
|
return name;
|
|
|
|
}
|
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
/* Perform insertion of partially redundant values.
|
|
|
|
For BLOCK, do the following:
|
|
|
|
1. Propagate the NEW_SETS of the dominator into the current block.
|
|
|
|
If the block has multiple predecessors,
|
|
|
|
2a. Iterate over the ANTIC expressions for the block to see if
|
|
|
|
any of them are partially redundant.
|
|
|
|
2b. If so, insert them into the necessary predecessors to make
|
|
|
|
the expression fully redundant.
|
|
|
|
2c. Insert a new PHI merging the values of the predecessors.
|
|
|
|
2d. Insert the new PHI, and the new expressions, into the
|
|
|
|
NEW_SETS set.
|
|
|
|
3. Recursively call ourselves on the dominator children of BLOCK.
|
2004-05-13 08:41:07 +02:00
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
*/
|
|
|
|
static bool
|
|
|
|
insert_aux (basic_block block)
|
2004-05-13 08:41:07 +02:00
|
|
|
{
|
2004-06-12 02:18:35 +02:00
|
|
|
basic_block son;
|
|
|
|
bool new_stuff = false;
|
2004-05-13 08:41:07 +02:00
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
if (block)
|
2004-05-13 08:41:07 +02:00
|
|
|
{
|
2004-06-12 02:18:35 +02:00
|
|
|
basic_block dom;
|
|
|
|
dom = get_immediate_dominator (CDI_DOMINATORS, block);
|
|
|
|
if (dom)
|
2004-06-10 23:41:08 +02:00
|
|
|
{
|
2004-07-05 00:51:36 +02:00
|
|
|
int i;
|
|
|
|
bitmap_set_t newset = NEW_SETS (dom);
|
|
|
|
EXECUTE_IF_SET_IN_BITMAP (newset->expressions, 0, i,
|
|
|
|
{
|
|
|
|
bitmap_insert_into_set (NEW_SETS (block), ssa_name (i));
|
|
|
|
bitmap_value_replace_in_set (AVAIL_OUT (block), ssa_name (i));
|
|
|
|
});
|
2004-06-12 02:18:35 +02:00
|
|
|
if (block->pred->pred_next)
|
2004-05-13 08:41:07 +02:00
|
|
|
{
|
2004-06-12 02:18:35 +02:00
|
|
|
value_set_node_t node;
|
|
|
|
for (node = ANTIC_IN (block)->head;
|
|
|
|
node;
|
|
|
|
node = node->next)
|
2004-05-13 08:41:07 +02:00
|
|
|
{
|
alias.c (find_base_decl): Remove unreachable case '3' block.
2004-09-17 Jeffrey D. Oldham <oldham@codesourcery.com>
Zack Weinberg <zack@codesourcery.com>
* alias.c (find_base_decl): Remove unreachable case '3' block.
* expr.c (safe_from_p): Abort if passed a type.
* tree-gimple.c (recalculate_side_effects): Abort if passed
anything other than an expression.
* tree-ssa-pre.c (phi_translate): Return expr immediately if
is_gimple_min_invariant is true for it. Reorder cases for clarity.
Abort on un-handled tree classes.
(valid_in_set): Likewise.
* tree.c (tree_code_class_strings): New static data.
* tree.h (enum tree_code_class): New.
(tree_code_class_strings): Declare.
(TREE_CODE_CLASS_STRING, EXCEPTIONAL_CLASS_P, CONSTANT_CLASS_P)
(REFERENCE_CLASS_P, COMPARISON_CLASS_P, UNARY_CLASS_P, BINARY_CLASS_P)
(STATEMENT_CLASS_P, EXPRESSION_CLASS_P, IS_TYPE_OR_DECL_P): New macros.
(TYPE_P, DECL_P, IS_NON_TYPE_CODE_CLASS, IS_EXPR_CODE_CLASS)
(checking macros, EXPR_LOCATION, SET_EXPR_LOCATION, EXPR_LOCUS): Update.
* tree.def, c-common.def, objc/objc-tree.def: Use
tree_code_class enumeration constants instead of code letters.
* alias.c, builtins.c, c-common.c, c-format.c, c-lang.c, c-pragma.c
* c-typeck.c, cgraphunit.c, convert.c, dbxout.c, dwarf2out.c
* emit-rtl.c expr.c, fold-const.c, gimplify.c, lambda-code.c
* langhooks.c, langhooks.h, predict.c, print-tree.c, reload1.c, stmt.c
* tree-browser.c, tree-cfg.c, tree-chrec.c, tree-complex.c, tree-dfa.c
* tree-dump.c, tree-eh.c, tree-gimple.c, tree-inline.c, tree-nested.c
* tree-outof-ssa.c, tree-pretty-print.c, tree-sra.c, tree-ssa-ccp.c
* tree-ssa-dce.c, tree-ssa-dom.c, tree-ssa-forwprop.c, tree-ssa-live.c
* tree-ssa-loop-im.c, tree-ssa-loop-ivopts.c, tree-ssa-operands.c
* tree-ssa-phiopt.c, tree-ssa-pre.c, tree-ssa-propagate.c
* tree-ssa.c, tree-ssanames.c, tree-tailcall.c, tree.c, varasm.c
* config/sol2-c.c, config/arm/arm.c, config/i386/winnt.c
* config/pa/pa.c, config/pa/pa.h, config/sh/sh.c, objc/objc-lang.c
Update to match.
* LANGUAGES: Add note about change.
ada:
* ada-tree.def: Use tree_code_class enumeration constants
instead of code letters.
* ada-tree.h, decl.c, misc.c, trans.c, utils.c, utils2.c:
Update for new tree-class enumeration constants.
cp:
* cp-tree.def: Use tree_code_class enumeration constants
instead of code letters.
* call.c, class.c, cp-gimplify.c, cp-lang.c, cxx-pretty-print.c
* mangle.c, pt.c, semantics.c, tree.c, typeck.c:
Update for new tree-class enumeration constants.
fortran:
* f95-lang.c, trans-expr.c, trans.c: Update for new tree-class
enumeration constants.
java:
* java-tree.def: Use tree_code_class enumeration constants
instead of code letters.
* java-gimplify.c, jcf-write.c, lang.c, parse.y: Update for
new tree-class enumeration constants.
treelang:
* treetree.c: Update for new tree-class enumeration constants.
From-SVN: r87675
2004-09-17 23:55:02 +02:00
|
|
|
if (BINARY_CLASS_P (node->expr)
|
|
|
|
|| UNARY_CLASS_P (node->expr))
|
2004-05-13 08:41:07 +02:00
|
|
|
{
|
2004-06-12 02:18:35 +02:00
|
|
|
tree *avail;
|
|
|
|
tree val;
|
|
|
|
bool by_some = false;
|
2004-06-17 14:53:33 +02:00
|
|
|
bool cant_insert = false;
|
2004-06-12 02:18:35 +02:00
|
|
|
bool all_same = true;
|
|
|
|
tree first_s = NULL;
|
|
|
|
edge pred;
|
|
|
|
basic_block bprime;
|
|
|
|
tree eprime;
|
2004-06-14 03:27:57 +02:00
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
val = get_value_handle (node->expr);
|
2004-07-05 00:51:36 +02:00
|
|
|
if (bitmap_set_contains_value (PHI_GEN (block), val))
|
2004-06-12 02:18:35 +02:00
|
|
|
continue;
|
2004-07-02 20:47:29 +02:00
|
|
|
if (bitmap_set_contains_value (AVAIL_OUT (dom), val))
|
2004-06-12 02:18:35 +02:00
|
|
|
{
|
|
|
|
if (dump_file && (dump_flags & TDF_DETAILS))
|
|
|
|
fprintf (dump_file, "Found fully redundant value\n");
|
|
|
|
continue;
|
|
|
|
}
|
2004-06-14 03:27:57 +02:00
|
|
|
|
|
|
|
avail = xcalloc (last_basic_block, sizeof (tree));
|
2004-06-12 02:18:35 +02:00
|
|
|
for (pred = block->pred;
|
|
|
|
pred;
|
|
|
|
pred = pred->pred_next)
|
|
|
|
{
|
|
|
|
tree vprime;
|
|
|
|
tree edoubleprime;
|
2004-07-17 00:51:48 +02:00
|
|
|
|
|
|
|
/* This can happen in the very weird case
|
|
|
|
that our fake infinite loop edges have caused a
|
|
|
|
critical edge to appear. */
|
|
|
|
if (EDGE_CRITICAL_P (pred))
|
|
|
|
{
|
|
|
|
cant_insert = true;
|
|
|
|
break;
|
|
|
|
}
|
2004-06-12 02:18:35 +02:00
|
|
|
bprime = pred->src;
|
|
|
|
eprime = phi_translate (node->expr,
|
|
|
|
ANTIC_IN (block),
|
|
|
|
bprime, block);
|
2004-06-14 03:27:57 +02:00
|
|
|
|
|
|
|
/* eprime will generally only be NULL if the
|
|
|
|
value of the expression, translated
|
|
|
|
through the PHI for this predecessor, is
|
|
|
|
undefined. If that is the case, we can't
|
|
|
|
make the expression fully redundant,
|
|
|
|
because its value is undefined along a
|
|
|
|
predecessor path. We can thus break out
|
|
|
|
early because it doesn't matter what the
|
|
|
|
rest of the results are. */
|
2004-06-12 02:18:35 +02:00
|
|
|
if (eprime == NULL)
|
2004-06-14 03:27:57 +02:00
|
|
|
{
|
|
|
|
cant_insert = true;
|
|
|
|
break;
|
|
|
|
}
|
2004-06-12 02:18:35 +02:00
|
|
|
|
|
|
|
vprime = get_value_handle (eprime);
|
targhooks.c (default_unwind_emit, [...]): Use gcc_assert, gcc_unreachable & internal_error instead of abort.
* targhooks.c (default_unwind_emit, default_scalar_mode_supported_p):
Use gcc_assert, gcc_unreachable & internal_error instead of abort.
* timevar.c (timevar_push, timevar_pop, timevar_start,
timevar_stop): Likewise.
* toplev.c (default_pch_valid_p): Likewise.
* tracer.c (tail_duplicate): Likewise.
* tree-alias-common.c (get_alias_var_decl,
get_values_from_constructor, create_alias_var, delete_alias_vars,
empty_points_to_set, same_points_to_set, ptr_may_alias_var):
Likewise.
* tree.c (tree_size, make_node_stat, copy_node_stat,
build_int_cst_wide, integer_all_onesp, list_length, chainon,
tree_node_structure, type_contains_placeholder_p, substitute_in_expr,
substitute_placeholder_in_expr, tabilize_reference_1, build0_stat,
build1_stat, build2_stat, build3_stat, build4_stat, is_attribute_p,
lookup_attribute, type_hash_canon, host_integerp, iterative_hash_expr,
build_method_type_directly, decl_type_context, get_callee_fndecl,
get_set_constructor_bits, build_vector_type_for_mode, int_cst_value,
tree_fold_gcd): Likewise.
* tree-cfg.c (create_bb, make_ctrl_stmt_edges, make_exit_edges,
make_cond_expr_edges, group_case_labels, tree_merge_blocks,
cleanup_control_expr_graph, find_taken_edge,
find_taken_edge_switch_expr, phi_alternatives_equal,
is_ctrl_altering_stmt, disband_implicit_edges, set_bb_for_stmt,
stmt_for_bsi, tree_find_edge_insert_loc, bsi_insert_on_edge_immediate,
tree_split_edge, tree_verify_flow_info, thread_jumps,
tree_redirect_edge_and_branch, tree_flow_call_edges_add): Likewise.
* tree-chrec.c (chrec_fold_poly_cst, chrec_fold_plus_poly_poly,
chrec_fold_multiply_poly_poly): Likewise.
* tree-complex.c (extract_component, expand_complex_division,
expand_complex_comparison, expand_complex_operations_1,
build_replicated_const, expand_vector_operations_1): Likewise.
* tree-data-ref.c (tree_fold_bezout, build_classic_dist_vector,
build_classic_dir_vector): Likewise.
* tree-dfa.c (compute_immediate_uses_for_phi,
compute_immediate_uses_for_stmt, create_var_ann, create_stmt_ann,
create_tree_ann, collect_dfa_stats, get_virtual_var): Likewise.
* tree-dump.c (dequeue_and_dump): Likewise.
* tree-eh.c (record_stmt_eh_region, add_stmt_to_eh_region,
record_in_finally_tree, replace_goto_queue_1,
maybe_record_in_goto_queue, verify_norecord_switch_expr,
do_return_redirection): Likewise.
* tree-if-conv.c (tree_if_convert_stmt, tree_if_convert_cond_expr,
add_to_dst_predicate_list, find_phi_replacement_condition,
replace_phi_with_cond_modify_expr, get_loop_body_in_if_conv_order):
Likewise.
* tree-inline.c (remap_decl, remap_type, remap_decls, copy_body_r,
initialize_inlined_parameters, declare_return_variable,
estimate_num_insns_1, expand_call_inline, expand_calls_inline,
optimize_inline_calls, copy_tree_r): Likewise.
* tree-into-ssa.c (rewrite_initialize_block_local_data, rewrite_stmt,
ssa_rewrite_stmt, rewrite_into_ssa): Likewise.
* tree-iterator.c (alloc_stmt_list, tsi_link_before, tsi_link_after,
tsi_split_statement_list_after, tsi_split_statement_list_before):
Likewise.
* tree-mudflap.c (mf_varname_tree): Likewise.
* tree-nested.c (create_tmp_var_for, lookup_field_for_decl,
lookup_tramp_for_decl, convert_all_function_calls): Likewise.
* tree-optimize.c (tree_rest_of_compilation): Likewise.
* tree-outof-ssa.c (create_temp, eliminate_build, eliminate_phi,
coalesce_abnormal_edges, coalesce_ssa_name, eliminate_virtual_phis,
free_temp_expr_table, add_dependance, finish_expr, rewrite_trees):
Likewise.
* tree-phinodes.c (resize_phi_node, add_phi_arg,
remove_all_phi_nodes_for): Likewise.
* tree-pretty-print.c (op_prio, print_call_name): Likewise.
* tree-profile.c (tree_gen_interval_profiler, tree_gen_pow2_profiler,
tree_gen_one_value_profiler, tree_gen_const_delta_profiler): Likewise.
* tree-sra.c (type_can_instantiate_all_elements, sra_hash_tree,
sra_elt_eq, sra_walk_expr, instantiate_missing_elements,
generate_one_element_ref, generate_element_copy,
generate_element_zero, scalarize_copy, scalarize_init,
scalarize_ldst): Likewise.
* tree-ssa-alias.c (delete_alias_info, group_aliases, may_alias_p,
add_may_alias, add_pointed_to_expr, add_pointed_to_var,
collect_points_to_info_r, get_tmt_for, get_ptr_info): Likewise.
* tree-ssa.c (walk_use_def_chains, check_phi_redundancy): Likewise.
* tree-ssa-ccp.c (dump_lattice_value, get_default_value, get_value,
set_lattice_value, likely_value, ccp_visit_phi_node, visit_assignment,
widen_bitfield, ccp_fold_builtin): Likewise.
* tree-ssa-copy.c (may_propagate_copy, merge_alias_info,
replace_exp_1, propagate_tree_value): Likewise.
* tree-ssa-copyrename.c (copy_rename_partition_coalesce): Likewise.
* tree-ssa-dce.c (set_control_dependence_map_bit,
find_control_dependence, find_pdom, mark_operand_necessary,
mark_stmt_if_obviously_necessary,
mark_control_dependent_edges_necessary, remove_dead_stmt): Likewise.
* tree-ssa-dom.c (dom_opt_initialize_block_local_data,
simplify_switch_and_lookup_avail_expr, cprop_into_successor_phis,
eliminate_redundant_computations, avail_expr_eq): Likewise.
* tree-ssa-dse.c (fix_stmt_v_may_defs): Likewise.
* tree-ssa-loop-ch.c (should_duplicate_loop_header_p,
duplicate_blocks): Likewise.
* tree-ssa-loop-im.c (for_each_index, set_level,
is_call_clobbered_ref): Likewise.
* tree-ssa-loop-ivopts.c (dump_use, divide, stmt_after_ip_normal_pos,
stmt_after_increment, set_iv, contains_abnormal_ssa_name_p,
find_interesting_uses_outer_or_nonlin, add_derived_ivs_candidates,
peel_address, ptr_difference_cost, may_replace_final_value,
determine_use_iv_cost, rewrite_use_nonlinear_expr, rewrite_use_outer,
rewrite_use, rewrite_uses): Likewise.
* tree-ssa-loop-manip.c (rewrite_into_loop_closed_ssa,
check_loop_closed_ssa_use): Likewise.
* tree-ssanames.c (make_ssa_name): Likewise.
* tree-ssa-operands.c (finalize_ssa_defs, finalize_ssa_uses,
finalize_ssa_v_must_defs, finalize_ssa_stmt_operands,
get_stmt_operands, get_expr_operands, get_asm_expr_operands,
get_indirect_ref_operands, add_stmt_operand): Likewise.
* tree-ssa-pre.c (value_exists_in_set_bitmap,
value_remove_from_set_bitmap, bitmap_insert_into_set, insert_into_set,
phi_translate, valid_in_set, compute_antic,
find_or_generate_expression, create_expression_by_pieces, insert_aux,
create_value_expr_from, eliminate): Likewise.
* tree-ssa-propagate.c (cfg_blocks_get): Likewise.
* tree-ssa-threadupdate.c (remove_last_stmt_and_useless_edges):
Likewise.
* tree-tailcall.c (independent_of_stmt_p, adjust_return_value,
eliminate_tail_call): Likewise.
* tree-vectorizer.c (vect_create_index_for_array_ref,
vect_align_data_ref, vect_create_data_ref,
vect_create_destination_var, vect_get_vec_def_for_operand,
vect_finish_stmt_generation, vect_transform_stmt,
vect_transform_loop_bound, vect_transform_loop,
vect_analyze_operations): Likewise.
* tree-vn.c (vn_compute, set_value_handle, get_value_handle):
Likewise.
* tree-flow-inline.h (var_ann, get_var_ann, get_def_from_ptr,
get_use_op_ptr, immediate_use, phi_ssa_name_p, bsi_start,
bsi_after_labels, bsi_last): Likewise.
* tree-ssa-live.c (var_union, change_partition_var,
create_ssa_var_map, calculate_live_on_entry, root_var_init,
type_var_init, add_coalesce, sort_coalesce_list, pop_best_coalesce):
Likewise.
* tree-ssa-live.h (partition_is_global, live_entry_blocks,
tpa_find_tree): Likewise.
(register_ssa_partition_check): Declare.
(register_ssa_partition): use it.
* tree-ssa-live.c: Include errors.h.
(register_ssa_partition_check): New.
* tree-ssa-operands.c: Include errors.h.
* Makefile.in (tree-ssa-operands.o): Depend on errors.h.
Co-Authored-By: Nathan Sidwell <nathan@codesourcery.com>
From-SVN: r87223
2004-09-09 09:54:12 +02:00
|
|
|
gcc_assert (vprime);
|
2004-07-02 20:47:29 +02:00
|
|
|
edoubleprime = bitmap_find_leader (AVAIL_OUT (bprime),
|
|
|
|
vprime);
|
2004-06-12 02:18:35 +02:00
|
|
|
if (edoubleprime == NULL)
|
|
|
|
{
|
|
|
|
avail[bprime->index] = eprime;
|
|
|
|
all_same = false;
|
|
|
|
}
|
|
|
|
else
|
|
|
|
{
|
|
|
|
avail[bprime->index] = edoubleprime;
|
2004-06-17 14:53:33 +02:00
|
|
|
by_some = true;
|
2004-06-12 02:18:35 +02:00
|
|
|
if (first_s == NULL)
|
|
|
|
first_s = edoubleprime;
|
|
|
|
else if (first_s != edoubleprime)
|
|
|
|
all_same = false;
|
targhooks.c (default_unwind_emit, [...]): Use gcc_assert, gcc_unreachable & internal_error instead of abort.
* targhooks.c (default_unwind_emit, default_scalar_mode_supported_p):
Use gcc_assert, gcc_unreachable & internal_error instead of abort.
* timevar.c (timevar_push, timevar_pop, timevar_start,
timevar_stop): Likewise.
* toplev.c (default_pch_valid_p): Likewise.
* tracer.c (tail_duplicate): Likewise.
* tree-alias-common.c (get_alias_var_decl,
get_values_from_constructor, create_alias_var, delete_alias_vars,
empty_points_to_set, same_points_to_set, ptr_may_alias_var):
Likewise.
* tree.c (tree_size, make_node_stat, copy_node_stat,
build_int_cst_wide, integer_all_onesp, list_length, chainon,
tree_node_structure, type_contains_placeholder_p, substitute_in_expr,
substitute_placeholder_in_expr, tabilize_reference_1, build0_stat,
build1_stat, build2_stat, build3_stat, build4_stat, is_attribute_p,
lookup_attribute, type_hash_canon, host_integerp, iterative_hash_expr,
build_method_type_directly, decl_type_context, get_callee_fndecl,
get_set_constructor_bits, build_vector_type_for_mode, int_cst_value,
tree_fold_gcd): Likewise.
* tree-cfg.c (create_bb, make_ctrl_stmt_edges, make_exit_edges,
make_cond_expr_edges, group_case_labels, tree_merge_blocks,
cleanup_control_expr_graph, find_taken_edge,
find_taken_edge_switch_expr, phi_alternatives_equal,
is_ctrl_altering_stmt, disband_implicit_edges, set_bb_for_stmt,
stmt_for_bsi, tree_find_edge_insert_loc, bsi_insert_on_edge_immediate,
tree_split_edge, tree_verify_flow_info, thread_jumps,
tree_redirect_edge_and_branch, tree_flow_call_edges_add): Likewise.
* tree-chrec.c (chrec_fold_poly_cst, chrec_fold_plus_poly_poly,
chrec_fold_multiply_poly_poly): Likewise.
* tree-complex.c (extract_component, expand_complex_division,
expand_complex_comparison, expand_complex_operations_1,
build_replicated_const, expand_vector_operations_1): Likewise.
* tree-data-ref.c (tree_fold_bezout, build_classic_dist_vector,
build_classic_dir_vector): Likewise.
* tree-dfa.c (compute_immediate_uses_for_phi,
compute_immediate_uses_for_stmt, create_var_ann, create_stmt_ann,
create_tree_ann, collect_dfa_stats, get_virtual_var): Likewise.
* tree-dump.c (dequeue_and_dump): Likewise.
* tree-eh.c (record_stmt_eh_region, add_stmt_to_eh_region,
record_in_finally_tree, replace_goto_queue_1,
maybe_record_in_goto_queue, verify_norecord_switch_expr,
do_return_redirection): Likewise.
* tree-if-conv.c (tree_if_convert_stmt, tree_if_convert_cond_expr,
add_to_dst_predicate_list, find_phi_replacement_condition,
replace_phi_with_cond_modify_expr, get_loop_body_in_if_conv_order):
Likewise.
* tree-inline.c (remap_decl, remap_type, remap_decls, copy_body_r,
initialize_inlined_parameters, declare_return_variable,
estimate_num_insns_1, expand_call_inline, expand_calls_inline,
optimize_inline_calls, copy_tree_r): Likewise.
* tree-into-ssa.c (rewrite_initialize_block_local_data, rewrite_stmt,
ssa_rewrite_stmt, rewrite_into_ssa): Likewise.
* tree-iterator.c (alloc_stmt_list, tsi_link_before, tsi_link_after,
tsi_split_statement_list_after, tsi_split_statement_list_before):
Likewise.
* tree-mudflap.c (mf_varname_tree): Likewise.
* tree-nested.c (create_tmp_var_for, lookup_field_for_decl,
lookup_tramp_for_decl, convert_all_function_calls): Likewise.
* tree-optimize.c (tree_rest_of_compilation): Likewise.
* tree-outof-ssa.c (create_temp, eliminate_build, eliminate_phi,
coalesce_abnormal_edges, coalesce_ssa_name, eliminate_virtual_phis,
free_temp_expr_table, add_dependance, finish_expr, rewrite_trees):
Likewise.
* tree-phinodes.c (resize_phi_node, add_phi_arg,
remove_all_phi_nodes_for): Likewise.
* tree-pretty-print.c (op_prio, print_call_name): Likewise.
* tree-profile.c (tree_gen_interval_profiler, tree_gen_pow2_profiler,
tree_gen_one_value_profiler, tree_gen_const_delta_profiler): Likewise.
* tree-sra.c (type_can_instantiate_all_elements, sra_hash_tree,
sra_elt_eq, sra_walk_expr, instantiate_missing_elements,
generate_one_element_ref, generate_element_copy,
generate_element_zero, scalarize_copy, scalarize_init,
scalarize_ldst): Likewise.
* tree-ssa-alias.c (delete_alias_info, group_aliases, may_alias_p,
add_may_alias, add_pointed_to_expr, add_pointed_to_var,
collect_points_to_info_r, get_tmt_for, get_ptr_info): Likewise.
* tree-ssa.c (walk_use_def_chains, check_phi_redundancy): Likewise.
* tree-ssa-ccp.c (dump_lattice_value, get_default_value, get_value,
set_lattice_value, likely_value, ccp_visit_phi_node, visit_assignment,
widen_bitfield, ccp_fold_builtin): Likewise.
* tree-ssa-copy.c (may_propagate_copy, merge_alias_info,
replace_exp_1, propagate_tree_value): Likewise.
* tree-ssa-copyrename.c (copy_rename_partition_coalesce): Likewise.
* tree-ssa-dce.c (set_control_dependence_map_bit,
find_control_dependence, find_pdom, mark_operand_necessary,
mark_stmt_if_obviously_necessary,
mark_control_dependent_edges_necessary, remove_dead_stmt): Likewise.
* tree-ssa-dom.c (dom_opt_initialize_block_local_data,
simplify_switch_and_lookup_avail_expr, cprop_into_successor_phis,
eliminate_redundant_computations, avail_expr_eq): Likewise.
* tree-ssa-dse.c (fix_stmt_v_may_defs): Likewise.
* tree-ssa-loop-ch.c (should_duplicate_loop_header_p,
duplicate_blocks): Likewise.
* tree-ssa-loop-im.c (for_each_index, set_level,
is_call_clobbered_ref): Likewise.
* tree-ssa-loop-ivopts.c (dump_use, divide, stmt_after_ip_normal_pos,
stmt_after_increment, set_iv, contains_abnormal_ssa_name_p,
find_interesting_uses_outer_or_nonlin, add_derived_ivs_candidates,
peel_address, ptr_difference_cost, may_replace_final_value,
determine_use_iv_cost, rewrite_use_nonlinear_expr, rewrite_use_outer,
rewrite_use, rewrite_uses): Likewise.
* tree-ssa-loop-manip.c (rewrite_into_loop_closed_ssa,
check_loop_closed_ssa_use): Likewise.
* tree-ssanames.c (make_ssa_name): Likewise.
* tree-ssa-operands.c (finalize_ssa_defs, finalize_ssa_uses,
finalize_ssa_v_must_defs, finalize_ssa_stmt_operands,
get_stmt_operands, get_expr_operands, get_asm_expr_operands,
get_indirect_ref_operands, add_stmt_operand): Likewise.
* tree-ssa-pre.c (value_exists_in_set_bitmap,
value_remove_from_set_bitmap, bitmap_insert_into_set, insert_into_set,
phi_translate, valid_in_set, compute_antic,
find_or_generate_expression, create_expression_by_pieces, insert_aux,
create_value_expr_from, eliminate): Likewise.
* tree-ssa-propagate.c (cfg_blocks_get): Likewise.
* tree-ssa-threadupdate.c (remove_last_stmt_and_useless_edges):
Likewise.
* tree-tailcall.c (independent_of_stmt_p, adjust_return_value,
eliminate_tail_call): Likewise.
* tree-vectorizer.c (vect_create_index_for_array_ref,
vect_align_data_ref, vect_create_data_ref,
vect_create_destination_var, vect_get_vec_def_for_operand,
vect_finish_stmt_generation, vect_transform_stmt,
vect_transform_loop_bound, vect_transform_loop,
vect_analyze_operations): Likewise.
* tree-vn.c (vn_compute, set_value_handle, get_value_handle):
Likewise.
* tree-flow-inline.h (var_ann, get_var_ann, get_def_from_ptr,
get_use_op_ptr, immediate_use, phi_ssa_name_p, bsi_start,
bsi_after_labels, bsi_last): Likewise.
* tree-ssa-live.c (var_union, change_partition_var,
create_ssa_var_map, calculate_live_on_entry, root_var_init,
type_var_init, add_coalesce, sort_coalesce_list, pop_best_coalesce):
Likewise.
* tree-ssa-live.h (partition_is_global, live_entry_blocks,
tpa_find_tree): Likewise.
(register_ssa_partition_check): Declare.
(register_ssa_partition): use it.
* tree-ssa-live.c: Include errors.h.
(register_ssa_partition_check): New.
* tree-ssa-operands.c: Include errors.h.
* Makefile.in (tree-ssa-operands.o): Depend on errors.h.
Co-Authored-By: Nathan Sidwell <nathan@codesourcery.com>
From-SVN: r87223
2004-09-09 09:54:12 +02:00
|
|
|
gcc_assert (first_s == edoubleprime
|
|
|
|
|| !operand_equal_p
|
|
|
|
(first_s, edoubleprime, 0));
|
2004-06-12 02:18:35 +02:00
|
|
|
}
|
|
|
|
}
|
2004-06-17 14:53:33 +02:00
|
|
|
/* If we can insert it, it's not the same value
|
|
|
|
already existing along every predecessor, and
|
|
|
|
it's defined by some predecessor, it is
|
|
|
|
partially redundant. */
|
2004-06-14 03:27:57 +02:00
|
|
|
if (!cant_insert && !all_same && by_some)
|
2004-06-12 02:18:35 +02:00
|
|
|
{
|
|
|
|
tree type = TREE_TYPE (avail[block->pred->src->index]);
|
2004-06-17 14:53:33 +02:00
|
|
|
tree temp;
|
2004-06-12 02:18:35 +02:00
|
|
|
if (dump_file && (dump_flags & TDF_DETAILS))
|
|
|
|
{
|
|
|
|
fprintf (dump_file, "Found partial redundancy for expression ");
|
|
|
|
print_generic_expr (dump_file, node->expr, 0);
|
|
|
|
fprintf (dump_file, "\n");
|
|
|
|
}
|
|
|
|
|
c-common.c, [...]: Fix comment formatting.
* c-common.c, c-decl.c, combine.c, defaults.h, fold-const.c,
gimplify.c, gthr-nks.h, hooks.c, lambda-code.c, lambda-mat.c,
stor-layout.c, target.h, tree-cfg.c, tree-chrec.c,
tree-if-conv.c, tree-inline.c, tree-into-ssa.c,
tree-mudflap.c, tree-optimize.c, tree-scalar-evolution.c,
tree-ssa-alias.c, tree-ssa-ccp.c, tree-ssa-dce.c,
tree-ssa-pre.c, tree-vectorizer.c, tree-vectorizer.h, tree.h,
vec.h: Fix comment formatting.
From-SVN: r87105
2004-09-05 18:05:06 +02:00
|
|
|
/* Make the necessary insertions. */
|
2004-06-12 02:18:35 +02:00
|
|
|
for (pred = block->pred;
|
|
|
|
pred;
|
|
|
|
pred = pred->pred_next)
|
|
|
|
{
|
2004-06-21 23:57:33 +02:00
|
|
|
tree stmts = alloc_stmt_list ();
|
|
|
|
tree builtexpr;
|
2004-06-12 02:18:35 +02:00
|
|
|
bprime = pred->src;
|
|
|
|
eprime = avail[bprime->index];
|
alias.c (find_base_decl): Remove unreachable case '3' block.
2004-09-17 Jeffrey D. Oldham <oldham@codesourcery.com>
Zack Weinberg <zack@codesourcery.com>
* alias.c (find_base_decl): Remove unreachable case '3' block.
* expr.c (safe_from_p): Abort if passed a type.
* tree-gimple.c (recalculate_side_effects): Abort if passed
anything other than an expression.
* tree-ssa-pre.c (phi_translate): Return expr immediately if
is_gimple_min_invariant is true for it. Reorder cases for clarity.
Abort on un-handled tree classes.
(valid_in_set): Likewise.
* tree.c (tree_code_class_strings): New static data.
* tree.h (enum tree_code_class): New.
(tree_code_class_strings): Declare.
(TREE_CODE_CLASS_STRING, EXCEPTIONAL_CLASS_P, CONSTANT_CLASS_P)
(REFERENCE_CLASS_P, COMPARISON_CLASS_P, UNARY_CLASS_P, BINARY_CLASS_P)
(STATEMENT_CLASS_P, EXPRESSION_CLASS_P, IS_TYPE_OR_DECL_P): New macros.
(TYPE_P, DECL_P, IS_NON_TYPE_CODE_CLASS, IS_EXPR_CODE_CLASS)
(checking macros, EXPR_LOCATION, SET_EXPR_LOCATION, EXPR_LOCUS): Update.
* tree.def, c-common.def, objc/objc-tree.def: Use
tree_code_class enumeration constants instead of code letters.
* alias.c, builtins.c, c-common.c, c-format.c, c-lang.c, c-pragma.c
* c-typeck.c, cgraphunit.c, convert.c, dbxout.c, dwarf2out.c
* emit-rtl.c expr.c, fold-const.c, gimplify.c, lambda-code.c
* langhooks.c, langhooks.h, predict.c, print-tree.c, reload1.c, stmt.c
* tree-browser.c, tree-cfg.c, tree-chrec.c, tree-complex.c, tree-dfa.c
* tree-dump.c, tree-eh.c, tree-gimple.c, tree-inline.c, tree-nested.c
* tree-outof-ssa.c, tree-pretty-print.c, tree-sra.c, tree-ssa-ccp.c
* tree-ssa-dce.c, tree-ssa-dom.c, tree-ssa-forwprop.c, tree-ssa-live.c
* tree-ssa-loop-im.c, tree-ssa-loop-ivopts.c, tree-ssa-operands.c
* tree-ssa-phiopt.c, tree-ssa-pre.c, tree-ssa-propagate.c
* tree-ssa.c, tree-ssanames.c, tree-tailcall.c, tree.c, varasm.c
* config/sol2-c.c, config/arm/arm.c, config/i386/winnt.c
* config/pa/pa.c, config/pa/pa.h, config/sh/sh.c, objc/objc-lang.c
Update to match.
* LANGUAGES: Add note about change.
ada:
* ada-tree.def: Use tree_code_class enumeration constants
instead of code letters.
* ada-tree.h, decl.c, misc.c, trans.c, utils.c, utils2.c:
Update for new tree-class enumeration constants.
cp:
* cp-tree.def: Use tree_code_class enumeration constants
instead of code letters.
* call.c, class.c, cp-gimplify.c, cp-lang.c, cxx-pretty-print.c
* mangle.c, pt.c, semantics.c, tree.c, typeck.c:
Update for new tree-class enumeration constants.
fortran:
* f95-lang.c, trans-expr.c, trans.c: Update for new tree-class
enumeration constants.
java:
* java-tree.def: Use tree_code_class enumeration constants
instead of code letters.
* java-gimplify.c, jcf-write.c, lang.c, parse.y: Update for
new tree-class enumeration constants.
treelang:
* treetree.c: Update for new tree-class enumeration constants.
From-SVN: r87675
2004-09-17 23:55:02 +02:00
|
|
|
if (BINARY_CLASS_P (eprime)
|
|
|
|
|| UNARY_CLASS_P (eprime))
|
2004-06-12 02:18:35 +02:00
|
|
|
{
|
2004-06-21 23:57:33 +02:00
|
|
|
builtexpr = create_expression_by_pieces (bprime,
|
|
|
|
eprime,
|
|
|
|
stmts);
|
|
|
|
bsi_insert_on_edge (pred, stmts);
|
2004-06-12 02:18:35 +02:00
|
|
|
bsi_commit_edge_inserts (NULL);
|
2004-06-21 23:57:33 +02:00
|
|
|
avail[bprime->index] = builtexpr;
|
|
|
|
}
|
|
|
|
}
|
2004-06-12 02:18:35 +02:00
|
|
|
/* Now build a phi for the new variable. */
|
|
|
|
temp = create_tmp_var (type, "prephitmp");
|
|
|
|
add_referenced_tmp_var (temp);
|
|
|
|
temp = create_phi_node (temp, block);
|
2004-06-29 03:53:04 +02:00
|
|
|
vn_add (PHI_RESULT (temp), val, NULL);
|
2004-06-12 02:18:35 +02:00
|
|
|
|
|
|
|
#if 0
|
|
|
|
if (!set_contains_value (AVAIL_OUT (block), val))
|
|
|
|
insert_into_set (AVAIL_OUT (block),
|
|
|
|
PHI_RESULT (temp));
|
|
|
|
else
|
|
|
|
#endif
|
2004-07-02 20:47:29 +02:00
|
|
|
bitmap_value_replace_in_set (AVAIL_OUT (block),
|
|
|
|
PHI_RESULT (temp));
|
2004-06-12 02:18:35 +02:00
|
|
|
for (pred = block->pred;
|
|
|
|
pred;
|
|
|
|
pred = pred->pred_next)
|
|
|
|
{
|
|
|
|
add_phi_arg (&temp, avail[pred->src->index],
|
|
|
|
pred);
|
|
|
|
}
|
|
|
|
if (dump_file && (dump_flags & TDF_DETAILS))
|
|
|
|
{
|
|
|
|
fprintf (dump_file, "Created phi ");
|
|
|
|
print_generic_expr (dump_file, temp, 0);
|
|
|
|
fprintf (dump_file, " in block %d\n", block->index);
|
|
|
|
}
|
|
|
|
pre_stats.phis++;
|
|
|
|
new_stuff = true;
|
2004-07-05 00:51:36 +02:00
|
|
|
bitmap_insert_into_set (NEW_SETS (block),
|
|
|
|
PHI_RESULT (temp));
|
|
|
|
bitmap_insert_into_set (PHI_GEN (block),
|
|
|
|
PHI_RESULT (temp));
|
2004-06-12 02:18:35 +02:00
|
|
|
}
|
|
|
|
|
|
|
|
free (avail);
|
2004-05-13 08:41:07 +02:00
|
|
|
}
|
|
|
|
}
|
|
|
|
}
|
|
|
|
}
|
|
|
|
}
|
2004-06-12 02:18:35 +02:00
|
|
|
for (son = first_dom_son (CDI_DOMINATORS, block);
|
|
|
|
son;
|
|
|
|
son = next_dom_son (CDI_DOMINATORS, son))
|
|
|
|
{
|
|
|
|
new_stuff |= insert_aux (son);
|
|
|
|
}
|
|
|
|
|
|
|
|
return new_stuff;
|
2004-05-13 08:41:07 +02:00
|
|
|
}
|
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
/* Perform insertion of partially redundant values. */
|
2004-05-13 08:41:07 +02:00
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
static void
|
|
|
|
insert (void)
|
2004-05-13 08:41:07 +02:00
|
|
|
{
|
2004-06-12 02:18:35 +02:00
|
|
|
bool new_stuff = true;
|
2004-05-13 08:41:07 +02:00
|
|
|
basic_block bb;
|
2004-06-12 02:18:35 +02:00
|
|
|
int num_iterations = 0;
|
2004-07-02 20:47:29 +02:00
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
FOR_ALL_BB (bb)
|
2004-07-05 00:51:36 +02:00
|
|
|
NEW_SETS (bb) = bitmap_set_new ();
|
2004-05-13 08:41:07 +02:00
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
while (new_stuff)
|
2004-05-13 08:41:07 +02:00
|
|
|
{
|
2004-06-12 02:18:35 +02:00
|
|
|
num_iterations++;
|
|
|
|
new_stuff = false;
|
|
|
|
new_stuff = insert_aux (ENTRY_BLOCK_PTR);
|
2004-05-13 08:41:07 +02:00
|
|
|
}
|
2004-06-12 02:18:35 +02:00
|
|
|
if (num_iterations > 2 && dump_file && (dump_flags & TDF_STATS))
|
|
|
|
fprintf (dump_file, "insert required %d iterations\n", num_iterations);
|
|
|
|
}
|
2004-05-13 08:41:07 +02:00
|
|
|
|
2004-06-23 22:12:44 +02:00
|
|
|
|
2004-06-29 03:53:04 +02:00
|
|
|
/* Return true if VAR is an SSA variable with no defining statement in
|
|
|
|
this procedure, *AND* isn't a live-on-entry parameter. */
|
2004-06-23 22:12:44 +02:00
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
static bool
|
|
|
|
is_undefined_value (tree expr)
|
2004-06-29 03:53:04 +02:00
|
|
|
{
|
|
|
|
return (TREE_CODE (expr) == SSA_NAME
|
|
|
|
&& IS_EMPTY_STMT (SSA_NAME_DEF_STMT (expr))
|
|
|
|
/* PARM_DECLs and hard registers are always defined. */
|
|
|
|
&& TREE_CODE (SSA_NAME_VAR (expr)) != PARM_DECL
|
|
|
|
&& !DECL_HARD_REGISTER (SSA_NAME_VAR (expr)));
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
/* Given an SSA variable VAR and an expression EXPR, compute the value
|
|
|
|
number for EXPR and create a value handle (VAL) for it. If VAR and
|
|
|
|
EXPR are not the same, associate VAL with VAR. Finally, add VAR to
|
|
|
|
S1 and its value handle to S2.
|
|
|
|
|
|
|
|
VUSES represent the virtual use operands associated with EXPR (if
|
|
|
|
any). They are used when computing the hash value for EXPR. */
|
|
|
|
|
|
|
|
static inline void
|
2004-07-05 00:51:36 +02:00
|
|
|
add_to_sets (tree var, tree expr, vuse_optype vuses, bitmap_set_t s1,
|
2004-07-02 20:47:29 +02:00
|
|
|
bitmap_set_t s2)
|
2004-06-29 03:53:04 +02:00
|
|
|
{
|
|
|
|
tree val = vn_lookup_or_add (expr, vuses);
|
|
|
|
|
|
|
|
/* VAR and EXPR may be the same when processing statements for which
|
|
|
|
we are not computing value numbers (e.g., non-assignments, or
|
|
|
|
statements that make aliased stores). In those cases, we are
|
|
|
|
only interested in making VAR available as its own value. */
|
|
|
|
if (var != expr)
|
2004-07-06 21:55:06 +02:00
|
|
|
vn_add (var, val, NULL);
|
2004-06-29 03:53:04 +02:00
|
|
|
|
2004-07-05 00:51:36 +02:00
|
|
|
bitmap_insert_into_set (s1, var);
|
2004-07-02 20:47:29 +02:00
|
|
|
bitmap_value_insert_into_set (s2, var);
|
2004-06-29 03:53:04 +02:00
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
/* Given a unary or binary expression EXPR, create and return a new
|
2004-07-02 02:51:01 +02:00
|
|
|
expression with the same structure as EXPR but with its operands
|
2004-06-29 03:53:04 +02:00
|
|
|
replaced with the value handles of each of the operands of EXPR.
|
|
|
|
Insert EXPR's operands into the EXP_GEN set for BLOCK.
|
|
|
|
|
|
|
|
VUSES represent the virtual use operands associated with EXPR (if
|
|
|
|
any). They are used when computing the hash value for EXPR. */
|
|
|
|
|
|
|
|
static inline tree
|
|
|
|
create_value_expr_from (tree expr, basic_block block, vuse_optype vuses)
|
|
|
|
{
|
|
|
|
int i;
|
|
|
|
enum tree_code code = TREE_CODE (expr);
|
|
|
|
tree vexpr;
|
|
|
|
|
alias.c (find_base_decl): Remove unreachable case '3' block.
2004-09-17 Jeffrey D. Oldham <oldham@codesourcery.com>
Zack Weinberg <zack@codesourcery.com>
* alias.c (find_base_decl): Remove unreachable case '3' block.
* expr.c (safe_from_p): Abort if passed a type.
* tree-gimple.c (recalculate_side_effects): Abort if passed
anything other than an expression.
* tree-ssa-pre.c (phi_translate): Return expr immediately if
is_gimple_min_invariant is true for it. Reorder cases for clarity.
Abort on un-handled tree classes.
(valid_in_set): Likewise.
* tree.c (tree_code_class_strings): New static data.
* tree.h (enum tree_code_class): New.
(tree_code_class_strings): Declare.
(TREE_CODE_CLASS_STRING, EXCEPTIONAL_CLASS_P, CONSTANT_CLASS_P)
(REFERENCE_CLASS_P, COMPARISON_CLASS_P, UNARY_CLASS_P, BINARY_CLASS_P)
(STATEMENT_CLASS_P, EXPRESSION_CLASS_P, IS_TYPE_OR_DECL_P): New macros.
(TYPE_P, DECL_P, IS_NON_TYPE_CODE_CLASS, IS_EXPR_CODE_CLASS)
(checking macros, EXPR_LOCATION, SET_EXPR_LOCATION, EXPR_LOCUS): Update.
* tree.def, c-common.def, objc/objc-tree.def: Use
tree_code_class enumeration constants instead of code letters.
* alias.c, builtins.c, c-common.c, c-format.c, c-lang.c, c-pragma.c
* c-typeck.c, cgraphunit.c, convert.c, dbxout.c, dwarf2out.c
* emit-rtl.c expr.c, fold-const.c, gimplify.c, lambda-code.c
* langhooks.c, langhooks.h, predict.c, print-tree.c, reload1.c, stmt.c
* tree-browser.c, tree-cfg.c, tree-chrec.c, tree-complex.c, tree-dfa.c
* tree-dump.c, tree-eh.c, tree-gimple.c, tree-inline.c, tree-nested.c
* tree-outof-ssa.c, tree-pretty-print.c, tree-sra.c, tree-ssa-ccp.c
* tree-ssa-dce.c, tree-ssa-dom.c, tree-ssa-forwprop.c, tree-ssa-live.c
* tree-ssa-loop-im.c, tree-ssa-loop-ivopts.c, tree-ssa-operands.c
* tree-ssa-phiopt.c, tree-ssa-pre.c, tree-ssa-propagate.c
* tree-ssa.c, tree-ssanames.c, tree-tailcall.c, tree.c, varasm.c
* config/sol2-c.c, config/arm/arm.c, config/i386/winnt.c
* config/pa/pa.c, config/pa/pa.h, config/sh/sh.c, objc/objc-lang.c
Update to match.
* LANGUAGES: Add note about change.
ada:
* ada-tree.def: Use tree_code_class enumeration constants
instead of code letters.
* ada-tree.h, decl.c, misc.c, trans.c, utils.c, utils2.c:
Update for new tree-class enumeration constants.
cp:
* cp-tree.def: Use tree_code_class enumeration constants
instead of code letters.
* call.c, class.c, cp-gimplify.c, cp-lang.c, cxx-pretty-print.c
* mangle.c, pt.c, semantics.c, tree.c, typeck.c:
Update for new tree-class enumeration constants.
fortran:
* f95-lang.c, trans-expr.c, trans.c: Update for new tree-class
enumeration constants.
java:
* java-tree.def: Use tree_code_class enumeration constants
instead of code letters.
* java-gimplify.c, jcf-write.c, lang.c, parse.y: Update for
new tree-class enumeration constants.
treelang:
* treetree.c: Update for new tree-class enumeration constants.
From-SVN: r87675
2004-09-17 23:55:02 +02:00
|
|
|
gcc_assert (TREE_CODE_CLASS (code) == tcc_unary
|
|
|
|
|| TREE_CODE_CLASS (code) == tcc_binary
|
|
|
|
|| TREE_CODE_CLASS (code) == tcc_reference);
|
2004-06-23 22:12:44 +02:00
|
|
|
|
alias.c (find_base_decl): Remove unreachable case '3' block.
2004-09-17 Jeffrey D. Oldham <oldham@codesourcery.com>
Zack Weinberg <zack@codesourcery.com>
* alias.c (find_base_decl): Remove unreachable case '3' block.
* expr.c (safe_from_p): Abort if passed a type.
* tree-gimple.c (recalculate_side_effects): Abort if passed
anything other than an expression.
* tree-ssa-pre.c (phi_translate): Return expr immediately if
is_gimple_min_invariant is true for it. Reorder cases for clarity.
Abort on un-handled tree classes.
(valid_in_set): Likewise.
* tree.c (tree_code_class_strings): New static data.
* tree.h (enum tree_code_class): New.
(tree_code_class_strings): Declare.
(TREE_CODE_CLASS_STRING, EXCEPTIONAL_CLASS_P, CONSTANT_CLASS_P)
(REFERENCE_CLASS_P, COMPARISON_CLASS_P, UNARY_CLASS_P, BINARY_CLASS_P)
(STATEMENT_CLASS_P, EXPRESSION_CLASS_P, IS_TYPE_OR_DECL_P): New macros.
(TYPE_P, DECL_P, IS_NON_TYPE_CODE_CLASS, IS_EXPR_CODE_CLASS)
(checking macros, EXPR_LOCATION, SET_EXPR_LOCATION, EXPR_LOCUS): Update.
* tree.def, c-common.def, objc/objc-tree.def: Use
tree_code_class enumeration constants instead of code letters.
* alias.c, builtins.c, c-common.c, c-format.c, c-lang.c, c-pragma.c
* c-typeck.c, cgraphunit.c, convert.c, dbxout.c, dwarf2out.c
* emit-rtl.c expr.c, fold-const.c, gimplify.c, lambda-code.c
* langhooks.c, langhooks.h, predict.c, print-tree.c, reload1.c, stmt.c
* tree-browser.c, tree-cfg.c, tree-chrec.c, tree-complex.c, tree-dfa.c
* tree-dump.c, tree-eh.c, tree-gimple.c, tree-inline.c, tree-nested.c
* tree-outof-ssa.c, tree-pretty-print.c, tree-sra.c, tree-ssa-ccp.c
* tree-ssa-dce.c, tree-ssa-dom.c, tree-ssa-forwprop.c, tree-ssa-live.c
* tree-ssa-loop-im.c, tree-ssa-loop-ivopts.c, tree-ssa-operands.c
* tree-ssa-phiopt.c, tree-ssa-pre.c, tree-ssa-propagate.c
* tree-ssa.c, tree-ssanames.c, tree-tailcall.c, tree.c, varasm.c
* config/sol2-c.c, config/arm/arm.c, config/i386/winnt.c
* config/pa/pa.c, config/pa/pa.h, config/sh/sh.c, objc/objc-lang.c
Update to match.
* LANGUAGES: Add note about change.
ada:
* ada-tree.def: Use tree_code_class enumeration constants
instead of code letters.
* ada-tree.h, decl.c, misc.c, trans.c, utils.c, utils2.c:
Update for new tree-class enumeration constants.
cp:
* cp-tree.def: Use tree_code_class enumeration constants
instead of code letters.
* call.c, class.c, cp-gimplify.c, cp-lang.c, cxx-pretty-print.c
* mangle.c, pt.c, semantics.c, tree.c, typeck.c:
Update for new tree-class enumeration constants.
fortran:
* f95-lang.c, trans-expr.c, trans.c: Update for new tree-class
enumeration constants.
java:
* java-tree.def: Use tree_code_class enumeration constants
instead of code letters.
* java-gimplify.c, jcf-write.c, lang.c, parse.y: Update for
new tree-class enumeration constants.
treelang:
* treetree.c: Update for new tree-class enumeration constants.
From-SVN: r87675
2004-09-17 23:55:02 +02:00
|
|
|
if (TREE_CODE_CLASS (code) == tcc_unary)
|
2004-06-29 03:53:04 +02:00
|
|
|
vexpr = pool_alloc (unary_node_pool);
|
alias.c (find_base_decl): Remove unreachable case '3' block.
2004-09-17 Jeffrey D. Oldham <oldham@codesourcery.com>
Zack Weinberg <zack@codesourcery.com>
* alias.c (find_base_decl): Remove unreachable case '3' block.
* expr.c (safe_from_p): Abort if passed a type.
* tree-gimple.c (recalculate_side_effects): Abort if passed
anything other than an expression.
* tree-ssa-pre.c (phi_translate): Return expr immediately if
is_gimple_min_invariant is true for it. Reorder cases for clarity.
Abort on un-handled tree classes.
(valid_in_set): Likewise.
* tree.c (tree_code_class_strings): New static data.
* tree.h (enum tree_code_class): New.
(tree_code_class_strings): Declare.
(TREE_CODE_CLASS_STRING, EXCEPTIONAL_CLASS_P, CONSTANT_CLASS_P)
(REFERENCE_CLASS_P, COMPARISON_CLASS_P, UNARY_CLASS_P, BINARY_CLASS_P)
(STATEMENT_CLASS_P, EXPRESSION_CLASS_P, IS_TYPE_OR_DECL_P): New macros.
(TYPE_P, DECL_P, IS_NON_TYPE_CODE_CLASS, IS_EXPR_CODE_CLASS)
(checking macros, EXPR_LOCATION, SET_EXPR_LOCATION, EXPR_LOCUS): Update.
* tree.def, c-common.def, objc/objc-tree.def: Use
tree_code_class enumeration constants instead of code letters.
* alias.c, builtins.c, c-common.c, c-format.c, c-lang.c, c-pragma.c
* c-typeck.c, cgraphunit.c, convert.c, dbxout.c, dwarf2out.c
* emit-rtl.c expr.c, fold-const.c, gimplify.c, lambda-code.c
* langhooks.c, langhooks.h, predict.c, print-tree.c, reload1.c, stmt.c
* tree-browser.c, tree-cfg.c, tree-chrec.c, tree-complex.c, tree-dfa.c
* tree-dump.c, tree-eh.c, tree-gimple.c, tree-inline.c, tree-nested.c
* tree-outof-ssa.c, tree-pretty-print.c, tree-sra.c, tree-ssa-ccp.c
* tree-ssa-dce.c, tree-ssa-dom.c, tree-ssa-forwprop.c, tree-ssa-live.c
* tree-ssa-loop-im.c, tree-ssa-loop-ivopts.c, tree-ssa-operands.c
* tree-ssa-phiopt.c, tree-ssa-pre.c, tree-ssa-propagate.c
* tree-ssa.c, tree-ssanames.c, tree-tailcall.c, tree.c, varasm.c
* config/sol2-c.c, config/arm/arm.c, config/i386/winnt.c
* config/pa/pa.c, config/pa/pa.h, config/sh/sh.c, objc/objc-lang.c
Update to match.
* LANGUAGES: Add note about change.
ada:
* ada-tree.def: Use tree_code_class enumeration constants
instead of code letters.
* ada-tree.h, decl.c, misc.c, trans.c, utils.c, utils2.c:
Update for new tree-class enumeration constants.
cp:
* cp-tree.def: Use tree_code_class enumeration constants
instead of code letters.
* call.c, class.c, cp-gimplify.c, cp-lang.c, cxx-pretty-print.c
* mangle.c, pt.c, semantics.c, tree.c, typeck.c:
Update for new tree-class enumeration constants.
fortran:
* f95-lang.c, trans-expr.c, trans.c: Update for new tree-class
enumeration constants.
java:
* java-tree.def: Use tree_code_class enumeration constants
instead of code letters.
* java-gimplify.c, jcf-write.c, lang.c, parse.y: Update for
new tree-class enumeration constants.
treelang:
* treetree.c: Update for new tree-class enumeration constants.
From-SVN: r87675
2004-09-17 23:55:02 +02:00
|
|
|
else if (TREE_CODE_CLASS (code) == tcc_reference)
|
2004-07-06 21:55:06 +02:00
|
|
|
vexpr = pool_alloc (reference_node_pool);
|
2004-06-29 03:53:04 +02:00
|
|
|
else
|
|
|
|
vexpr = pool_alloc (binary_node_pool);
|
|
|
|
|
|
|
|
memcpy (vexpr, expr, tree_size (expr));
|
|
|
|
|
|
|
|
for (i = 0; i < TREE_CODE_LENGTH (code); i++)
|
2004-05-13 08:41:07 +02:00
|
|
|
{
|
2004-06-29 03:53:04 +02:00
|
|
|
tree op = TREE_OPERAND (expr, i);
|
2004-07-02 20:47:29 +02:00
|
|
|
if (op != NULL)
|
|
|
|
{
|
|
|
|
tree val = vn_lookup_or_add (op, vuses);
|
|
|
|
if (!is_undefined_value (op))
|
|
|
|
value_insert_into_set (EXP_GEN (block), op);
|
2004-08-20 18:48:00 +02:00
|
|
|
if (TREE_CODE (val) == VALUE_HANDLE)
|
|
|
|
TREE_TYPE (val) = TREE_TYPE (TREE_OPERAND (vexpr, i));
|
2004-07-02 20:47:29 +02:00
|
|
|
TREE_OPERAND (vexpr, i) = val;
|
|
|
|
}
|
2004-05-13 08:41:07 +02:00
|
|
|
}
|
2004-06-23 22:12:44 +02:00
|
|
|
|
2004-06-29 03:53:04 +02:00
|
|
|
return vexpr;
|
2004-05-13 08:41:07 +02:00
|
|
|
}
|
|
|
|
|
2004-06-29 03:53:04 +02:00
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
/* Compute the AVAIL set for BLOCK.
|
|
|
|
This function performs value numbering of the statements in BLOCK.
|
|
|
|
The AVAIL sets are built from information we glean while doing this
|
2004-06-29 03:53:04 +02:00
|
|
|
value numbering, since the AVAIL sets contain only one entry per
|
2004-06-12 02:18:35 +02:00
|
|
|
value.
|
|
|
|
|
|
|
|
AVAIL_IN[BLOCK] = AVAIL_OUT[dom(BLOCK)].
|
2004-06-29 03:53:04 +02:00
|
|
|
AVAIL_OUT[BLOCK] = AVAIL_IN[BLOCK] U PHI_GEN[BLOCK] U TMP_GEN[BLOCK]. */
|
2004-05-13 08:41:07 +02:00
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
static void
|
|
|
|
compute_avail (basic_block block)
|
2004-05-13 08:41:07 +02:00
|
|
|
{
|
|
|
|
basic_block son;
|
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
/* For arguments with default definitions, we pretend they are
|
|
|
|
defined in the entry block. */
|
|
|
|
if (block == ENTRY_BLOCK_PTR)
|
|
|
|
{
|
|
|
|
tree param;
|
|
|
|
for (param = DECL_ARGUMENTS (current_function_decl);
|
|
|
|
param;
|
|
|
|
param = TREE_CHAIN (param))
|
|
|
|
{
|
|
|
|
if (default_def (param) != NULL)
|
|
|
|
{
|
|
|
|
tree val;
|
|
|
|
tree def = default_def (param);
|
2004-06-29 03:53:04 +02:00
|
|
|
val = vn_lookup_or_add (def, NULL);
|
2004-07-05 00:51:36 +02:00
|
|
|
bitmap_insert_into_set (TMP_GEN (block), def);
|
2004-07-02 20:47:29 +02:00
|
|
|
bitmap_value_insert_into_set (AVAIL_OUT (block), def);
|
2004-06-12 02:18:35 +02:00
|
|
|
}
|
|
|
|
}
|
|
|
|
}
|
|
|
|
else if (block)
|
2004-05-13 08:41:07 +02:00
|
|
|
{
|
2004-06-12 02:18:35 +02:00
|
|
|
block_stmt_iterator bsi;
|
|
|
|
tree stmt, phi;
|
|
|
|
basic_block dom;
|
|
|
|
|
2004-06-29 03:53:04 +02:00
|
|
|
/* Initially, the set of available values in BLOCK is that of
|
|
|
|
its immediate dominator. */
|
2004-06-12 02:18:35 +02:00
|
|
|
dom = get_immediate_dominator (CDI_DOMINATORS, block);
|
|
|
|
if (dom)
|
2004-07-02 20:47:29 +02:00
|
|
|
bitmap_set_copy (AVAIL_OUT (block), AVAIL_OUT (dom));
|
2004-06-23 22:12:44 +02:00
|
|
|
|
2004-06-29 03:53:04 +02:00
|
|
|
/* Generate values for PHI nodes. */
|
tree.h (PHI_CHAIN): New.
* tree.h (PHI_CHAIN): New.
* (tree-cfg.c, tree-dfa.c, tree-flow-inline.h, tree-into-ssa.c,
tree-outof-ssa.c, tree-phinodes.c, tree-pretty-print.c,
tree-ssa-alias.c, tree-ssa-ccp.c, tree-ssa-dom.c, tree-ssa-dse.c,
tree-ssa-live.c, tree-ssa-loop.c, tree-ssa-phiopt.c, tree-ssa-pre.c,
tree-ssa.c, tree-tailcall.c): Use PHI_CHAIN instead of TREE_CHAIN
when traversing a list of PHI_NODEs.
From-SVN: r83273
2004-06-17 01:03:34 +02:00
|
|
|
for (phi = phi_nodes (block); phi; phi = PHI_CHAIN (phi))
|
2004-07-05 00:51:36 +02:00
|
|
|
/* We have no need for virtual phis, as they don't represent
|
|
|
|
actual computations. */
|
|
|
|
if (is_gimple_reg (PHI_RESULT (phi)))
|
|
|
|
add_to_sets (PHI_RESULT (phi), PHI_RESULT (phi), NULL,
|
|
|
|
PHI_GEN (block), AVAIL_OUT (block));
|
2004-06-12 02:18:35 +02:00
|
|
|
|
2004-06-29 03:53:04 +02:00
|
|
|
/* Now compute value numbers and populate value sets with all
|
|
|
|
the expressions computed in BLOCK. */
|
2004-06-12 02:18:35 +02:00
|
|
|
for (bsi = bsi_start (block); !bsi_end_p (bsi); bsi_next (&bsi))
|
2004-05-13 08:41:07 +02:00
|
|
|
{
|
2004-06-29 03:53:04 +02:00
|
|
|
stmt_ann_t ann;
|
|
|
|
size_t j;
|
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
stmt = bsi_stmt (bsi);
|
2004-06-29 03:53:04 +02:00
|
|
|
ann = stmt_ann (stmt);
|
2004-06-12 02:18:35 +02:00
|
|
|
get_stmt_operands (stmt);
|
2004-06-29 03:53:04 +02:00
|
|
|
|
|
|
|
/* We are only interested in assignments of the form
|
|
|
|
X_i = EXPR, where EXPR represents an "interesting"
|
|
|
|
computation, it has no volatile operands and X_i
|
|
|
|
doesn't flow through an abnormal edge. */
|
|
|
|
if (TREE_CODE (stmt) == MODIFY_EXPR
|
|
|
|
&& !ann->has_volatile_ops
|
|
|
|
&& TREE_CODE (TREE_OPERAND (stmt, 0)) == SSA_NAME
|
|
|
|
&& !SSA_NAME_OCCURS_IN_ABNORMAL_PHI (TREE_OPERAND (stmt, 0)))
|
2004-06-12 02:18:35 +02:00
|
|
|
{
|
2004-06-29 03:53:04 +02:00
|
|
|
tree lhs = TREE_OPERAND (stmt, 0);
|
|
|
|
tree rhs = TREE_OPERAND (stmt, 1);
|
|
|
|
vuse_optype vuses = STMT_VUSE_OPS (stmt);
|
|
|
|
|
|
|
|
STRIP_USELESS_TYPE_CONVERSION (rhs);
|
2004-07-06 21:55:06 +02:00
|
|
|
if (TREE_CODE (rhs) == SSA_NAME
|
|
|
|
|| is_gimple_min_invariant (rhs))
|
|
|
|
{
|
|
|
|
/* Compute a value number for the RHS of the statement
|
|
|
|
and add its value to the AVAIL_OUT set for the block.
|
|
|
|
Add the LHS to TMP_GEN. */
|
|
|
|
add_to_sets (lhs, rhs, vuses, TMP_GEN (block),
|
|
|
|
AVAIL_OUT (block));
|
|
|
|
|
|
|
|
if (TREE_CODE (rhs) == SSA_NAME
|
|
|
|
&& !is_undefined_value (rhs))
|
|
|
|
value_insert_into_set (EXP_GEN (block), rhs);
|
|
|
|
continue;
|
|
|
|
}
|
alias.c (find_base_decl): Remove unreachable case '3' block.
2004-09-17 Jeffrey D. Oldham <oldham@codesourcery.com>
Zack Weinberg <zack@codesourcery.com>
* alias.c (find_base_decl): Remove unreachable case '3' block.
* expr.c (safe_from_p): Abort if passed a type.
* tree-gimple.c (recalculate_side_effects): Abort if passed
anything other than an expression.
* tree-ssa-pre.c (phi_translate): Return expr immediately if
is_gimple_min_invariant is true for it. Reorder cases for clarity.
Abort on un-handled tree classes.
(valid_in_set): Likewise.
* tree.c (tree_code_class_strings): New static data.
* tree.h (enum tree_code_class): New.
(tree_code_class_strings): Declare.
(TREE_CODE_CLASS_STRING, EXCEPTIONAL_CLASS_P, CONSTANT_CLASS_P)
(REFERENCE_CLASS_P, COMPARISON_CLASS_P, UNARY_CLASS_P, BINARY_CLASS_P)
(STATEMENT_CLASS_P, EXPRESSION_CLASS_P, IS_TYPE_OR_DECL_P): New macros.
(TYPE_P, DECL_P, IS_NON_TYPE_CODE_CLASS, IS_EXPR_CODE_CLASS)
(checking macros, EXPR_LOCATION, SET_EXPR_LOCATION, EXPR_LOCUS): Update.
* tree.def, c-common.def, objc/objc-tree.def: Use
tree_code_class enumeration constants instead of code letters.
* alias.c, builtins.c, c-common.c, c-format.c, c-lang.c, c-pragma.c
* c-typeck.c, cgraphunit.c, convert.c, dbxout.c, dwarf2out.c
* emit-rtl.c expr.c, fold-const.c, gimplify.c, lambda-code.c
* langhooks.c, langhooks.h, predict.c, print-tree.c, reload1.c, stmt.c
* tree-browser.c, tree-cfg.c, tree-chrec.c, tree-complex.c, tree-dfa.c
* tree-dump.c, tree-eh.c, tree-gimple.c, tree-inline.c, tree-nested.c
* tree-outof-ssa.c, tree-pretty-print.c, tree-sra.c, tree-ssa-ccp.c
* tree-ssa-dce.c, tree-ssa-dom.c, tree-ssa-forwprop.c, tree-ssa-live.c
* tree-ssa-loop-im.c, tree-ssa-loop-ivopts.c, tree-ssa-operands.c
* tree-ssa-phiopt.c, tree-ssa-pre.c, tree-ssa-propagate.c
* tree-ssa.c, tree-ssanames.c, tree-tailcall.c, tree.c, varasm.c
* config/sol2-c.c, config/arm/arm.c, config/i386/winnt.c
* config/pa/pa.c, config/pa/pa.h, config/sh/sh.c, objc/objc-lang.c
Update to match.
* LANGUAGES: Add note about change.
ada:
* ada-tree.def: Use tree_code_class enumeration constants
instead of code letters.
* ada-tree.h, decl.c, misc.c, trans.c, utils.c, utils2.c:
Update for new tree-class enumeration constants.
cp:
* cp-tree.def: Use tree_code_class enumeration constants
instead of code letters.
* call.c, class.c, cp-gimplify.c, cp-lang.c, cxx-pretty-print.c
* mangle.c, pt.c, semantics.c, tree.c, typeck.c:
Update for new tree-class enumeration constants.
fortran:
* f95-lang.c, trans-expr.c, trans.c: Update for new tree-class
enumeration constants.
java:
* java-tree.def: Use tree_code_class enumeration constants
instead of code letters.
* java-gimplify.c, jcf-write.c, lang.c, parse.y: Update for
new tree-class enumeration constants.
treelang:
* treetree.c: Update for new tree-class enumeration constants.
From-SVN: r87675
2004-09-17 23:55:02 +02:00
|
|
|
else if (UNARY_CLASS_P (rhs) || BINARY_CLASS_P (rhs)
|
2004-07-06 21:55:06 +02:00
|
|
|
|| TREE_CODE (rhs) == INDIRECT_REF)
|
2004-06-12 02:18:35 +02:00
|
|
|
{
|
2004-07-02 20:47:29 +02:00
|
|
|
/* For binary, unary, and reference expressions,
|
|
|
|
create a duplicate expression with the operands
|
|
|
|
replaced with the value handles of the original
|
|
|
|
RHS. */
|
2004-06-29 03:53:04 +02:00
|
|
|
tree newt = create_value_expr_from (rhs, block, vuses);
|
|
|
|
add_to_sets (lhs, newt, vuses, TMP_GEN (block),
|
|
|
|
AVAIL_OUT (block));
|
|
|
|
value_insert_into_set (EXP_GEN (block), newt);
|
|
|
|
continue;
|
2004-06-12 02:18:35 +02:00
|
|
|
}
|
|
|
|
}
|
2004-06-21 23:57:33 +02:00
|
|
|
|
2004-06-29 03:53:04 +02:00
|
|
|
/* For any other statement that we don't recognize, simply
|
|
|
|
make the names generated by the statement available in
|
|
|
|
AVAIL_OUT and TMP_GEN. */
|
|
|
|
for (j = 0; j < NUM_DEFS (STMT_DEF_OPS (stmt)); j++)
|
2004-05-13 08:41:07 +02:00
|
|
|
{
|
2004-06-29 03:53:04 +02:00
|
|
|
tree def = DEF_OP (STMT_DEF_OPS (stmt), j);
|
|
|
|
add_to_sets (def, def, NULL, TMP_GEN (block),
|
|
|
|
AVAIL_OUT (block));
|
2004-06-12 02:18:35 +02:00
|
|
|
}
|
2004-06-29 03:53:04 +02:00
|
|
|
|
|
|
|
for (j = 0; j < NUM_USES (STMT_USE_OPS (stmt)); j++)
|
2004-06-12 02:18:35 +02:00
|
|
|
{
|
2004-06-29 03:53:04 +02:00
|
|
|
tree use = USE_OP (STMT_USE_OPS (stmt), j);
|
|
|
|
add_to_sets (use, use, NULL, TMP_GEN (block),
|
|
|
|
AVAIL_OUT (block));
|
2004-05-13 08:41:07 +02:00
|
|
|
}
|
|
|
|
}
|
|
|
|
}
|
2004-06-23 22:12:44 +02:00
|
|
|
|
2004-06-29 03:53:04 +02:00
|
|
|
/* Compute available sets for the dominator children of BLOCK. */
|
2004-05-13 08:41:07 +02:00
|
|
|
for (son = first_dom_son (CDI_DOMINATORS, block);
|
|
|
|
son;
|
|
|
|
son = next_dom_son (CDI_DOMINATORS, son))
|
2004-06-12 02:18:35 +02:00
|
|
|
compute_avail (son);
|
|
|
|
}
|
|
|
|
|
2004-06-23 22:12:44 +02:00
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
/* Eliminate fully redundant computations. */
|
|
|
|
|
|
|
|
static void
|
|
|
|
eliminate (void)
|
|
|
|
{
|
|
|
|
basic_block b;
|
|
|
|
|
|
|
|
FOR_EACH_BB (b)
|
|
|
|
{
|
|
|
|
block_stmt_iterator i;
|
|
|
|
|
|
|
|
for (i = bsi_start (b); !bsi_end_p (i); bsi_next (&i))
|
|
|
|
{
|
|
|
|
tree stmt = bsi_stmt (i);
|
|
|
|
|
2004-06-29 03:53:04 +02:00
|
|
|
/* Lookup the RHS of the expression, see if we have an
|
|
|
|
available computation for it. If so, replace the RHS with
|
2004-06-12 02:18:35 +02:00
|
|
|
the available computation. */
|
2004-06-29 03:53:04 +02:00
|
|
|
if (TREE_CODE (stmt) == MODIFY_EXPR
|
|
|
|
&& TREE_CODE (TREE_OPERAND (stmt, 0)) == SSA_NAME
|
|
|
|
&& TREE_CODE (TREE_OPERAND (stmt ,1)) != SSA_NAME
|
|
|
|
&& !is_gimple_min_invariant (TREE_OPERAND (stmt, 1))
|
|
|
|
&& !stmt_ann (stmt)->has_volatile_ops)
|
|
|
|
{
|
|
|
|
tree lhs = TREE_OPERAND (stmt, 0);
|
|
|
|
tree *rhs_p = &TREE_OPERAND (stmt, 1);
|
|
|
|
tree sprime;
|
|
|
|
|
2004-07-06 21:55:06 +02:00
|
|
|
sprime = bitmap_find_leader (AVAIL_OUT (b),
|
|
|
|
vn_lookup (lhs, NULL));
|
2004-06-29 03:53:04 +02:00
|
|
|
if (sprime
|
|
|
|
&& sprime != lhs
|
|
|
|
&& (TREE_CODE (*rhs_p) != SSA_NAME
|
|
|
|
|| may_propagate_copy (*rhs_p, sprime)))
|
|
|
|
{
|
targhooks.c (default_unwind_emit, [...]): Use gcc_assert, gcc_unreachable & internal_error instead of abort.
* targhooks.c (default_unwind_emit, default_scalar_mode_supported_p):
Use gcc_assert, gcc_unreachable & internal_error instead of abort.
* timevar.c (timevar_push, timevar_pop, timevar_start,
timevar_stop): Likewise.
* toplev.c (default_pch_valid_p): Likewise.
* tracer.c (tail_duplicate): Likewise.
* tree-alias-common.c (get_alias_var_decl,
get_values_from_constructor, create_alias_var, delete_alias_vars,
empty_points_to_set, same_points_to_set, ptr_may_alias_var):
Likewise.
* tree.c (tree_size, make_node_stat, copy_node_stat,
build_int_cst_wide, integer_all_onesp, list_length, chainon,
tree_node_structure, type_contains_placeholder_p, substitute_in_expr,
substitute_placeholder_in_expr, tabilize_reference_1, build0_stat,
build1_stat, build2_stat, build3_stat, build4_stat, is_attribute_p,
lookup_attribute, type_hash_canon, host_integerp, iterative_hash_expr,
build_method_type_directly, decl_type_context, get_callee_fndecl,
get_set_constructor_bits, build_vector_type_for_mode, int_cst_value,
tree_fold_gcd): Likewise.
* tree-cfg.c (create_bb, make_ctrl_stmt_edges, make_exit_edges,
make_cond_expr_edges, group_case_labels, tree_merge_blocks,
cleanup_control_expr_graph, find_taken_edge,
find_taken_edge_switch_expr, phi_alternatives_equal,
is_ctrl_altering_stmt, disband_implicit_edges, set_bb_for_stmt,
stmt_for_bsi, tree_find_edge_insert_loc, bsi_insert_on_edge_immediate,
tree_split_edge, tree_verify_flow_info, thread_jumps,
tree_redirect_edge_and_branch, tree_flow_call_edges_add): Likewise.
* tree-chrec.c (chrec_fold_poly_cst, chrec_fold_plus_poly_poly,
chrec_fold_multiply_poly_poly): Likewise.
* tree-complex.c (extract_component, expand_complex_division,
expand_complex_comparison, expand_complex_operations_1,
build_replicated_const, expand_vector_operations_1): Likewise.
* tree-data-ref.c (tree_fold_bezout, build_classic_dist_vector,
build_classic_dir_vector): Likewise.
* tree-dfa.c (compute_immediate_uses_for_phi,
compute_immediate_uses_for_stmt, create_var_ann, create_stmt_ann,
create_tree_ann, collect_dfa_stats, get_virtual_var): Likewise.
* tree-dump.c (dequeue_and_dump): Likewise.
* tree-eh.c (record_stmt_eh_region, add_stmt_to_eh_region,
record_in_finally_tree, replace_goto_queue_1,
maybe_record_in_goto_queue, verify_norecord_switch_expr,
do_return_redirection): Likewise.
* tree-if-conv.c (tree_if_convert_stmt, tree_if_convert_cond_expr,
add_to_dst_predicate_list, find_phi_replacement_condition,
replace_phi_with_cond_modify_expr, get_loop_body_in_if_conv_order):
Likewise.
* tree-inline.c (remap_decl, remap_type, remap_decls, copy_body_r,
initialize_inlined_parameters, declare_return_variable,
estimate_num_insns_1, expand_call_inline, expand_calls_inline,
optimize_inline_calls, copy_tree_r): Likewise.
* tree-into-ssa.c (rewrite_initialize_block_local_data, rewrite_stmt,
ssa_rewrite_stmt, rewrite_into_ssa): Likewise.
* tree-iterator.c (alloc_stmt_list, tsi_link_before, tsi_link_after,
tsi_split_statement_list_after, tsi_split_statement_list_before):
Likewise.
* tree-mudflap.c (mf_varname_tree): Likewise.
* tree-nested.c (create_tmp_var_for, lookup_field_for_decl,
lookup_tramp_for_decl, convert_all_function_calls): Likewise.
* tree-optimize.c (tree_rest_of_compilation): Likewise.
* tree-outof-ssa.c (create_temp, eliminate_build, eliminate_phi,
coalesce_abnormal_edges, coalesce_ssa_name, eliminate_virtual_phis,
free_temp_expr_table, add_dependance, finish_expr, rewrite_trees):
Likewise.
* tree-phinodes.c (resize_phi_node, add_phi_arg,
remove_all_phi_nodes_for): Likewise.
* tree-pretty-print.c (op_prio, print_call_name): Likewise.
* tree-profile.c (tree_gen_interval_profiler, tree_gen_pow2_profiler,
tree_gen_one_value_profiler, tree_gen_const_delta_profiler): Likewise.
* tree-sra.c (type_can_instantiate_all_elements, sra_hash_tree,
sra_elt_eq, sra_walk_expr, instantiate_missing_elements,
generate_one_element_ref, generate_element_copy,
generate_element_zero, scalarize_copy, scalarize_init,
scalarize_ldst): Likewise.
* tree-ssa-alias.c (delete_alias_info, group_aliases, may_alias_p,
add_may_alias, add_pointed_to_expr, add_pointed_to_var,
collect_points_to_info_r, get_tmt_for, get_ptr_info): Likewise.
* tree-ssa.c (walk_use_def_chains, check_phi_redundancy): Likewise.
* tree-ssa-ccp.c (dump_lattice_value, get_default_value, get_value,
set_lattice_value, likely_value, ccp_visit_phi_node, visit_assignment,
widen_bitfield, ccp_fold_builtin): Likewise.
* tree-ssa-copy.c (may_propagate_copy, merge_alias_info,
replace_exp_1, propagate_tree_value): Likewise.
* tree-ssa-copyrename.c (copy_rename_partition_coalesce): Likewise.
* tree-ssa-dce.c (set_control_dependence_map_bit,
find_control_dependence, find_pdom, mark_operand_necessary,
mark_stmt_if_obviously_necessary,
mark_control_dependent_edges_necessary, remove_dead_stmt): Likewise.
* tree-ssa-dom.c (dom_opt_initialize_block_local_data,
simplify_switch_and_lookup_avail_expr, cprop_into_successor_phis,
eliminate_redundant_computations, avail_expr_eq): Likewise.
* tree-ssa-dse.c (fix_stmt_v_may_defs): Likewise.
* tree-ssa-loop-ch.c (should_duplicate_loop_header_p,
duplicate_blocks): Likewise.
* tree-ssa-loop-im.c (for_each_index, set_level,
is_call_clobbered_ref): Likewise.
* tree-ssa-loop-ivopts.c (dump_use, divide, stmt_after_ip_normal_pos,
stmt_after_increment, set_iv, contains_abnormal_ssa_name_p,
find_interesting_uses_outer_or_nonlin, add_derived_ivs_candidates,
peel_address, ptr_difference_cost, may_replace_final_value,
determine_use_iv_cost, rewrite_use_nonlinear_expr, rewrite_use_outer,
rewrite_use, rewrite_uses): Likewise.
* tree-ssa-loop-manip.c (rewrite_into_loop_closed_ssa,
check_loop_closed_ssa_use): Likewise.
* tree-ssanames.c (make_ssa_name): Likewise.
* tree-ssa-operands.c (finalize_ssa_defs, finalize_ssa_uses,
finalize_ssa_v_must_defs, finalize_ssa_stmt_operands,
get_stmt_operands, get_expr_operands, get_asm_expr_operands,
get_indirect_ref_operands, add_stmt_operand): Likewise.
* tree-ssa-pre.c (value_exists_in_set_bitmap,
value_remove_from_set_bitmap, bitmap_insert_into_set, insert_into_set,
phi_translate, valid_in_set, compute_antic,
find_or_generate_expression, create_expression_by_pieces, insert_aux,
create_value_expr_from, eliminate): Likewise.
* tree-ssa-propagate.c (cfg_blocks_get): Likewise.
* tree-ssa-threadupdate.c (remove_last_stmt_and_useless_edges):
Likewise.
* tree-tailcall.c (independent_of_stmt_p, adjust_return_value,
eliminate_tail_call): Likewise.
* tree-vectorizer.c (vect_create_index_for_array_ref,
vect_align_data_ref, vect_create_data_ref,
vect_create_destination_var, vect_get_vec_def_for_operand,
vect_finish_stmt_generation, vect_transform_stmt,
vect_transform_loop_bound, vect_transform_loop,
vect_analyze_operations): Likewise.
* tree-vn.c (vn_compute, set_value_handle, get_value_handle):
Likewise.
* tree-flow-inline.h (var_ann, get_var_ann, get_def_from_ptr,
get_use_op_ptr, immediate_use, phi_ssa_name_p, bsi_start,
bsi_after_labels, bsi_last): Likewise.
* tree-ssa-live.c (var_union, change_partition_var,
create_ssa_var_map, calculate_live_on_entry, root_var_init,
type_var_init, add_coalesce, sort_coalesce_list, pop_best_coalesce):
Likewise.
* tree-ssa-live.h (partition_is_global, live_entry_blocks,
tpa_find_tree): Likewise.
(register_ssa_partition_check): Declare.
(register_ssa_partition): use it.
* tree-ssa-live.c: Include errors.h.
(register_ssa_partition_check): New.
* tree-ssa-operands.c: Include errors.h.
* Makefile.in (tree-ssa-operands.o): Depend on errors.h.
Co-Authored-By: Nathan Sidwell <nathan@codesourcery.com>
From-SVN: r87223
2004-09-09 09:54:12 +02:00
|
|
|
gcc_assert (sprime != *rhs_p);
|
2004-06-29 03:53:04 +02:00
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
if (dump_file && (dump_flags & TDF_DETAILS))
|
|
|
|
{
|
|
|
|
fprintf (dump_file, "Replaced ");
|
2004-06-29 03:53:04 +02:00
|
|
|
print_generic_expr (dump_file, *rhs_p, 0);
|
2004-06-12 02:18:35 +02:00
|
|
|
fprintf (dump_file, " with ");
|
|
|
|
print_generic_expr (dump_file, sprime, 0);
|
|
|
|
fprintf (dump_file, " in ");
|
|
|
|
print_generic_stmt (dump_file, stmt, 0);
|
|
|
|
}
|
|
|
|
pre_stats.eliminations++;
|
2004-06-29 03:53:04 +02:00
|
|
|
propagate_tree_value (rhs_p, sprime);
|
|
|
|
modify_stmt (stmt);
|
2004-07-22 18:39:49 +02:00
|
|
|
|
|
|
|
/* If we removed EH side effects from the statement, clean
|
|
|
|
its EH information. */
|
|
|
|
if (maybe_clean_eh_stmt (stmt))
|
|
|
|
{
|
|
|
|
bitmap_set_bit (need_eh_cleanup,
|
|
|
|
bb_for_stmt (stmt)->index);
|
|
|
|
if (dump_file && (dump_flags & TDF_DETAILS))
|
|
|
|
fprintf (dump_file, " Removed EH side effects.\n");
|
|
|
|
}
|
2004-06-29 03:53:04 +02:00
|
|
|
}
|
|
|
|
}
|
2004-06-12 02:18:35 +02:00
|
|
|
}
|
|
|
|
}
|
2004-05-13 08:41:07 +02:00
|
|
|
}
|
|
|
|
|
2004-06-23 22:12:44 +02:00
|
|
|
|
2004-06-29 03:53:04 +02:00
|
|
|
/* Initialize data structures used by PRE. */
|
2004-05-13 08:41:07 +02:00
|
|
|
|
|
|
|
static void
|
2004-06-29 03:53:04 +02:00
|
|
|
init_pre (void)
|
2004-05-13 08:41:07 +02:00
|
|
|
{
|
2004-06-12 02:18:35 +02:00
|
|
|
basic_block bb;
|
2004-06-29 03:53:04 +02:00
|
|
|
|
2004-07-16 06:24:43 +02:00
|
|
|
connect_infinite_loops_to_exit ();
|
2004-06-29 03:53:04 +02:00
|
|
|
vn_init ();
|
2004-06-12 02:18:35 +02:00
|
|
|
memset (&pre_stats, 0, sizeof (pre_stats));
|
2004-07-22 18:39:49 +02:00
|
|
|
|
|
|
|
/* If block 0 has more than one predecessor, it means that its PHI
|
|
|
|
nodes will have arguments coming from block -1. This creates
|
|
|
|
problems for several places in PRE that keep local arrays indexed
|
|
|
|
by block number. To prevent this, we split the edge coming from
|
|
|
|
ENTRY_BLOCK_PTR (FIXME, if ENTRY_BLOCK_PTR had an index number
|
|
|
|
different than -1 we wouldn't have to hack this. tree-ssa-dce.c
|
|
|
|
needs a similar change). */
|
|
|
|
if (ENTRY_BLOCK_PTR->succ->dest->pred->pred_next)
|
|
|
|
if (!(ENTRY_BLOCK_PTR->succ->flags & EDGE_ABNORMAL))
|
|
|
|
split_edge (ENTRY_BLOCK_PTR->succ);
|
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
FOR_ALL_BB (bb)
|
2004-06-29 03:53:04 +02:00
|
|
|
bb->aux = xcalloc (1, sizeof (struct bb_value_sets));
|
|
|
|
|
2004-09-07 22:51:25 +02:00
|
|
|
gcc_obstack_init (&grand_bitmap_obstack);
|
2004-06-12 02:18:35 +02:00
|
|
|
phi_translate_table = htab_create (511, expr_pred_trans_hash,
|
2004-06-29 03:53:04 +02:00
|
|
|
expr_pred_trans_eq, free);
|
2004-06-12 02:18:35 +02:00
|
|
|
value_set_pool = create_alloc_pool ("Value sets",
|
|
|
|
sizeof (struct value_set), 30);
|
2004-07-02 20:47:29 +02:00
|
|
|
bitmap_set_pool = create_alloc_pool ("Bitmap sets",
|
|
|
|
sizeof (struct bitmap_set), 30);
|
2004-06-12 02:18:35 +02:00
|
|
|
value_set_node_pool = create_alloc_pool ("Value set nodes",
|
2004-06-29 03:53:04 +02:00
|
|
|
sizeof (struct value_set_node), 30);
|
2004-06-12 02:18:35 +02:00
|
|
|
calculate_dominance_info (CDI_POST_DOMINATORS);
|
2004-05-13 08:41:07 +02:00
|
|
|
calculate_dominance_info (CDI_DOMINATORS);
|
2004-09-11 23:14:39 +02:00
|
|
|
binary_node_pool = create_alloc_pool ("Binary tree nodes",
|
|
|
|
tree_code_size (PLUS_EXPR), 30);
|
|
|
|
unary_node_pool = create_alloc_pool ("Unary tree nodes",
|
|
|
|
tree_code_size (NEGATE_EXPR), 30);
|
|
|
|
reference_node_pool = create_alloc_pool ("Reference tree nodes",
|
|
|
|
tree_code_size (COMPONENT_REF), 30);
|
2004-06-12 02:18:35 +02:00
|
|
|
FOR_ALL_BB (bb)
|
|
|
|
{
|
|
|
|
EXP_GEN (bb) = set_new (true);
|
2004-07-05 00:51:36 +02:00
|
|
|
PHI_GEN (bb) = bitmap_set_new ();
|
|
|
|
TMP_GEN (bb) = bitmap_set_new ();
|
2004-07-02 20:47:29 +02:00
|
|
|
AVAIL_OUT (bb) = bitmap_set_new ();
|
2004-06-12 02:18:35 +02:00
|
|
|
}
|
2004-07-22 18:39:49 +02:00
|
|
|
|
|
|
|
need_eh_cleanup = BITMAP_XMALLOC ();
|
2004-06-29 03:53:04 +02:00
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
/* Deallocate data structures used by PRE. */
|
2004-05-13 08:41:07 +02:00
|
|
|
|
2004-06-29 03:53:04 +02:00
|
|
|
static void
|
|
|
|
fini_pre (void)
|
|
|
|
{
|
|
|
|
basic_block bb;
|
|
|
|
|
2004-09-07 22:51:25 +02:00
|
|
|
obstack_free (&grand_bitmap_obstack, NULL);
|
2004-06-29 03:53:04 +02:00
|
|
|
free_alloc_pool (value_set_pool);
|
2004-07-02 20:47:29 +02:00
|
|
|
free_alloc_pool (bitmap_set_pool);
|
2004-06-29 03:53:04 +02:00
|
|
|
free_alloc_pool (value_set_node_pool);
|
|
|
|
free_alloc_pool (binary_node_pool);
|
2004-07-06 21:55:06 +02:00
|
|
|
free_alloc_pool (reference_node_pool);
|
2004-06-29 03:53:04 +02:00
|
|
|
free_alloc_pool (unary_node_pool);
|
|
|
|
htab_delete (phi_translate_table);
|
2004-07-17 00:28:29 +02:00
|
|
|
remove_fake_exit_edges ();
|
2004-07-16 06:24:43 +02:00
|
|
|
|
2004-06-29 03:53:04 +02:00
|
|
|
FOR_ALL_BB (bb)
|
|
|
|
{
|
|
|
|
free (bb->aux);
|
|
|
|
bb->aux = NULL;
|
|
|
|
}
|
2004-07-17 00:28:29 +02:00
|
|
|
|
2004-06-29 03:53:04 +02:00
|
|
|
free_dominance_info (CDI_POST_DOMINATORS);
|
|
|
|
vn_delete ();
|
2004-07-22 18:39:49 +02:00
|
|
|
|
|
|
|
if (bitmap_first_set_bit (need_eh_cleanup) >= 0)
|
|
|
|
{
|
|
|
|
tree_purge_all_dead_eh_edges (need_eh_cleanup);
|
|
|
|
cleanup_tree_cfg ();
|
|
|
|
}
|
|
|
|
|
|
|
|
BITMAP_XFREE (need_eh_cleanup);
|
2004-06-29 03:53:04 +02:00
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
/* Main entry point to the SSA-PRE pass. DO_FRE is true if the caller
|
|
|
|
only wants to do full redundancy elimination. */
|
|
|
|
|
|
|
|
static void
|
|
|
|
execute_pre (bool do_fre)
|
|
|
|
{
|
|
|
|
init_pre ();
|
|
|
|
|
|
|
|
/* Collect and value number expressions computed in each basic
|
|
|
|
block. */
|
2004-06-12 02:18:35 +02:00
|
|
|
compute_avail (ENTRY_BLOCK_PTR);
|
2004-05-13 08:41:07 +02:00
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
if (dump_file && (dump_flags & TDF_DETAILS))
|
|
|
|
{
|
2004-06-29 03:53:04 +02:00
|
|
|
basic_block bb;
|
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
FOR_ALL_BB (bb)
|
|
|
|
{
|
|
|
|
print_value_set (dump_file, EXP_GEN (bb), "exp_gen", bb->index);
|
2004-07-05 00:51:36 +02:00
|
|
|
bitmap_print_value_set (dump_file, TMP_GEN (bb), "tmp_gen",
|
|
|
|
bb->index);
|
2004-07-02 20:47:29 +02:00
|
|
|
bitmap_print_value_set (dump_file, AVAIL_OUT (bb), "avail_out",
|
|
|
|
bb->index);
|
2004-06-12 02:18:35 +02:00
|
|
|
}
|
|
|
|
}
|
2004-05-13 08:41:07 +02:00
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
/* Insert can get quite slow on an incredibly large number of basic
|
|
|
|
blocks due to some quadratic behavior. Until this behavior is
|
|
|
|
fixed, don't run it when he have an incredibly large number of
|
|
|
|
bb's. If we aren't going to run insert, there is no point in
|
|
|
|
computing ANTIC, either, even though it's plenty fast. */
|
2004-06-29 03:53:04 +02:00
|
|
|
if (!do_fre && n_basic_blocks < 4000)
|
2004-05-13 08:41:07 +02:00
|
|
|
{
|
2004-06-12 02:18:35 +02:00
|
|
|
compute_antic ();
|
|
|
|
insert ();
|
|
|
|
}
|
2004-06-29 03:53:04 +02:00
|
|
|
|
|
|
|
/* Remove all the redundant expressions. */
|
2004-06-12 02:18:35 +02:00
|
|
|
eliminate ();
|
|
|
|
|
|
|
|
if (dump_file && (dump_flags & TDF_STATS))
|
|
|
|
{
|
|
|
|
fprintf (dump_file, "Insertions:%d\n", pre_stats.insertions);
|
|
|
|
fprintf (dump_file, "New PHIs:%d\n", pre_stats.phis);
|
|
|
|
fprintf (dump_file, "Eliminated:%d\n", pre_stats.eliminations);
|
2004-05-13 08:41:07 +02:00
|
|
|
}
|
|
|
|
|
2004-06-29 03:53:04 +02:00
|
|
|
fini_pre ();
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
/* Gate and execute functions for PRE. */
|
|
|
|
|
|
|
|
static void
|
|
|
|
do_pre (void)
|
|
|
|
{
|
|
|
|
execute_pre (false);
|
2004-05-13 08:41:07 +02:00
|
|
|
}
|
|
|
|
|
|
|
|
static bool
|
|
|
|
gate_pre (void)
|
|
|
|
{
|
|
|
|
return flag_tree_pre != 0;
|
|
|
|
}
|
|
|
|
|
2004-06-12 02:18:35 +02:00
|
|
|
struct tree_opt_pass pass_pre =
|
2004-05-13 08:41:07 +02:00
|
|
|
{
|
|
|
|
"pre", /* name */
|
|
|
|
gate_pre, /* gate */
|
2004-06-29 03:53:04 +02:00
|
|
|
do_pre, /* execute */
|
2004-05-13 08:41:07 +02:00
|
|
|
NULL, /* sub */
|
|
|
|
NULL, /* next */
|
|
|
|
0, /* static_pass_number */
|
|
|
|
TV_TREE_PRE, /* tv_id */
|
2004-07-28 07:13:10 +02:00
|
|
|
PROP_no_crit_edges | PROP_cfg
|
|
|
|
| PROP_ssa | PROP_alias, /* properties_required */
|
2004-05-13 08:41:07 +02:00
|
|
|
0, /* properties_provided */
|
|
|
|
0, /* properties_destroyed */
|
|
|
|
0, /* todo_flags_start */
|
Unify the management of RTL and tree-level dump files.
2004-09-06 Paolo Bonzini <bonzini@gnu.org>
Unify the management of RTL and tree-level dump files.
* cfgexpand.c (tree_expand_cfg): Fix incorrect comment.
Don't print function name to the dump file, the pass manager
would do this for us. Add code from the top of
rest_of_compilation, up to the initial RTL dump.
* passes.c (rest_of_handle_jump): Call fixup_tail_calls and
close the DFI_sibling dump file.
(rest_of_compilation): Don't do that here. Remove code up to the
initial RTL dump.
(init_optimization_passes): Remove.
(pass_rest_of_compilation): Change pass name to NULL.
* toplev.c (lang_dependent_init): Do not use an empty dump file prefix.
Do not call init_optimization_passes.
* toplev.h (init_optimization_passes): Remove.
* graph.c (print_rtl_graph_with_bb, clean_graph_dump_file,
finish_graph_dump_file): Remove SUFFIX parameter.
* graph.h (print_rtl_graph_with_bb, clean_graph_dump_file,
finish_graph_dump_file): Likewise.
* tree-pass.h (struct tree_opt_pass): Add `letter' field.
* cfgexpand.c (pass_expand): Adjust.
* gimple-low.c (pass_lower_cf, pass_remove_useless_vars): Adjust.
* passes.c (pass_rest_of_compilation): Adjust.
* predict.c (pass_profile): Adjust.
* tree-alias-common.c (pass_build_pta, pass_del_pta): Adjust.
* tree-cfg.c (pass_build_cfg, pass_remove_useless_stmts,
pass_split_crit_edges, pass_warn_function_return): Adjust.
* tree-complex.c (pass_lower_vector_ssa, pass_pre_expand): Adjust.
* tree-dfa.c (pass_referenced_vars): Adjust.
* tree-eh.c (pass_lower_eh): Adjust.
* tree-if-conv.c (pass_build_ssa): Adjust.
* tree-into-ssa.c (pass_build_ssa): Adjust.
* tree-mudflap.c (pass_mudflap_1, pass_mudflap_2): Adjust.
* tree-nomudflap.c (pass_mudflap_1, pass_mudflap_2): Adjust.
* tree-nrv.c (pass_nrv): Adjust.
* tree-optimize.c (pass_gimple, pass_all_optimizations,
pass_cleanup_cfg_post_optimizing, pass_free_datastructures,
pass_init_datastructures): Adjust.
* tree-outof-ssa.c (pass_del_ssa): Adjust.
* tree-profile.c (pass_tree_profile): Adjust.
* tree-sra.c (pass_sra): Adjust.
* tree-ssa-alias.c (pass_may_alias): Adjust.
* tree-ssa-ccp.c (pass_ccp, pass_fold_builtins): Adjust.
* tree-ssa-copyrename.c (pass_rename_ssa_copies): Adjust.
* tree-ssa-dce.c (pass_dce, pass_cd_dce): Adjust.
* tree-ssa-dom.c (pass_dominator): Adjust.
* tree-ssa-dse.c (pass_dse): Adjust.
* tree-ssa-forwprop.c (pass_forwprop): Adjust.
* tree-ssa-if-conv.c (pass_if_conversion): Adjust.
* tree-ssa-loop-ch.c (pass_ch): Adjust.
* tree-ssa-loop.c (pass_loop, pass_loop_init, pass_lim,
pass_loop_done, pass_complete_unroll, pass_iv_canon,
pass_iv_optimize, pass_vectorize): Adjust.
* tree-ssa-phiopt.c (pass_phiopt): Adjust.
* tree-ssa-pre.c (pass_pre, pass_fre): Adjust.
* tree-ssa.c (pass_redundant_phi, pass_early_warn_uninitialized,
pass_late_warn_uninnitialized): Adjust.
* tree-tailcall.c (pass_tail_recursion, pass_tail_calls): Adjust.
* Makefile.in (tree-dump.o): Add new dependencies.
* cgraph.c (cgraph_remove_node): TDF_all -> TDF_tree_all.
* cgraphunit.c (cgraph_preserve_function_body_p, cgraph_optimize):
Likewise.
* toplev.c (dump_file_name): New.
* tree-dump.c (dump_enable_all): Add LETTER parameter.
(struct dump_file_info): Add NUM and LETTER fields.
(dump_files): Adjust and add RTL dump files.
(dump_register): Add NUM and LETTER fields.
(get_dump_file_name, dump_initialized_p, enable_rtl_dump_file): New.
(dump_begin): Use get_dump_file_name.
(dump_switch_p_1): Adjust call to dump_enable_all.
* tree-dump.h (dump_register): Adjust prototype.
* tree-optimize.c (register_one_dump_file): Take dump file index.
Support flags for RTL dumps.
(register_dump_files): Fill in NUM field of struct dump_file_info.
Track properties both when the gate is executed and when it is not.
(execute_todo): Dump RTL. Add PROPERTIES parameter.
(execute_one_pass): Pass properties to execute_todo. Handle VCG
dumps of RTL.
* tree-pass.h (dump_file_name): New.
* tree.h (TDF_TREE, TDF_RTL, get_dump_file_name, dump_initialized_p):
New.
* Makefile.in (passes.o): Add new dependencies.
* passes.c (struct dump_file_info, enum dump_file_index,
dump_file_tbl, init_optimization_passes): Remove.
(open_dump_file, close_dump_file): Use tree-dumping infrastructure.
(rest_of_handle_new_regalloc, rest_of_handle_old_regalloc): Use
dump_enabled_p.
(finish_optimization_passes): Update finish_graph_dump_file loop.
(enable_rtl_dump_file): Remove.
* tree-dump.c (dump_files): Adjust and add RTL dump files.
(enable_rtl_dump_file): Add here.
* tree.h (enum tree_dump_index): Add RTL dump file indices.
* doc/invoke.texi (Debugging options): Document new RTL debugging
options. Update.
From-SVN: r87113
2004-09-06 12:08:17 +02:00
|
|
|
TODO_dump_func | TODO_ggc_collect | TODO_verify_ssa, /* todo_flags_finish */
|
|
|
|
0 /* letter */
|
2004-05-13 08:41:07 +02:00
|
|
|
};
|
2004-06-29 03:53:04 +02:00
|
|
|
|
|
|
|
|
|
|
|
/* Gate and execute functions for FRE. */
|
|
|
|
|
|
|
|
static void
|
|
|
|
do_fre (void)
|
|
|
|
{
|
|
|
|
execute_pre (true);
|
|
|
|
}
|
|
|
|
|
|
|
|
static bool
|
|
|
|
gate_fre (void)
|
|
|
|
{
|
|
|
|
return flag_tree_fre != 0;
|
|
|
|
}
|
|
|
|
|
|
|
|
struct tree_opt_pass pass_fre =
|
|
|
|
{
|
|
|
|
"fre", /* name */
|
|
|
|
gate_fre, /* gate */
|
|
|
|
do_fre, /* execute */
|
|
|
|
NULL, /* sub */
|
|
|
|
NULL, /* next */
|
|
|
|
0, /* static_pass_number */
|
|
|
|
TV_TREE_FRE, /* tv_id */
|
2004-07-28 07:13:10 +02:00
|
|
|
PROP_cfg | PROP_ssa | PROP_alias, /* properties_required */
|
2004-06-29 03:53:04 +02:00
|
|
|
0, /* properties_provided */
|
|
|
|
0, /* properties_destroyed */
|
|
|
|
0, /* todo_flags_start */
|
Unify the management of RTL and tree-level dump files.
2004-09-06 Paolo Bonzini <bonzini@gnu.org>
Unify the management of RTL and tree-level dump files.
* cfgexpand.c (tree_expand_cfg): Fix incorrect comment.
Don't print function name to the dump file, the pass manager
would do this for us. Add code from the top of
rest_of_compilation, up to the initial RTL dump.
* passes.c (rest_of_handle_jump): Call fixup_tail_calls and
close the DFI_sibling dump file.
(rest_of_compilation): Don't do that here. Remove code up to the
initial RTL dump.
(init_optimization_passes): Remove.
(pass_rest_of_compilation): Change pass name to NULL.
* toplev.c (lang_dependent_init): Do not use an empty dump file prefix.
Do not call init_optimization_passes.
* toplev.h (init_optimization_passes): Remove.
* graph.c (print_rtl_graph_with_bb, clean_graph_dump_file,
finish_graph_dump_file): Remove SUFFIX parameter.
* graph.h (print_rtl_graph_with_bb, clean_graph_dump_file,
finish_graph_dump_file): Likewise.
* tree-pass.h (struct tree_opt_pass): Add `letter' field.
* cfgexpand.c (pass_expand): Adjust.
* gimple-low.c (pass_lower_cf, pass_remove_useless_vars): Adjust.
* passes.c (pass_rest_of_compilation): Adjust.
* predict.c (pass_profile): Adjust.
* tree-alias-common.c (pass_build_pta, pass_del_pta): Adjust.
* tree-cfg.c (pass_build_cfg, pass_remove_useless_stmts,
pass_split_crit_edges, pass_warn_function_return): Adjust.
* tree-complex.c (pass_lower_vector_ssa, pass_pre_expand): Adjust.
* tree-dfa.c (pass_referenced_vars): Adjust.
* tree-eh.c (pass_lower_eh): Adjust.
* tree-if-conv.c (pass_build_ssa): Adjust.
* tree-into-ssa.c (pass_build_ssa): Adjust.
* tree-mudflap.c (pass_mudflap_1, pass_mudflap_2): Adjust.
* tree-nomudflap.c (pass_mudflap_1, pass_mudflap_2): Adjust.
* tree-nrv.c (pass_nrv): Adjust.
* tree-optimize.c (pass_gimple, pass_all_optimizations,
pass_cleanup_cfg_post_optimizing, pass_free_datastructures,
pass_init_datastructures): Adjust.
* tree-outof-ssa.c (pass_del_ssa): Adjust.
* tree-profile.c (pass_tree_profile): Adjust.
* tree-sra.c (pass_sra): Adjust.
* tree-ssa-alias.c (pass_may_alias): Adjust.
* tree-ssa-ccp.c (pass_ccp, pass_fold_builtins): Adjust.
* tree-ssa-copyrename.c (pass_rename_ssa_copies): Adjust.
* tree-ssa-dce.c (pass_dce, pass_cd_dce): Adjust.
* tree-ssa-dom.c (pass_dominator): Adjust.
* tree-ssa-dse.c (pass_dse): Adjust.
* tree-ssa-forwprop.c (pass_forwprop): Adjust.
* tree-ssa-if-conv.c (pass_if_conversion): Adjust.
* tree-ssa-loop-ch.c (pass_ch): Adjust.
* tree-ssa-loop.c (pass_loop, pass_loop_init, pass_lim,
pass_loop_done, pass_complete_unroll, pass_iv_canon,
pass_iv_optimize, pass_vectorize): Adjust.
* tree-ssa-phiopt.c (pass_phiopt): Adjust.
* tree-ssa-pre.c (pass_pre, pass_fre): Adjust.
* tree-ssa.c (pass_redundant_phi, pass_early_warn_uninitialized,
pass_late_warn_uninnitialized): Adjust.
* tree-tailcall.c (pass_tail_recursion, pass_tail_calls): Adjust.
* Makefile.in (tree-dump.o): Add new dependencies.
* cgraph.c (cgraph_remove_node): TDF_all -> TDF_tree_all.
* cgraphunit.c (cgraph_preserve_function_body_p, cgraph_optimize):
Likewise.
* toplev.c (dump_file_name): New.
* tree-dump.c (dump_enable_all): Add LETTER parameter.
(struct dump_file_info): Add NUM and LETTER fields.
(dump_files): Adjust and add RTL dump files.
(dump_register): Add NUM and LETTER fields.
(get_dump_file_name, dump_initialized_p, enable_rtl_dump_file): New.
(dump_begin): Use get_dump_file_name.
(dump_switch_p_1): Adjust call to dump_enable_all.
* tree-dump.h (dump_register): Adjust prototype.
* tree-optimize.c (register_one_dump_file): Take dump file index.
Support flags for RTL dumps.
(register_dump_files): Fill in NUM field of struct dump_file_info.
Track properties both when the gate is executed and when it is not.
(execute_todo): Dump RTL. Add PROPERTIES parameter.
(execute_one_pass): Pass properties to execute_todo. Handle VCG
dumps of RTL.
* tree-pass.h (dump_file_name): New.
* tree.h (TDF_TREE, TDF_RTL, get_dump_file_name, dump_initialized_p):
New.
* Makefile.in (passes.o): Add new dependencies.
* passes.c (struct dump_file_info, enum dump_file_index,
dump_file_tbl, init_optimization_passes): Remove.
(open_dump_file, close_dump_file): Use tree-dumping infrastructure.
(rest_of_handle_new_regalloc, rest_of_handle_old_regalloc): Use
dump_enabled_p.
(finish_optimization_passes): Update finish_graph_dump_file loop.
(enable_rtl_dump_file): Remove.
* tree-dump.c (dump_files): Adjust and add RTL dump files.
(enable_rtl_dump_file): Add here.
* tree.h (enum tree_dump_index): Add RTL dump file indices.
* doc/invoke.texi (Debugging options): Document new RTL debugging
options. Update.
From-SVN: r87113
2004-09-06 12:08:17 +02:00
|
|
|
TODO_dump_func | TODO_ggc_collect | TODO_verify_ssa, /* todo_flags_finish */
|
|
|
|
0 /* letter */
|
2004-06-29 03:53:04 +02:00
|
|
|
};
|