gcc/tree-ssa-ifcombine.c

   1 /* Combining of if-expressions on trees.
   2    Copyright (C) 2007, 2008 Free Software Foundation, Inc.
   3    Contributed by Richard Guenther <rguenther@suse.de>
   4
   5 This file is part of GCC.
   6
   7 GCC is free software; you can redistribute it and/or modify
   8 it under the terms of the GNU General Public License as published by
   9 the Free Software Foundation; either version 3, or (at your option)
  10 any later version.
  11
  12 GCC is distributed in the hope that it will be useful,
  13 but WITHOUT ANY WARRANTY; without even the implied warranty of
  14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15 GNU General Public License 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 "basic-block.h"
  27 #include "timevar.h"
  28 #include "diagnostic.h"
  29 #include "tree-flow.h"
  30 #include "tree-pass.h"
  31 #include "tree-dump.h"
  32
  33 /* This pass combines COND_EXPRs to simplify control flow.  It
  34    currently recognizes bit tests and comparisons in chains that
  35    represent logical and or logical or of two COND_EXPRs.
  36
  37    It does so by walking basic blocks in a approximate reverse
  38    post-dominator order and trying to match CFG patterns that
  39    represent logical and or logical or of two COND_EXPRs.
  40    Transformations are done if the COND_EXPR conditions match
  41    either
  42
  43      1. two single bit tests X & (1 << Yn) (for logical and)
  44
  45      2. two bit tests X & Yn (for logical or)
  46
  47      3. two comparisons X OPn Y (for logical or)
  48
  49    To simplify this pass, removing basic blocks and dead code
  50    is left to CFG cleanup and DCE.  */
  51
  52
  53 /* Recognize a if-then-else CFG pattern starting to match with the
  54    COND_BB basic-block containing the COND_EXPR.  The recognized
  55    then end else blocks are stored to *THEN_BB and *ELSE_BB.  If
  56    *THEN_BB and/or *ELSE_BB are already set, they are required to
  57    match the then and else basic-blocks to make the pattern match.
  58    Returns true if the pattern matched, false otherwise.  */
  59
  60 static bool
  61 recognize_if_then_else (basic_block cond_bb,
  62                         basic_block *then_bb, basic_block *else_bb)
  63 {
  64   edge t, e;
  65
  66   if (EDGE_COUNT (cond_bb->succs) != 2)
  67     return false;
  68
  69   /* Find the then/else edges.  */
  70   t = EDGE_SUCC (cond_bb, 0);
  71   e = EDGE_SUCC (cond_bb, 1);
  72   if (!(t->flags & EDGE_TRUE_VALUE))
  73     {
  74       edge tmp = t;
  75       t = e;
  76       e = tmp;
  77     }
  78   if (!(t->flags & EDGE_TRUE_VALUE)
  79       || !(e->flags & EDGE_FALSE_VALUE))
  80     return false;
  81
  82   /* Check if the edge destinations point to the required block.  */
  83   if (*then_bb
  84       && t->dest != *then_bb)
  85     return false;
  86   if (*else_bb
  87       && e->dest != *else_bb)
  88     return false;
  89
  90   if (!*then_bb)
  91     *then_bb = t->dest;
  92   if (!*else_bb)
  93     *else_bb = e->dest;
  94
  95   return true;
  96 }
  97
  98 /* Verify if the basic block BB does not have side-effects.  Return
  99    true in this case, else false.  */
 100
 101 static bool
 102 bb_no_side_effects_p (basic_block bb)
 103 {
 104   gimple_stmt_iterator gsi;
 105
 106   for (gsi = gsi_start_bb (bb); !gsi_end_p (gsi); gsi_next (&gsi))
 107     {
 108       gimple stmt = gsi_stmt (gsi);
 109
 110       if (gimple_has_volatile_ops (stmt)
 111           || gimple_vuse (stmt))
 112         return false;
 113     }
 114
 115   return true;
 116 }
 117
 118 /* Verify if all PHI node arguments in DEST for edges from BB1 or
 119    BB2 to DEST are the same.  This makes the CFG merge point
 120    free from side-effects.  Return true in this case, else false.  */
 121
 122 static bool
 123 same_phi_args_p (basic_block bb1, basic_block bb2, basic_block dest)
 124 {
 125   edge e1 = find_edge (bb1, dest);
 126   edge e2 = find_edge (bb2, dest);
 127   gimple_stmt_iterator gsi;
 128   gimple phi;
 129
 130   for (gsi = gsi_start_phis (dest); !gsi_end_p (gsi); gsi_next (&gsi))
 131     {
 132       phi = gsi_stmt (gsi);
 133       if (!operand_equal_p (PHI_ARG_DEF_FROM_EDGE (phi, e1),
 134                             PHI_ARG_DEF_FROM_EDGE (phi, e2), 0))
 135         return false;
 136     }
 137
 138   return true;
 139 }
 140
 141 /* Return the best representative SSA name for CANDIDATE which is used
 142    in a bit test.  */
 143
 144 static tree
 145 get_name_for_bit_test (tree candidate)
 146 {
 147   /* Skip single-use names in favor of using the name from a
 148      non-widening conversion definition.  */
 149   if (TREE_CODE (candidate) == SSA_NAME
 150       && has_single_use (candidate))
 151     {
 152       gimple def_stmt = SSA_NAME_DEF_STMT (candidate);
 153       if (is_gimple_assign (def_stmt)
 154           && CONVERT_EXPR_CODE_P (gimple_assign_rhs_code (def_stmt)))
 155         {
 156           if (TYPE_PRECISION (TREE_TYPE (candidate))
 157               <= TYPE_PRECISION (TREE_TYPE (gimple_assign_rhs1 (def_stmt))))
 158             return gimple_assign_rhs1 (def_stmt);
 159         }
 160     }
 161
 162   return candidate;
 163 }
 164
 165 /* Recognize a single bit test pattern in GIMPLE_COND and its defining
 166    statements.  Store the name being tested in *NAME and the bit
 167    in *BIT.  The GIMPLE_COND computes *NAME & (1 << *BIT).
 168    Returns true if the pattern matched, false otherwise.  */
 169
 170 static bool
 171 recognize_single_bit_test (gimple cond, tree *name, tree *bit)
 172 {
 173   gimple stmt;
 174
 175   /* Get at the definition of the result of the bit test.  */
 176   if (gimple_cond_code (cond) != NE_EXPR
 177       || TREE_CODE (gimple_cond_lhs (cond)) != SSA_NAME
 178       || !integer_zerop (gimple_cond_rhs (cond)))
 179     return false;
 180   stmt = SSA_NAME_DEF_STMT (gimple_cond_lhs (cond));
 181   if (!is_gimple_assign (stmt))
 182     return false;
 183
 184   /* Look at which bit is tested.  One form to recognize is
 185      D.1985_5 = state_3(D) >> control1_4(D);
 186      D.1986_6 = (int) D.1985_5;
 187      D.1987_7 = op0 & 1;
 188      if (D.1987_7 != 0)  */
 189   if (gimple_assign_rhs_code (stmt) == BIT_AND_EXPR
 190       && integer_onep (gimple_assign_rhs2 (stmt))
 191       && TREE_CODE (gimple_assign_rhs1 (stmt)) == SSA_NAME)
 192     {
 193       tree orig_name = gimple_assign_rhs1 (stmt);
 194
 195       /* Look through copies and conversions to eventually
 196          find the stmt that computes the shift.  */
 197       stmt = SSA_NAME_DEF_STMT (orig_name);
 198
 199       while (is_gimple_assign (stmt)
 200              && ((CONVERT_EXPR_CODE_P (gimple_assign_rhs_code (stmt))
 201                   && (TYPE_PRECISION (TREE_TYPE (gimple_assign_lhs (stmt)))
 202                       <= TYPE_PRECISION (TREE_TYPE (gimple_assign_rhs1 (stmt)))))
 203                  || gimple_assign_ssa_name_copy_p (stmt)))
 204         stmt = SSA_NAME_DEF_STMT (gimple_assign_rhs1 (stmt));
 205
 206       /* If we found such, decompose it.  */
 207       if (is_gimple_assign (stmt)
 208           && gimple_assign_rhs_code (stmt) == RSHIFT_EXPR)
 209         {
 210           /* op0 & (1 << op1) */
 211           *bit = gimple_assign_rhs2 (stmt);
 212           *name = gimple_assign_rhs1 (stmt);
 213         }
 214       else
 215         {
 216           /* t & 1 */
 217           *bit = integer_zero_node;
 218           *name = get_name_for_bit_test (orig_name);
 219         }
 220
 221       return true;
 222     }
 223
 224   /* Another form is
 225      D.1987_7 = op0 & (1 << CST)
 226      if (D.1987_7 != 0)  */
 227   if (gimple_assign_rhs_code (stmt) == BIT_AND_EXPR
 228       && TREE_CODE (gimple_assign_rhs1 (stmt)) == SSA_NAME
 229       && integer_pow2p (gimple_assign_rhs2 (stmt)))
 230     {
 231       *name = gimple_assign_rhs1 (stmt);
 232       *bit = build_int_cst (integer_type_node,
 233                             tree_log2 (gimple_assign_rhs2 (stmt)));
 234       return true;
 235     }
 236
 237   /* Another form is
 238      D.1986_6 = 1 << control1_4(D)
 239      D.1987_7 = op0 & D.1986_6
 240      if (D.1987_7 != 0)  */
 241   if (gimple_assign_rhs_code (stmt) == BIT_AND_EXPR
 242       && TREE_CODE (gimple_assign_rhs1 (stmt)) == SSA_NAME
 243       && TREE_CODE (gimple_assign_rhs2 (stmt)) == SSA_NAME)
 244     {
 245       gimple tmp;
 246
 247       /* Both arguments of the BIT_AND_EXPR can be the single-bit
 248          specifying expression.  */
 249       tmp = SSA_NAME_DEF_STMT (gimple_assign_rhs1 (stmt));
 250       if (is_gimple_assign (tmp)
 251           && gimple_assign_rhs_code (tmp) == LSHIFT_EXPR
 252           && integer_onep (gimple_assign_rhs1 (tmp)))
 253         {
 254           *name = gimple_assign_rhs2 (stmt);
 255           *bit = gimple_assign_rhs2 (tmp);
 256           return true;
 257         }
 258
 259       tmp = SSA_NAME_DEF_STMT (gimple_assign_rhs2 (stmt));
 260       if (is_gimple_assign (tmp)
 261           && gimple_assign_rhs_code (tmp) == LSHIFT_EXPR
 262           && integer_onep (gimple_assign_rhs1 (tmp)))
 263         {
 264           *name = gimple_assign_rhs1 (stmt);
 265           *bit = gimple_assign_rhs2 (tmp);
 266           return true;
 267         }
 268     }
 269
 270   return false;
 271 }
 272
 273 /* Recognize a bit test pattern in a GIMPLE_COND and its defining
 274    statements.  Store the name being tested in *NAME and the bits
 275    in *BITS.  The COND_EXPR computes *NAME & *BITS.
 276    Returns true if the pattern matched, false otherwise.  */
 277
 278 static bool
 279 recognize_bits_test (gimple cond, tree *name, tree *bits)
 280 {
 281   gimple stmt;
 282
 283   /* Get at the definition of the result of the bit test.  */
 284   if (gimple_cond_code (cond) != NE_EXPR
 285       || TREE_CODE (gimple_cond_lhs (cond)) != SSA_NAME
 286       || !integer_zerop (gimple_cond_rhs (cond)))
 287     return false;
 288   stmt = SSA_NAME_DEF_STMT (gimple_cond_lhs (cond));
 289   if (!is_gimple_assign (stmt)
 290       || gimple_assign_rhs_code (stmt) != BIT_AND_EXPR)
 291     return false;
 292
 293   *name = get_name_for_bit_test (gimple_assign_rhs1 (stmt));
 294   *bits = gimple_assign_rhs2 (stmt);
 295
 296   return true;
 297 }
 298
 299 /* If-convert on a and pattern with a common else block.  The inner
 300    if is specified by its INNER_COND_BB, the outer by OUTER_COND_BB.
 301    Returns true if the edges to the common else basic-block were merged.  */
 302
 303 static bool
 304 ifcombine_ifandif (basic_block inner_cond_bb, basic_block outer_cond_bb)
 305 {
 306   gimple_stmt_iterator gsi;
 307   gimple inner_cond, outer_cond;
 308   tree name1, name2, bit1, bit2;
 309
 310   inner_cond = last_stmt (inner_cond_bb);
 311   if (!inner_cond
 312       || gimple_code (inner_cond) != GIMPLE_COND)
 313     return false;
 314
 315   outer_cond = last_stmt (outer_cond_bb);
 316   if (!outer_cond
 317       || gimple_code (outer_cond) != GIMPLE_COND)
 318     return false;
 319
 320   /* See if we test a single bit of the same name in both tests.  In
 321      that case remove the outer test, merging both else edges,
 322      and change the inner one to test for
 323      name & (bit1 | bit2) == (bit1 | bit2).  */
 324   if (recognize_single_bit_test (inner_cond, &name1, &bit1)
 325       && recognize_single_bit_test (outer_cond, &name2, &bit2)
 326       && name1 == name2)
 327     {
 328       tree t, t2;
 329
 330       /* Do it.  */
 331       gsi = gsi_for_stmt (inner_cond);
 332       t = fold_build2 (LSHIFT_EXPR, TREE_TYPE (name1),
 333                        build_int_cst (TREE_TYPE (name1), 1), bit1);
 334       t2 = fold_build2 (LSHIFT_EXPR, TREE_TYPE (name1),
 335                         build_int_cst (TREE_TYPE (name1), 1), bit2);
 336       t = fold_build2 (BIT_IOR_EXPR, TREE_TYPE (name1), t, t2);
 337       t = force_gimple_operand_gsi (&gsi, t, true, NULL_TREE,
 338                                     true, GSI_SAME_STMT);
 339       t2 = fold_build2 (BIT_AND_EXPR, TREE_TYPE (name1), name1, t);
 340       t2 = force_gimple_operand_gsi (&gsi, t2, true, NULL_TREE,
 341                                      true, GSI_SAME_STMT);
 342       t = fold_build2 (EQ_EXPR, boolean_type_node, t2, t);
 343       gimple_cond_set_condition_from_tree (inner_cond, t);
 344       update_stmt (inner_cond);
 345
 346       /* Leave CFG optimization to cfg_cleanup.  */
 347       gimple_cond_set_condition_from_tree (outer_cond, boolean_true_node);
 348       update_stmt (outer_cond);
 349
 350       if (dump_file)
 351         {
 352           fprintf (dump_file, "optimizing double bit test to ");
 353           print_generic_expr (dump_file, name1, 0);
 354           fprintf (dump_file, " & T == T\nwith temporary T = (1 << ");
 355           print_generic_expr (dump_file, bit1, 0);
 356           fprintf (dump_file, ") | (1 << ");
 357           print_generic_expr (dump_file, bit2, 0);
 358           fprintf (dump_file, ")\n");
 359         }
 360
 361       return true;
 362     }
 363
 364   /* See if we have two comparisons that we can merge into one.  */
 365   else if (TREE_CODE_CLASS (gimple_cond_code (inner_cond)) == tcc_comparison
 366            && TREE_CODE_CLASS (gimple_cond_code (outer_cond)) == tcc_comparison
 367            && operand_equal_p (gimple_cond_lhs (inner_cond),
 368                                gimple_cond_lhs (outer_cond), 0)
 369            && operand_equal_p (gimple_cond_rhs (inner_cond),
 370                                gimple_cond_rhs (outer_cond), 0))
 371     {
 372       enum tree_code code1 = gimple_cond_code (inner_cond);
 373       enum tree_code code2 = gimple_cond_code (outer_cond);
 374       tree t;
 375
 376       if (!(t = combine_comparisons (UNKNOWN_LOCATION,
 377                                      TRUTH_ANDIF_EXPR, code1, code2,
 378                                      boolean_type_node,
 379                                      gimple_cond_lhs (outer_cond),
 380                                      gimple_cond_rhs (outer_cond))))
 381         return false;
 382       t = canonicalize_cond_expr_cond (t);
 383       if (!t)
 384         return false;
 385       gimple_cond_set_condition_from_tree (inner_cond, t);
 386       update_stmt (inner_cond);
 387
 388       /* Leave CFG optimization to cfg_cleanup.  */
 389       gimple_cond_set_condition_from_tree (outer_cond, boolean_true_node);
 390       update_stmt (outer_cond);
 391
 392       if (dump_file)
 393         {
 394           fprintf (dump_file, "optimizing two comparisons to ");
 395           print_generic_expr (dump_file, t, 0);
 396           fprintf (dump_file, "\n");
 397         }
 398
 399       return true;
 400     }
 401
 402   return false;
 403 }
 404
 405 /* If-convert on a or pattern with a common then block.  The inner
 406    if is specified by its INNER_COND_BB, the outer by OUTER_COND_BB.
 407    Returns true, if the edges leading to the common then basic-block
 408    were merged.  */
 409
 410 static bool
 411 ifcombine_iforif (basic_block inner_cond_bb, basic_block outer_cond_bb)
 412 {
 413   gimple inner_cond, outer_cond;
 414   tree name1, name2, bits1, bits2;
 415
 416   inner_cond = last_stmt (inner_cond_bb);
 417   if (!inner_cond
 418       || gimple_code (inner_cond) != GIMPLE_COND)
 419     return false;
 420
 421   outer_cond = last_stmt (outer_cond_bb);
 422   if (!outer_cond
 423       || gimple_code (outer_cond) != GIMPLE_COND)
 424     return false;
 425
 426   /* See if we have two bit tests of the same name in both tests.
 427      In that case remove the outer test and change the inner one to
 428      test for name & (bits1 | bits2) != 0.  */
 429   if (recognize_bits_test (inner_cond, &name1, &bits1)
 430       && recognize_bits_test (outer_cond, &name2, &bits2))
 431     {
 432       gimple_stmt_iterator gsi;
 433       tree t;
 434
 435       /* Find the common name which is bit-tested.  */
 436       if (name1 == name2)
 437         ;
 438       else if (bits1 == bits2)
 439         {
 440           t = name2;
 441           name2 = bits2;
 442           bits2 = t;
 443           t = name1;
 444           name1 = bits1;
 445           bits1 = t;
 446         }
 447       else if (name1 == bits2)
 448         {
 449           t = name2;
 450           name2 = bits2;
 451           bits2 = t;
 452         }
 453       else if (bits1 == name2)
 454         {
 455           t = name1;
 456           name1 = bits1;
 457           bits1 = t;
 458         }
 459       else
 460         return false;
 461
 462       /* As we strip non-widening conversions in finding a common
 463          name that is tested make sure to end up with an integral
 464          type for building the bit operations.  */
 465       if (TYPE_PRECISION (TREE_TYPE (bits1))
 466           >= TYPE_PRECISION (TREE_TYPE (bits2)))
 467         {
 468           bits1 = fold_convert (unsigned_type_for (TREE_TYPE (bits1)), bits1);
 469           name1 = fold_convert (TREE_TYPE (bits1), name1);
 470           bits2 = fold_convert (unsigned_type_for (TREE_TYPE (bits2)), bits2);
 471           bits2 = fold_convert (TREE_TYPE (bits1), bits2);
 472         }
 473       else
 474         {
 475           bits2 = fold_convert (unsigned_type_for (TREE_TYPE (bits2)), bits2);
 476           name1 = fold_convert (TREE_TYPE (bits2), name1);
 477           bits1 = fold_convert (unsigned_type_for (TREE_TYPE (bits1)), bits1);
 478           bits1 = fold_convert (TREE_TYPE (bits2), bits1);
 479         }
 480
 481       /* Do it.  */
 482       gsi = gsi_for_stmt (inner_cond);
 483       t = fold_build2 (BIT_IOR_EXPR, TREE_TYPE (name1), bits1, bits2);
 484       t = force_gimple_operand_gsi (&gsi, t, true, NULL_TREE,
 485                                     true, GSI_SAME_STMT);
 486       t = fold_build2 (BIT_AND_EXPR, TREE_TYPE (name1), name1, t);
 487       t = force_gimple_operand_gsi (&gsi, t, true, NULL_TREE,
 488                                     true, GSI_SAME_STMT);
 489       t = fold_build2 (NE_EXPR, boolean_type_node, t,
 490                        build_int_cst (TREE_TYPE (t), 0));
 491       gimple_cond_set_condition_from_tree (inner_cond, t);
 492       update_stmt (inner_cond);
 493
 494       /* Leave CFG optimization to cfg_cleanup.  */
 495       gimple_cond_set_condition_from_tree (outer_cond, boolean_false_node);
 496       update_stmt (outer_cond);
 497
 498       if (dump_file)
 499         {
 500           fprintf (dump_file, "optimizing bits or bits test to ");
 501           print_generic_expr (dump_file, name1, 0);
 502           fprintf (dump_file, " & T != 0\nwith temporary T = ");
 503           print_generic_expr (dump_file, bits1, 0);
 504           fprintf (dump_file, " | ");
 505           print_generic_expr (dump_file, bits2, 0);
 506           fprintf (dump_file, "\n");
 507         }
 508
 509       return true;
 510     }
 511
 512   /* See if we have two comparisons that we can merge into one.
 513      This happens for C++ operator overloading where for example
 514      GE_EXPR is implemented as GT_EXPR || EQ_EXPR.  */
 515   else if (TREE_CODE_CLASS (gimple_cond_code (inner_cond)) == tcc_comparison
 516            && TREE_CODE_CLASS (gimple_cond_code (outer_cond)) == tcc_comparison
 517            && operand_equal_p (gimple_cond_lhs (inner_cond),
 518                                gimple_cond_lhs (outer_cond), 0)
 519            && operand_equal_p (gimple_cond_rhs (inner_cond),
 520                                gimple_cond_rhs (outer_cond), 0))
 521     {
 522       enum tree_code code1 = gimple_cond_code (inner_cond);
 523       enum tree_code code2 = gimple_cond_code (outer_cond);
 524       tree t;
 525
 526       if (!(t = combine_comparisons (UNKNOWN_LOCATION,
 527                                      TRUTH_ORIF_EXPR, code1, code2,
 528                                      boolean_type_node,
 529                                      gimple_cond_lhs (outer_cond),
 530                                      gimple_cond_rhs (outer_cond))))
 531         return false;
 532       t = canonicalize_cond_expr_cond (t);
 533       if (!t)
 534         return false;
 535       gimple_cond_set_condition_from_tree (inner_cond, t);
 536       update_stmt (inner_cond);
 537
 538       /* Leave CFG optimization to cfg_cleanup.  */
 539       gimple_cond_set_condition_from_tree (outer_cond, boolean_false_node);
 540       update_stmt (outer_cond);
 541
 542       if (dump_file)
 543         {
 544           fprintf (dump_file, "optimizing two comparisons to ");
 545           print_generic_expr (dump_file, t, 0);
 546           fprintf (dump_file, "\n");
 547         }
 548
 549       return true;
 550     }
 551
 552   return false;
 553 }
 554
 555 /* Recognize a CFG pattern and dispatch to the appropriate
 556    if-conversion helper.  We start with BB as the innermost
 557    worker basic-block.  Returns true if a transformation was done.  */
 558
 559 static bool
 560 tree_ssa_ifcombine_bb (basic_block inner_cond_bb)
 561 {
 562   basic_block then_bb = NULL, else_bb = NULL;
 563
 564   if (!recognize_if_then_else (inner_cond_bb, &then_bb, &else_bb))
 565     return false;
 566
 567   /* Recognize && and || of two conditions with a common
 568      then/else block which entry edges we can merge.  That is:
 569        if (a || b)
 570          ;
 571      and
 572        if (a && b)
 573          ;
 574      This requires a single predecessor of the inner cond_bb.  */
 575   if (single_pred_p (inner_cond_bb))
 576     {
 577       basic_block outer_cond_bb = single_pred (inner_cond_bb);
 578
 579       /* The && form is characterized by a common else_bb with
 580          the two edges leading to it mergable.  The latter is
 581          guaranteed by matching PHI arguments in the else_bb and
 582          the inner cond_bb having no side-effects.  */
 583       if (recognize_if_then_else (outer_cond_bb, &inner_cond_bb, &else_bb)
 584           && same_phi_args_p (outer_cond_bb, inner_cond_bb, else_bb)
 585           && bb_no_side_effects_p (inner_cond_bb))
 586         {
 587           /* We have
 588                <outer_cond_bb>
 589                  if (q) goto inner_cond_bb; else goto else_bb;
 590                <inner_cond_bb>
 591                  if (p) goto ...; else goto else_bb;
 592                  ...
 593                <else_bb>
 594                  ...
 595            */
 596           return ifcombine_ifandif (inner_cond_bb, outer_cond_bb);
 597         }
 598
 599       /* The || form is characterized by a common then_bb with the
 600          two edges leading to it mergable.  The latter is guaranteed
 601          by matching PHI arguments in the then_bb and the inner cond_bb
 602          having no side-effects.  */
 603       if (recognize_if_then_else (outer_cond_bb, &then_bb, &inner_cond_bb)
 604           && same_phi_args_p (outer_cond_bb, inner_cond_bb, then_bb)
 605           && bb_no_side_effects_p (inner_cond_bb))
 606         {
 607           /* We have
 608                <outer_cond_bb>
 609                  if (q) goto then_bb; else goto inner_cond_bb;
 610                <inner_cond_bb>
 611                  if (q) goto then_bb; else goto ...;
 612                <then_bb>
 613                  ...
 614            */
 615           return ifcombine_iforif (inner_cond_bb, outer_cond_bb);
 616         }
 617     }
 618
 619   return false;
 620 }
 621
 622 /* Main entry for the tree if-conversion pass.  */
 623
 624 static unsigned int
 625 tree_ssa_ifcombine (void)
 626 {
 627   basic_block *bbs;
 628   bool cfg_changed = false;
 629   int i;
 630
 631   bbs = blocks_in_phiopt_order ();
 632
 633   for (i = 0; i < n_basic_blocks - NUM_FIXED_BLOCKS; ++i)
 634     {
 635       basic_block bb = bbs[i];
 636       gimple stmt = last_stmt (bb);
 637
 638       if (stmt
 639           && gimple_code (stmt) == GIMPLE_COND)
 640         cfg_changed |= tree_ssa_ifcombine_bb (bb);
 641     }
 642
 643   free (bbs);
 644
 645   return cfg_changed ? TODO_cleanup_cfg : 0;
 646 }
 647
 648 static bool
 649 gate_ifcombine (void)
 650 {
 651   return 1;
 652 }
 653
 654 struct gimple_opt_pass pass_tree_ifcombine =
 655 {
 656  {
 657   GIMPLE_PASS,
 658   "ifcombine",                  /* name */
 659   gate_ifcombine,               /* gate */
 660   tree_ssa_ifcombine,           /* execute */
 661   NULL,                         /* sub */
 662   NULL,                         /* next */
 663   0,                            /* static_pass_number */
 664   TV_TREE_IFCOMBINE,            /* tv_id */
 665   PROP_cfg | PROP_ssa,          /* properties_required */
 666   0,                            /* properties_provided */
 667   0,                            /* properties_destroyed */
 668   0,                            /* todo_flags_start */
 669   TODO_dump_func
 670   | TODO_ggc_collect
 671   | TODO_update_ssa
 672   | TODO_verify_ssa             /* todo_flags_finish */
 673  }
 674 };