URL https://opencores.org/ocsvn/openrisc/openrisc/trunk

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [tree-ssa-loop.c] - Blame information for rev 748

Go to most recent revision | Details | Compare with Previous | View Log


/* Loop optimizations over tree-ssa.
   Copyright (C) 2003, 2005, 2006, 2007, 2008, 2009, 2010
   Free Software Foundation, Inc.
 
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 3, 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 COPYING3.  If not see
<http://www.gnu.org/licenses/>.  */
 
#include "config.h"
#include "system.h"
#include "coretypes.h"
#include "tm.h"
#include "tree.h"
#include "tm_p.h"
#include "basic-block.h"
#include "output.h"
#include "tree-flow.h"
#include "tree-dump.h"
#include "tree-pass.h"
#include "timevar.h"
#include "cfgloop.h"
#include "flags.h"
#include "tree-inline.h"
#include "tree-scalar-evolution.h"
#include "diagnostic-core.h"
#include "tree-vectorizer.h"
 
/* The loop superpass.  */
 
static bool
gate_tree_loop (void)
{
  return flag_tree_loop_optimize != 0;
}
 
struct gimple_opt_pass pass_tree_loop =
{
 {
  GIMPLE_PASS,
  "loop",                               /* name */
  gate_tree_loop,                       /* gate */
  NULL,                                 /* execute */
  NULL,                                 /* sub */
  NULL,                                 /* next */
  0,                                     /* static_pass_number */
  TV_TREE_LOOP,                         /* tv_id */
  PROP_cfg,                             /* properties_required */
  0,                                     /* properties_provided */
  0,                                     /* properties_destroyed */
  TODO_ggc_collect,                     /* todo_flags_start */
  TODO_verify_ssa | TODO_ggc_collect    /* todo_flags_finish */
 }
};
 
/* Loop optimizer initialization.  */
 
static unsigned int
tree_ssa_loop_init (void)
{
  loop_optimizer_init (LOOPS_NORMAL
                       | LOOPS_HAVE_RECORDED_EXITS);
  rewrite_into_loop_closed_ssa (NULL, TODO_update_ssa);
 
  if (number_of_loops () <= 1)
    return 0;
 
  scev_initialize ();
  return 0;
}
 
struct gimple_opt_pass pass_tree_loop_init =
{
 {
  GIMPLE_PASS,
  "loopinit",                           /* name */
  NULL,                                 /* gate */
  tree_ssa_loop_init,                   /* execute */
  NULL,                                 /* sub */
  NULL,                                 /* next */
  0,                                     /* static_pass_number */
  TV_TREE_LOOP_INIT,                    /* tv_id */
  PROP_cfg,                             /* properties_required */
  0,                                     /* properties_provided */
  0,                                     /* properties_destroyed */
  0,                                     /* todo_flags_start */
 
 }
};
 
/* Loop invariant motion pass.  */
 
static unsigned int
tree_ssa_loop_im (void)
{
  if (number_of_loops () <= 1)
    return 0;
 
  return tree_ssa_lim ();
}
 
static bool
gate_tree_ssa_loop_im (void)
{
  return flag_tree_loop_im != 0;
}
 
struct gimple_opt_pass pass_lim =
{
 {
  GIMPLE_PASS,
  "lim",                                /* name */
  gate_tree_ssa_loop_im,                /* gate */
  tree_ssa_loop_im,                     /* execute */
  NULL,                                 /* sub */
  NULL,                                 /* next */
  0,                                     /* static_pass_number */
  TV_LIM,                               /* tv_id */
  PROP_cfg,                             /* properties_required */
  0,                                     /* properties_provided */
  0,                                     /* properties_destroyed */
  0,                                     /* todo_flags_start */
 
 }
};
 
/* Loop unswitching pass.  */
 
static unsigned int
tree_ssa_loop_unswitch (void)
{
  if (number_of_loops () <= 1)
    return 0;
 
  return tree_ssa_unswitch_loops ();
}
 
static bool
gate_tree_ssa_loop_unswitch (void)
{
  return flag_unswitch_loops != 0;
}
 
struct gimple_opt_pass pass_tree_unswitch =
{
 {
  GIMPLE_PASS,
  "unswitch",                           /* name */
  gate_tree_ssa_loop_unswitch,          /* gate */
  tree_ssa_loop_unswitch,               /* execute */
  NULL,                                 /* sub */
  NULL,                                 /* next */
  0,                                     /* static_pass_number */
  TV_TREE_LOOP_UNSWITCH,                /* tv_id */
  PROP_cfg,                             /* properties_required */
  0,                                     /* properties_provided */
  0,                                     /* properties_destroyed */
  0,                                     /* todo_flags_start */
  TODO_ggc_collect                      /* todo_flags_finish */
 }
};
 
/* Predictive commoning.  */
 
static unsigned
run_tree_predictive_commoning (void)
{
  if (!current_loops)
    return 0;
 
  return tree_predictive_commoning ();
}
 
static bool
gate_tree_predictive_commoning (void)
{
  return flag_predictive_commoning != 0;
}
 
struct gimple_opt_pass pass_predcom =
{
 {
  GIMPLE_PASS,
  "pcom",                               /* name */
  gate_tree_predictive_commoning,       /* gate */
  run_tree_predictive_commoning,        /* execute */
  NULL,                                 /* sub */
  NULL,                                 /* next */
  0,                                     /* static_pass_number */
  TV_PREDCOM,                           /* tv_id */
  PROP_cfg,                             /* properties_required */
  0,                                     /* properties_provided */
  0,                                     /* properties_destroyed */
  0,                                     /* todo_flags_start */
  TODO_update_ssa_only_virtuals         /* todo_flags_finish */
 }
};
 
/* Loop autovectorization.  */
 
static unsigned int
tree_vectorize (void)
{
  if (number_of_loops () <= 1)
    return 0;
 
  return vectorize_loops ();
}
 
static bool
gate_tree_vectorize (void)
{
  return flag_tree_vectorize;
}
 
struct gimple_opt_pass pass_vectorize =
{
 {
  GIMPLE_PASS,
  "vect",                               /* name */
  gate_tree_vectorize,                  /* gate */
  tree_vectorize,                       /* execute */
  NULL,                                 /* sub */
  NULL,                                 /* next */
  0,                                    /* static_pass_number */
  TV_TREE_VECTORIZATION,                /* tv_id */
  PROP_cfg | PROP_ssa,                  /* properties_required */
  0,                                    /* properties_provided */
  0,                                    /* properties_destroyed */
  0,                                     /* todo_flags_start */
  TODO_update_ssa
    | TODO_ggc_collect                  /* todo_flags_finish */
 }
};
 
/* GRAPHITE optimizations.  */
 
static unsigned int
graphite_transforms (void)
{
  if (!current_loops)
    return 0;
 
  graphite_transform_loops ();
 
  return 0;
}
 
static bool
gate_graphite_transforms (void)
{
  /* Enable -fgraphite pass if any one of the graphite optimization flags
     is turned on.  */
  if (flag_loop_block
      || flag_loop_interchange
      || flag_loop_strip_mine
      || flag_graphite_identity
      || flag_loop_parallelize_all
      || flag_loop_flatten)
    flag_graphite = 1;
 
  return flag_graphite != 0;
}
 
struct gimple_opt_pass pass_graphite =
{
 {
  GIMPLE_PASS,
  "graphite0",                          /* name */
  gate_graphite_transforms,             /* gate */
  NULL,                                 /* execute */
  NULL,                                 /* sub */
  NULL,                                 /* next */
  0,                                     /* static_pass_number */
  TV_GRAPHITE,                          /* tv_id */
  PROP_cfg | PROP_ssa,                  /* properties_required */
  0,                                     /* properties_provided */
  0,                                     /* properties_destroyed */
  0,                                     /* todo_flags_start */
 
 }
};
 
struct gimple_opt_pass pass_graphite_transforms =
{
 {
  GIMPLE_PASS,
  "graphite",                           /* name */
  gate_graphite_transforms,             /* gate */
  graphite_transforms,                  /* execute */
  NULL,                                 /* sub */
  NULL,                                 /* next */
  0,                                     /* static_pass_number */
  TV_GRAPHITE_TRANSFORMS,               /* tv_id */
  PROP_cfg | PROP_ssa,                  /* properties_required */
  0,                                     /* properties_provided */
  0,                                     /* properties_destroyed */
  0,                                     /* todo_flags_start */
 
 }
};
 
/* Check the correctness of the data dependence analyzers.  */
 
static unsigned int
check_data_deps (void)
{
  if (number_of_loops () <= 1)
    return 0;
 
  tree_check_data_deps ();
  return 0;
}
 
static bool
gate_check_data_deps (void)
{
  return flag_check_data_deps != 0;
}
 
struct gimple_opt_pass pass_check_data_deps =
{
 {
  GIMPLE_PASS,
  "ckdd",                               /* name */
  gate_check_data_deps,                 /* gate */
  check_data_deps,                      /* execute */
  NULL,                                 /* sub */
  NULL,                                 /* next */
  0,                                     /* static_pass_number */
  TV_CHECK_DATA_DEPS,                   /* tv_id */
  PROP_cfg | PROP_ssa,                  /* properties_required */
  0,                                     /* properties_provided */
  0,                                     /* properties_destroyed */
  0,                                     /* todo_flags_start */
 
 }
};
 
/* Canonical induction variable creation pass.  */
 
static unsigned int
tree_ssa_loop_ivcanon (void)
{
  if (number_of_loops () <= 1)
    return 0;
 
  return canonicalize_induction_variables ();
}
 
static bool
gate_tree_ssa_loop_ivcanon (void)
{
  return flag_tree_loop_ivcanon != 0;
}
 
struct gimple_opt_pass pass_iv_canon =
{
 {
  GIMPLE_PASS,
  "ivcanon",                            /* name */
  gate_tree_ssa_loop_ivcanon,           /* gate */
  tree_ssa_loop_ivcanon,                /* execute */
  NULL,                                 /* sub */
  NULL,                                 /* next */
  0,                                     /* static_pass_number */
  TV_TREE_LOOP_IVCANON,                 /* tv_id */
  PROP_cfg | PROP_ssa,                  /* properties_required */
  0,                                     /* properties_provided */
  0,                                     /* properties_destroyed */
  0,                                     /* todo_flags_start */
 
 }
};
 
/* Propagation of constants using scev.  */
 
static bool
gate_scev_const_prop (void)
{
  return flag_tree_scev_cprop;
}
 
struct gimple_opt_pass pass_scev_cprop =
{
 {
  GIMPLE_PASS,
  "sccp",                               /* name */
  gate_scev_const_prop,                 /* gate */
  scev_const_prop,                      /* execute */
  NULL,                                 /* sub */
  NULL,                                 /* next */
  0,                                     /* static_pass_number */
  TV_SCEV_CONST,                        /* tv_id */
  PROP_cfg | PROP_ssa,                  /* properties_required */
  0,                                     /* properties_provided */
  0,                                     /* properties_destroyed */
  0,                                     /* todo_flags_start */
  TODO_cleanup_cfg
    | TODO_update_ssa_only_virtuals
                                        /* todo_flags_finish */
 }
};
 
/* Record bounds on numbers of iterations of loops.  */
 
static unsigned int
tree_ssa_loop_bounds (void)
{
  if (number_of_loops () <= 1)
    return 0;
 
  estimate_numbers_of_iterations (true);
  scev_reset ();
  return 0;
}
 
struct gimple_opt_pass pass_record_bounds =
{
 {
  GIMPLE_PASS,
  "*record_bounds",                     /* name */
  NULL,                                 /* gate */
  tree_ssa_loop_bounds,                 /* execute */
  NULL,                                 /* sub */
  NULL,                                 /* next */
  0,                                     /* static_pass_number */
  TV_TREE_LOOP_BOUNDS,                  /* tv_id */
  PROP_cfg | PROP_ssa,                  /* properties_required */
  0,                                     /* properties_provided */
  0,                                     /* properties_destroyed */
  0,                                     /* todo_flags_start */
 
 }
};
 
/* Complete unrolling of loops.  */
 
static unsigned int
tree_complete_unroll (void)
{
  if (number_of_loops () <= 1)
    return 0;
 
  return tree_unroll_loops_completely (flag_unroll_loops
                                       || flag_peel_loops
                                       || optimize >= 3, true);
}
 
static bool
gate_tree_complete_unroll (void)
{
  return true;
}
 
struct gimple_opt_pass pass_complete_unroll =
{
 {
  GIMPLE_PASS,
  "cunroll",                            /* name */
  gate_tree_complete_unroll,            /* gate */
  tree_complete_unroll,                 /* execute */
  NULL,                                 /* sub */
  NULL,                                 /* next */
  0,                                     /* static_pass_number */
  TV_COMPLETE_UNROLL,                   /* tv_id */
  PROP_cfg | PROP_ssa,                  /* properties_required */
  0,                                     /* properties_provided */
  0,                                     /* properties_destroyed */
  0,                                     /* todo_flags_start */
  TODO_ggc_collect                      /* todo_flags_finish */
 }
};
 
/* Complete unrolling of inner loops.  */
 
static unsigned int
tree_complete_unroll_inner (void)
{
  unsigned ret = 0;
 
  loop_optimizer_init (LOOPS_NORMAL
                       | LOOPS_HAVE_RECORDED_EXITS);
  if (number_of_loops () > 1)
    {
      scev_initialize ();
      ret = tree_unroll_loops_completely (optimize >= 3, false);
      free_numbers_of_iterations_estimates ();
      scev_finalize ();
    }
  loop_optimizer_finalize ();
 
  return ret;
}
 
static bool
gate_tree_complete_unroll_inner (void)
{
  return optimize >= 2;
}
 
struct gimple_opt_pass pass_complete_unrolli =
{
 {
  GIMPLE_PASS,
  "cunrolli",                           /* name */
  gate_tree_complete_unroll_inner,      /* gate */
  tree_complete_unroll_inner,           /* execute */
  NULL,                                 /* sub */
  NULL,                                 /* next */
  0,                                     /* static_pass_number */
  TV_COMPLETE_UNROLL,                   /* tv_id */
  PROP_cfg | PROP_ssa,                  /* properties_required */
  0,                                     /* properties_provided */
  0,                                     /* properties_destroyed */
  0,                                     /* todo_flags_start */
  TODO_verify_flow
    | TODO_ggc_collect                  /* todo_flags_finish */
 }
};
 
/* Parallelization.  */
 
static bool
gate_tree_parallelize_loops (void)
{
  return flag_tree_parallelize_loops > 1;
}
 
static unsigned
tree_parallelize_loops (void)
{
  if (number_of_loops () <= 1)
    return 0;
 
  if (parallelize_loops ())
    return TODO_cleanup_cfg | TODO_rebuild_alias;
  return 0;
}
 
struct gimple_opt_pass pass_parallelize_loops =
{
 {
  GIMPLE_PASS,
  "parloops",                           /* name */
  gate_tree_parallelize_loops,          /* gate */
  tree_parallelize_loops,               /* execute */
  NULL,                                 /* sub */
  NULL,                                 /* next */
  0,                                     /* static_pass_number */
  TV_TREE_PARALLELIZE_LOOPS,            /* tv_id */
  PROP_cfg | PROP_ssa,                  /* properties_required */
  0,                                     /* properties_provided */
  0,                                     /* properties_destroyed */
  0,                                     /* todo_flags_start */
 
 }
};
 
/* Prefetching.  */
 
static unsigned int
tree_ssa_loop_prefetch (void)
{
  if (number_of_loops () <= 1)
    return 0;
 
  return tree_ssa_prefetch_arrays ();
}
 
static bool
gate_tree_ssa_loop_prefetch (void)
{
  return flag_prefetch_loop_arrays > 0;
}
 
struct gimple_opt_pass pass_loop_prefetch =
{
 {
  GIMPLE_PASS,
  "aprefetch",                          /* name */
  gate_tree_ssa_loop_prefetch,          /* gate */
  tree_ssa_loop_prefetch,               /* execute */
  NULL,                                 /* sub */
  NULL,                                 /* next */
  0,                                     /* static_pass_number */
  TV_TREE_PREFETCH,                     /* tv_id */
  PROP_cfg | PROP_ssa,                  /* properties_required */
  0,                                     /* properties_provided */
  0,                                     /* properties_destroyed */
  0,                                     /* todo_flags_start */
 
 }
};
 
/* Induction variable optimizations.  */
 
static unsigned int
tree_ssa_loop_ivopts (void)
{
  if (number_of_loops () <= 1)
    return 0;
 
  tree_ssa_iv_optimize ();
  return 0;
}
 
static bool
gate_tree_ssa_loop_ivopts (void)
{
  return flag_ivopts != 0;
}
 
struct gimple_opt_pass pass_iv_optimize =
{
 {
  GIMPLE_PASS,
  "ivopts",                             /* name */
  gate_tree_ssa_loop_ivopts,            /* gate */
  tree_ssa_loop_ivopts,                 /* execute */
  NULL,                                 /* sub */
  NULL,                                 /* next */
  0,                                     /* static_pass_number */
  TV_TREE_LOOP_IVOPTS,                  /* tv_id */
  PROP_cfg | PROP_ssa,                  /* properties_required */
  0,                                     /* properties_provided */
  0,                                     /* properties_destroyed */
  0,                                     /* todo_flags_start */
  TODO_update_ssa | TODO_ggc_collect    /* todo_flags_finish */
 }
};
 
/* Loop optimizer finalization.  */
 
static unsigned int
tree_ssa_loop_done (void)
{
  free_numbers_of_iterations_estimates ();
  scev_finalize ();
  loop_optimizer_finalize ();
  return 0;
}
 
struct gimple_opt_pass pass_tree_loop_done =
{
 {
  GIMPLE_PASS,
  "loopdone",                           /* name */
  NULL,                                 /* gate */
  tree_ssa_loop_done,                   /* execute */
  NULL,                                 /* sub */
  NULL,                                 /* next */
  0,                                     /* static_pass_number */
  TV_TREE_LOOP_FINI,                    /* tv_id */
  PROP_cfg,                             /* properties_required */
  0,                                     /* properties_provided */
  0,                                     /* properties_destroyed */
  0,                                     /* todo_flags_start */
  TODO_cleanup_cfg
    | TODO_verify_flow                  /* todo_flags_finish */
 }
};

Browse

Tools

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [tree-ssa-loop.c] - Blame information for rev 748

Line No.	Rev	Author	Line
1	684	jeremybenn	`/* Loop optimizations over tree-ssa.`
2			`Copyright (C) 2003, 2005, 2006, 2007, 2008, 2009, 2010`
3			`Free Software Foundation, Inc.`
4
5			`This file is part of GCC.`
6
7			`GCC is free software; you can redistribute it and/or modify it`
8			`under the terms of the GNU General Public License as published by the`
9			`Free Software Foundation; either version 3, or (at your option) any`
10			`later version.`
11
12			`GCC is distributed in the hope that it will be useful, but WITHOUT`
13			`ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or`
14			`FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License`
15			`for more details.`
16
17			`You should have received a copy of the GNU General Public License`
18			`along with GCC; see the file COPYING3. If not see`
19			`<http://www.gnu.org/licenses/>. */`
20
21			`#include "config.h"`
22			`#include "system.h"`
23			`#include "coretypes.h"`
24			`#include "tm.h"`
25			`#include "tree.h"`
26			`#include "tm_p.h"`
27			`#include "basic-block.h"`
28			`#include "output.h"`
29			`#include "tree-flow.h"`
30			`#include "tree-dump.h"`
31			`#include "tree-pass.h"`
32			`#include "timevar.h"`
33			`#include "cfgloop.h"`
34			`#include "flags.h"`
35			`#include "tree-inline.h"`
36			`#include "tree-scalar-evolution.h"`
37			`#include "diagnostic-core.h"`
38			`#include "tree-vectorizer.h"`
39
40			`/* The loop superpass. */`
41
42			`static bool`
43			`gate_tree_loop (void)`
44			`{`
45			`return flag_tree_loop_optimize != 0;`
46			`}`
47
48			`struct gimple_opt_pass pass_tree_loop =`
49			`{`
50			`{`
51			`GIMPLE_PASS,`
52			`"loop", /* name */`
53			`gate_tree_loop, /* gate */`
54			`NULL, /* execute */`
55			`NULL, /* sub */`
56			`NULL, /* next */`
57			`0, /* static_pass_number */`
58			`TV_TREE_LOOP, /* tv_id */`
59			`PROP_cfg, /* properties_required */`
60			`0, /* properties_provided */`
61			`0, /* properties_destroyed */`
62			`TODO_ggc_collect, /* todo_flags_start */`
63			`TODO_verify_ssa \| TODO_ggc_collect /* todo_flags_finish */`
64			`}`
65			`};`
66
67			`/* Loop optimizer initialization. */`
68
69			`static unsigned int`
70			`tree_ssa_loop_init (void)`
71			`{`
72			`loop_optimizer_init (LOOPS_NORMAL`
73			`\| LOOPS_HAVE_RECORDED_EXITS);`
74			`rewrite_into_loop_closed_ssa (NULL, TODO_update_ssa);`
75
76			`if (number_of_loops () <= 1)`
77			`return 0;`
78
79			`scev_initialize ();`
80			`return 0;`
81			`}`
82
83			`struct gimple_opt_pass pass_tree_loop_init =`
84			`{`
85			`{`
86			`GIMPLE_PASS,`
87			`"loopinit", /* name */`
88			`NULL, /* gate */`
89			`tree_ssa_loop_init, /* execute */`
90			`NULL, /* sub */`
91			`NULL, /* next */`
92			`0, /* static_pass_number */`
93			`TV_TREE_LOOP_INIT, /* tv_id */`
94			`PROP_cfg, /* properties_required */`
95			`0, /* properties_provided */`
96			`0, /* properties_destroyed */`
97			`0, /* todo_flags_start */`
98
99			`}`
100			`};`
101
102			`/* Loop invariant motion pass. */`
103
104			`static unsigned int`
105			`tree_ssa_loop_im (void)`
106			`{`
107			`if (number_of_loops () <= 1)`
108			`return 0;`
109
110			`return tree_ssa_lim ();`
111			`}`
112
113			`static bool`
114			`gate_tree_ssa_loop_im (void)`
115			`{`
116			`return flag_tree_loop_im != 0;`
117			`}`
118
119			`struct gimple_opt_pass pass_lim =`
120			`{`
121			`{`
122			`GIMPLE_PASS,`
123			`"lim", /* name */`
124			`gate_tree_ssa_loop_im, /* gate */`
125			`tree_ssa_loop_im, /* execute */`
126			`NULL, /* sub */`
127			`NULL, /* next */`
128			`0, /* static_pass_number */`
129			`TV_LIM, /* tv_id */`
130			`PROP_cfg, /* properties_required */`
131			`0, /* properties_provided */`
132			`0, /* properties_destroyed */`
133			`0, /* todo_flags_start */`
134
135			`}`
136			`};`
137
138			`/* Loop unswitching pass. */`
139
140			`static unsigned int`
141			`tree_ssa_loop_unswitch (void)`
142			`{`
143			`if (number_of_loops () <= 1)`
144			`return 0;`
145
146			`return tree_ssa_unswitch_loops ();`
147			`}`
148
149			`static bool`
150			`gate_tree_ssa_loop_unswitch (void)`
151			`{`
152			`return flag_unswitch_loops != 0;`
153			`}`
154
155			`struct gimple_opt_pass pass_tree_unswitch =`
156			`{`
157			`{`
158			`GIMPLE_PASS,`
159			`"unswitch", /* name */`
160			`gate_tree_ssa_loop_unswitch, /* gate */`
161			`tree_ssa_loop_unswitch, /* execute */`
162			`NULL, /* sub */`
163			`NULL, /* next */`
164			`0, /* static_pass_number */`
165			`TV_TREE_LOOP_UNSWITCH, /* tv_id */`
166			`PROP_cfg, /* properties_required */`
167			`0, /* properties_provided */`
168			`0, /* properties_destroyed */`
169			`0, /* todo_flags_start */`
170			`TODO_ggc_collect /* todo_flags_finish */`
171			`}`
172			`};`
173
174			`/* Predictive commoning. */`
175
176			`static unsigned`
177			`run_tree_predictive_commoning (void)`
178			`{`
179			`if (!current_loops)`
180			`return 0;`
181
182			`return tree_predictive_commoning ();`
183			`}`
184
185			`static bool`
186			`gate_tree_predictive_commoning (void)`
187			`{`
188			`return flag_predictive_commoning != 0;`
189			`}`
190
191			`struct gimple_opt_pass pass_predcom =`
192			`{`
193			`{`
194			`GIMPLE_PASS,`
195			`"pcom", /* name */`
196			`gate_tree_predictive_commoning, /* gate */`
197			`run_tree_predictive_commoning, /* execute */`
198			`NULL, /* sub */`
199			`NULL, /* next */`
200			`0, /* static_pass_number */`
201			`TV_PREDCOM, /* tv_id */`
202			`PROP_cfg, /* properties_required */`
203			`0, /* properties_provided */`
204			`0, /* properties_destroyed */`
205			`0, /* todo_flags_start */`
206			`TODO_update_ssa_only_virtuals /* todo_flags_finish */`
207			`}`
208			`};`
209
210			`/* Loop autovectorization. */`
211
212			`static unsigned int`
213			`tree_vectorize (void)`
214			`{`
215			`if (number_of_loops () <= 1)`
216			`return 0;`
217
218			`return vectorize_loops ();`
219			`}`
220
221			`static bool`
222			`gate_tree_vectorize (void)`
223			`{`
224			`return flag_tree_vectorize;`
225			`}`
226
227			`struct gimple_opt_pass pass_vectorize =`
228			`{`
229			`{`
230			`GIMPLE_PASS,`
231			`"vect", /* name */`
232			`gate_tree_vectorize, /* gate */`
233			`tree_vectorize, /* execute */`
234			`NULL, /* sub */`
235			`NULL, /* next */`
236			`0, /* static_pass_number */`
237			`TV_TREE_VECTORIZATION, /* tv_id */`
238			`PROP_cfg \| PROP_ssa, /* properties_required */`
239			`0, /* properties_provided */`
240			`0, /* properties_destroyed */`
241			`0, /* todo_flags_start */`
242			`TODO_update_ssa`
243			`\| TODO_ggc_collect /* todo_flags_finish */`
244			`}`
245			`};`
246
247			`/* GRAPHITE optimizations. */`
248
249			`static unsigned int`
250			`graphite_transforms (void)`
251			`{`
252			`if (!current_loops)`
253			`return 0;`
254
255			`graphite_transform_loops ();`
256
257			`return 0;`
258			`}`
259
260			`static bool`
261			`gate_graphite_transforms (void)`
262			`{`
263			`/* Enable -fgraphite pass if any one of the graphite optimization flags`
264			`is turned on. */`
265			`if (flag_loop_block`
266			`\|\| flag_loop_interchange`
267			`\|\| flag_loop_strip_mine`
268			`\|\| flag_graphite_identity`
269			`\|\| flag_loop_parallelize_all`
270			`\|\| flag_loop_flatten)`
271			`flag_graphite = 1;`
272
273			`return flag_graphite != 0;`
274			`}`
275
276			`struct gimple_opt_pass pass_graphite =`
277			`{`
278			`{`
279			`GIMPLE_PASS,`
280			`"graphite0", /* name */`
281			`gate_graphite_transforms, /* gate */`
282			`NULL, /* execute */`
283			`NULL, /* sub */`
284			`NULL, /* next */`
285			`0, /* static_pass_number */`
286			`TV_GRAPHITE, /* tv_id */`
287			`PROP_cfg \| PROP_ssa, /* properties_required */`
288			`0, /* properties_provided */`
289			`0, /* properties_destroyed */`
290			`0, /* todo_flags_start */`
291
292			`}`
293			`};`
294
295			`struct gimple_opt_pass pass_graphite_transforms =`
296			`{`
297			`{`
298			`GIMPLE_PASS,`
299			`"graphite", /* name */`
300			`gate_graphite_transforms, /* gate */`
301			`graphite_transforms, /* execute */`
302			`NULL, /* sub */`
303			`NULL, /* next */`
304			`0, /* static_pass_number */`
305			`TV_GRAPHITE_TRANSFORMS, /* tv_id */`
306			`PROP_cfg \| PROP_ssa, /* properties_required */`
307			`0, /* properties_provided */`
308			`0, /* properties_destroyed */`
309			`0, /* todo_flags_start */`
310
311			`}`
312			`};`
313
314			`/* Check the correctness of the data dependence analyzers. */`
315
316			`static unsigned int`
317			`check_data_deps (void)`
318			`{`
319			`if (number_of_loops () <= 1)`
320			`return 0;`
321
322			`tree_check_data_deps ();`
323			`return 0;`
324			`}`
325
326			`static bool`
327			`gate_check_data_deps (void)`
328			`{`
329			`return flag_check_data_deps != 0;`
330			`}`
331
332			`struct gimple_opt_pass pass_check_data_deps =`
333			`{`
334			`{`
335			`GIMPLE_PASS,`
336			`"ckdd", /* name */`
337			`gate_check_data_deps, /* gate */`
338			`check_data_deps, /* execute */`
339			`NULL, /* sub */`
340			`NULL, /* next */`
341			`0, /* static_pass_number */`
342			`TV_CHECK_DATA_DEPS, /* tv_id */`
343			`PROP_cfg \| PROP_ssa, /* properties_required */`
344			`0, /* properties_provided */`
345			`0, /* properties_destroyed */`
346			`0, /* todo_flags_start */`
347
348			`}`
349			`};`
350
351			`/* Canonical induction variable creation pass. */`
352
353			`static unsigned int`
354			`tree_ssa_loop_ivcanon (void)`
355			`{`
356			`if (number_of_loops () <= 1)`
357			`return 0;`
358
359			`return canonicalize_induction_variables ();`
360			`}`
361
362			`static bool`
363			`gate_tree_ssa_loop_ivcanon (void)`
364			`{`
365			`return flag_tree_loop_ivcanon != 0;`
366			`}`
367
368			`struct gimple_opt_pass pass_iv_canon =`
369			`{`
370			`{`
371			`GIMPLE_PASS,`
372			`"ivcanon", /* name */`
373			`gate_tree_ssa_loop_ivcanon, /* gate */`
374			`tree_ssa_loop_ivcanon, /* execute */`
375			`NULL, /* sub */`
376			`NULL, /* next */`
377			`0, /* static_pass_number */`
378			`TV_TREE_LOOP_IVCANON, /* tv_id */`
379			`PROP_cfg \| PROP_ssa, /* properties_required */`
380			`0, /* properties_provided */`
381			`0, /* properties_destroyed */`
382			`0, /* todo_flags_start */`
383
384			`}`
385			`};`
386
387			`/* Propagation of constants using scev. */`
388
389			`static bool`
390			`gate_scev_const_prop (void)`
391			`{`
392			`return flag_tree_scev_cprop;`
393			`}`
394
395			`struct gimple_opt_pass pass_scev_cprop =`
396			`{`
397			`{`
398			`GIMPLE_PASS,`
399			`"sccp", /* name */`
400			`gate_scev_const_prop, /* gate */`
401			`scev_const_prop, /* execute */`
402			`NULL, /* sub */`
403			`NULL, /* next */`
404			`0, /* static_pass_number */`
405			`TV_SCEV_CONST, /* tv_id */`
406			`PROP_cfg \| PROP_ssa, /* properties_required */`
407			`0, /* properties_provided */`
408			`0, /* properties_destroyed */`
409			`0, /* todo_flags_start */`
410			`TODO_cleanup_cfg`
411			`\| TODO_update_ssa_only_virtuals`
412			`/* todo_flags_finish */`
413			`}`
414			`};`
415
416			`/* Record bounds on numbers of iterations of loops. */`
417
418			`static unsigned int`
419			`tree_ssa_loop_bounds (void)`
420			`{`
421			`if (number_of_loops () <= 1)`
422			`return 0;`
423
424			`estimate_numbers_of_iterations (true);`
425			`scev_reset ();`
426			`return 0;`
427			`}`
428
429			`struct gimple_opt_pass pass_record_bounds =`
430			`{`
431			`{`
432			`GIMPLE_PASS,`
433			`"record_bounds", / name */`
434			`NULL, /* gate */`
435			`tree_ssa_loop_bounds, /* execute */`
436			`NULL, /* sub */`
437			`NULL, /* next */`
438			`0, /* static_pass_number */`
439			`TV_TREE_LOOP_BOUNDS, /* tv_id */`
440			`PROP_cfg \| PROP_ssa, /* properties_required */`
441			`0, /* properties_provided */`
442			`0, /* properties_destroyed */`
443			`0, /* todo_flags_start */`
444
445			`}`
446			`};`
447
448			`/* Complete unrolling of loops. */`
449
450			`static unsigned int`
451			`tree_complete_unroll (void)`
452			`{`
453			`if (number_of_loops () <= 1)`
454			`return 0;`
455
456			`return tree_unroll_loops_completely (flag_unroll_loops`
457			`\|\| flag_peel_loops`
458			`\|\| optimize >= 3, true);`
459			`}`
460
461			`static bool`
462			`gate_tree_complete_unroll (void)`
463			`{`
464			`return true;`
465			`}`
466
467			`struct gimple_opt_pass pass_complete_unroll =`
468			`{`
469			`{`
470			`GIMPLE_PASS,`
471			`"cunroll", /* name */`
472			`gate_tree_complete_unroll, /* gate */`
473			`tree_complete_unroll, /* execute */`
474			`NULL, /* sub */`
475			`NULL, /* next */`
476			`0, /* static_pass_number */`
477			`TV_COMPLETE_UNROLL, /* tv_id */`
478			`PROP_cfg \| PROP_ssa, /* properties_required */`
479			`0, /* properties_provided */`
480			`0, /* properties_destroyed */`
481			`0, /* todo_flags_start */`
482			`TODO_ggc_collect /* todo_flags_finish */`
483			`}`
484			`};`
485
486			`/* Complete unrolling of inner loops. */`
487
488			`static unsigned int`
489			`tree_complete_unroll_inner (void)`
490			`{`
491			`unsigned ret = 0;`
492
493			`loop_optimizer_init (LOOPS_NORMAL`
494			`\| LOOPS_HAVE_RECORDED_EXITS);`
495			`if (number_of_loops () > 1)`
496			`{`
497			`scev_initialize ();`
498			`ret = tree_unroll_loops_completely (optimize >= 3, false);`
499			`free_numbers_of_iterations_estimates ();`
500			`scev_finalize ();`
501			`}`
502			`loop_optimizer_finalize ();`
503
504			`return ret;`
505			`}`
506
507			`static bool`
508			`gate_tree_complete_unroll_inner (void)`
509			`{`
510			`return optimize >= 2;`
511			`}`
512
513			`struct gimple_opt_pass pass_complete_unrolli =`
514			`{`
515			`{`
516			`GIMPLE_PASS,`
517			`"cunrolli", /* name */`
518			`gate_tree_complete_unroll_inner, /* gate */`
519			`tree_complete_unroll_inner, /* execute */`
520			`NULL, /* sub */`
521			`NULL, /* next */`
522			`0, /* static_pass_number */`
523			`TV_COMPLETE_UNROLL, /* tv_id */`
524			`PROP_cfg \| PROP_ssa, /* properties_required */`
525			`0, /* properties_provided */`
526			`0, /* properties_destroyed */`
527			`0, /* todo_flags_start */`
528			`TODO_verify_flow`
529			`\| TODO_ggc_collect /* todo_flags_finish */`
530			`}`
531			`};`
532
533			`/* Parallelization. */`
534
535			`static bool`
536			`gate_tree_parallelize_loops (void)`
537			`{`
538			`return flag_tree_parallelize_loops > 1;`
539			`}`
540
541			`static unsigned`
542			`tree_parallelize_loops (void)`
543			`{`
544			`if (number_of_loops () <= 1)`
545			`return 0;`
546
547			`if (parallelize_loops ())`
548			`return TODO_cleanup_cfg \| TODO_rebuild_alias;`
549			`return 0;`
550			`}`
551
552			`struct gimple_opt_pass pass_parallelize_loops =`
553			`{`
554			`{`
555			`GIMPLE_PASS,`
556			`"parloops", /* name */`
557			`gate_tree_parallelize_loops, /* gate */`
558			`tree_parallelize_loops, /* execute */`
559			`NULL, /* sub */`
560			`NULL, /* next */`
561			`0, /* static_pass_number */`
562			`TV_TREE_PARALLELIZE_LOOPS, /* tv_id */`
563			`PROP_cfg \| PROP_ssa, /* properties_required */`
564			`0, /* properties_provided */`
565			`0, /* properties_destroyed */`
566			`0, /* todo_flags_start */`
567
568			`}`
569			`};`
570
571			`/* Prefetching. */`
572
573			`static unsigned int`
574			`tree_ssa_loop_prefetch (void)`
575			`{`
576			`if (number_of_loops () <= 1)`
577			`return 0;`
578
579			`return tree_ssa_prefetch_arrays ();`
580			`}`
581
582			`static bool`
583			`gate_tree_ssa_loop_prefetch (void)`
584			`{`
585			`return flag_prefetch_loop_arrays > 0;`
586			`}`
587
588			`struct gimple_opt_pass pass_loop_prefetch =`
589			`{`
590			`{`
591			`GIMPLE_PASS,`
592			`"aprefetch", /* name */`
593			`gate_tree_ssa_loop_prefetch, /* gate */`
594			`tree_ssa_loop_prefetch, /* execute */`
595			`NULL, /* sub */`
596			`NULL, /* next */`
597			`0, /* static_pass_number */`
598			`TV_TREE_PREFETCH, /* tv_id */`
599			`PROP_cfg \| PROP_ssa, /* properties_required */`
600			`0, /* properties_provided */`
601			`0, /* properties_destroyed */`
602			`0, /* todo_flags_start */`
603
604			`}`
605			`};`
606
607			`/* Induction variable optimizations. */`
608
609			`static unsigned int`
610			`tree_ssa_loop_ivopts (void)`
611			`{`
612			`if (number_of_loops () <= 1)`
613			`return 0;`
614
615			`tree_ssa_iv_optimize ();`
616			`return 0;`
617			`}`
618
619			`static bool`
620			`gate_tree_ssa_loop_ivopts (void)`
621			`{`
622			`return flag_ivopts != 0;`
623			`}`
624
625			`struct gimple_opt_pass pass_iv_optimize =`
626			`{`
627			`{`
628			`GIMPLE_PASS,`
629			`"ivopts", /* name */`
630			`gate_tree_ssa_loop_ivopts, /* gate */`
631			`tree_ssa_loop_ivopts, /* execute */`
632			`NULL, /* sub */`
633			`NULL, /* next */`
634			`0, /* static_pass_number */`
635			`TV_TREE_LOOP_IVOPTS, /* tv_id */`
636			`PROP_cfg \| PROP_ssa, /* properties_required */`
637			`0, /* properties_provided */`
638			`0, /* properties_destroyed */`
639			`0, /* todo_flags_start */`
640			`TODO_update_ssa \| TODO_ggc_collect /* todo_flags_finish */`
641			`}`
642			`};`
643
644			`/* Loop optimizer finalization. */`
645
646			`static unsigned int`
647			`tree_ssa_loop_done (void)`
648			`{`
649			`free_numbers_of_iterations_estimates ();`
650			`scev_finalize ();`
651			`loop_optimizer_finalize ();`
652			`return 0;`
653			`}`
654
655			`struct gimple_opt_pass pass_tree_loop_done =`
656			`{`
657			`{`
658			`GIMPLE_PASS,`
659			`"loopdone", /* name */`
660			`NULL, /* gate */`
661			`tree_ssa_loop_done, /* execute */`
662			`NULL, /* sub */`
663			`NULL, /* next */`
664			`0, /* static_pass_number */`
665			`TV_TREE_LOOP_FINI, /* tv_id */`
666			`PROP_cfg, /* properties_required */`
667			`0, /* properties_provided */`
668			`0, /* properties_destroyed */`
669			`0, /* todo_flags_start */`
670			`TODO_cleanup_cfg`
671			`\| TODO_verify_flow /* todo_flags_finish */`
672			`}`
673			`};`