1 /* Loop optimizations over tree-ssa.
2 Copyright (C) 2003, 2005 Free Software Foundation, Inc.
4 This file is part of GCC.
6 GCC is free software; you can redistribute it and/or modify it
7 under the terms of the GNU General Public License as published by the
8 Free Software Foundation; either version 2, or (at your option) any
11 GCC is distributed in the hope that it will be useful, but WITHOUT
12 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
13 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
16 You should have received a copy of the GNU General Public License
17 along with GCC; see the file COPYING. If not, write to the Free
18 Software Foundation, 51 Franklin Street, Fifth Floor, Boston, MA
23 #include "coretypes.h"
28 #include "hard-reg-set.h"
29 #include "basic-block.h"
31 #include "diagnostic.h"
32 #include "tree-flow.h"
33 #include "tree-dump.h"
34 #include "tree-pass.h"
38 #include "tree-inline.h"
39 #include "tree-scalar-evolution.h"
41 /* The loop tree currently optimized. */
43 struct loops *current_loops = NULL;
45 /* Initializes the loop structures. DUMP is the file to that the details
46 about the analysis should be dumped. */
49 tree_loop_optimizer_init (FILE *dump)
51 struct loops *loops = loop_optimizer_init (dump);
56 rewrite_into_loop_closed_ssa (NULL, TODO_update_ssa);
61 /* The loop superpass. */
66 return flag_tree_loop_optimize != 0;
69 struct tree_opt_pass pass_loop =
76 0, /* static_pass_number */
77 TV_TREE_LOOP, /* tv_id */
78 PROP_cfg, /* properties_required */
79 0, /* properties_provided */
80 0, /* properties_destroyed */
81 TODO_ggc_collect, /* todo_flags_start */
82 TODO_dump_func | TODO_verify_ssa | TODO_ggc_collect, /* todo_flags_finish */
86 /* Loop optimizer initialization. */
89 tree_ssa_loop_init (void)
91 current_loops = tree_loop_optimizer_init (dump_file);
95 /* Find the loops that are exited just through a single edge. */
96 mark_single_exit_loops (current_loops);
98 scev_initialize (current_loops);
101 struct tree_opt_pass pass_loop_init =
103 "loopinit", /* name */
105 tree_ssa_loop_init, /* execute */
108 0, /* static_pass_number */
109 TV_TREE_LOOP_INIT, /* tv_id */
110 PROP_cfg, /* properties_required */
111 0, /* properties_provided */
112 0, /* properties_destroyed */
113 0, /* todo_flags_start */
114 TODO_dump_func | TODO_verify_loops, /* todo_flags_finish */
118 /* Loop invariant motion pass. */
121 tree_ssa_loop_im (void)
126 tree_ssa_lim (current_loops);
130 gate_tree_ssa_loop_im (void)
132 return flag_tree_loop_im != 0;
135 struct tree_opt_pass pass_lim =
138 gate_tree_ssa_loop_im, /* gate */
139 tree_ssa_loop_im, /* execute */
142 0, /* static_pass_number */
144 PROP_cfg, /* properties_required */
145 0, /* properties_provided */
146 0, /* properties_destroyed */
147 0, /* todo_flags_start */
148 TODO_dump_func | TODO_verify_loops, /* todo_flags_finish */
152 /* Loop unswitching pass. */
155 tree_ssa_loop_unswitch (void)
160 tree_ssa_unswitch_loops (current_loops);
164 gate_tree_ssa_loop_unswitch (void)
166 return flag_unswitch_loops != 0;
169 struct tree_opt_pass pass_unswitch =
171 "unswitch", /* name */
172 gate_tree_ssa_loop_unswitch, /* gate */
173 tree_ssa_loop_unswitch, /* execute */
176 0, /* static_pass_number */
177 TV_TREE_LOOP_UNSWITCH, /* tv_id */
178 PROP_cfg, /* properties_required */
179 0, /* properties_provided */
180 0, /* properties_destroyed */
181 0, /* todo_flags_start */
182 TODO_dump_func | TODO_verify_loops, /* todo_flags_finish */
186 /* Loop autovectorization. */
189 tree_vectorize (void)
194 vectorize_loops (current_loops);
198 gate_tree_vectorize (void)
200 return flag_tree_vectorize != 0;
203 struct tree_opt_pass pass_vectorize =
206 gate_tree_vectorize, /* gate */
207 tree_vectorize, /* execute */
210 0, /* static_pass_number */
211 TV_TREE_VECTORIZATION, /* tv_id */
212 PROP_cfg | PROP_ssa, /* properties_required */
213 0, /* properties_provided */
214 0, /* properties_destroyed */
215 0, /* todo_flags_start */
216 TODO_dump_func | TODO_update_ssa, /* todo_flags_finish */
221 /* Loop nest optimizations. */
224 tree_linear_transform (void)
229 linear_transform_loops (current_loops);
233 gate_tree_linear_transform (void)
235 return flag_tree_loop_linear != 0;
238 struct tree_opt_pass pass_linear_transform =
241 gate_tree_linear_transform, /* gate */
242 tree_linear_transform, /* execute */
245 0, /* static_pass_number */
246 TV_TREE_LINEAR_TRANSFORM, /* tv_id */
247 PROP_cfg | PROP_ssa, /* properties_required */
248 0, /* properties_provided */
249 0, /* properties_destroyed */
250 0, /* todo_flags_start */
251 TODO_dump_func | TODO_verify_loops, /* todo_flags_finish */
255 /* Canonical induction variable creation pass. */
258 tree_ssa_loop_ivcanon (void)
263 canonicalize_induction_variables (current_loops);
267 gate_tree_ssa_loop_ivcanon (void)
269 return flag_tree_loop_ivcanon != 0;
272 struct tree_opt_pass pass_iv_canon =
274 "ivcanon", /* name */
275 gate_tree_ssa_loop_ivcanon, /* gate */
276 tree_ssa_loop_ivcanon, /* execute */
279 0, /* static_pass_number */
280 TV_TREE_LOOP_IVCANON, /* tv_id */
281 PROP_cfg | PROP_ssa, /* properties_required */
282 0, /* properties_provided */
283 0, /* properties_destroyed */
284 0, /* todo_flags_start */
285 TODO_dump_func | TODO_verify_loops, /* todo_flags_finish */
289 /* Propagation of constants using scev. */
292 gate_scev_const_prop (void)
297 struct tree_opt_pass pass_scev_cprop =
300 gate_scev_const_prop, /* gate */
301 scev_const_prop, /* execute */
304 0, /* static_pass_number */
305 TV_SCEV_CONST, /* tv_id */
306 PROP_cfg | PROP_ssa, /* properties_required */
307 0, /* properties_provided */
308 0, /* properties_destroyed */
309 0, /* todo_flags_start */
310 TODO_dump_func, /* todo_flags_finish */
314 /* Record bounds on numbers of iterations of loops. */
317 tree_ssa_loop_bounds (void)
322 estimate_numbers_of_iterations (current_loops);
326 struct tree_opt_pass pass_record_bounds =
330 tree_ssa_loop_bounds, /* execute */
333 0, /* static_pass_number */
334 TV_TREE_LOOP_BOUNDS, /* tv_id */
335 PROP_cfg | PROP_ssa, /* properties_required */
336 0, /* properties_provided */
337 0, /* properties_destroyed */
338 0, /* todo_flags_start */
339 0, /* todo_flags_finish */
343 /* Complete unrolling of loops. */
346 tree_complete_unroll (void)
351 tree_unroll_loops_completely (current_loops,
358 gate_tree_complete_unroll (void)
363 struct tree_opt_pass pass_complete_unroll =
365 "cunroll", /* name */
366 gate_tree_complete_unroll, /* gate */
367 tree_complete_unroll, /* execute */
370 0, /* static_pass_number */
371 TV_COMPLETE_UNROLL, /* tv_id */
372 PROP_cfg | PROP_ssa, /* properties_required */
373 0, /* properties_provided */
374 0, /* properties_destroyed */
375 0, /* todo_flags_start */
376 TODO_dump_func | TODO_verify_loops, /* todo_flags_finish */
380 /* Induction variable optimizations. */
383 tree_ssa_loop_ivopts (void)
388 tree_ssa_iv_optimize (current_loops);
392 gate_tree_ssa_loop_ivopts (void)
394 return flag_ivopts != 0;
397 struct tree_opt_pass pass_iv_optimize =
400 gate_tree_ssa_loop_ivopts, /* gate */
401 tree_ssa_loop_ivopts, /* execute */
404 0, /* static_pass_number */
405 TV_TREE_LOOP_IVOPTS, /* tv_id */
406 PROP_cfg | PROP_ssa, /* properties_required */
407 0, /* properties_provided */
408 0, /* properties_destroyed */
409 0, /* todo_flags_start */
410 TODO_dump_func | TODO_verify_loops, /* todo_flags_finish */
414 /* Loop optimizer finalization. */
417 tree_ssa_loop_done (void)
422 free_numbers_of_iterations_estimates (current_loops);
424 loop_optimizer_finalize (current_loops,
425 (dump_flags & TDF_DETAILS ? dump_file : NULL));
426 current_loops = NULL;
429 struct tree_opt_pass pass_loop_done =
431 "loopdone", /* name */
433 tree_ssa_loop_done, /* execute */
436 0, /* static_pass_number */
437 TV_TREE_LOOP_FINI, /* tv_id */
438 PROP_cfg, /* properties_required */
439 0, /* properties_provided */
440 0, /* properties_destroyed */
441 0, /* todo_flags_start */
442 TODO_cleanup_cfg | TODO_dump_func, /* todo_flags_finish */