diff options
author | Roger Sayle <roger@eyesopen.com> | 2007-02-16 03:38:22 +0000 |
---|---|---|
committer | Roger Sayle <sayle@gcc.gnu.org> | 2007-02-16 03:38:22 +0000 |
commit | 939409afced0a24eb36b7bda1d98244f8a18e65d (patch) | |
tree | ab46b6fc569996fc94b0894059374459f6e9ad7f /gcc/testsuite | |
parent | 3c32c87f609a47e126044ce2d3f29701fa2c4dcc (diff) | |
download | gcc-939409afced0a24eb36b7bda1d98244f8a18e65d.zip gcc-939409afced0a24eb36b7bda1d98244f8a18e65d.tar.gz gcc-939409afced0a24eb36b7bda1d98244f8a18e65d.tar.bz2 |
re PR middle-end/30391 (ICE at -O1 with conditional expressions and GIMPLE_MODIFY_STMT)
PR middle-end/30391
* tree.c (expr_align): Handle MODIFY_EXPR. GIMPLE_MODIFY_STMT
should be unreachable.
(build2_stat): Allow construction of MODIFY_EXPR at any time.
For the time being redirect GIMPLE_MODIFY_STMT to the new
(renamed) build_gimple_modify_stmt_stat.
(build2_gimple_stat): Rename to...
(build_gimple_modify_stmt_stat): Now longer take a CODE argument.
Always build a GIMPLE_MODIFY_STMT node.
* tree.h (build2_gimple, build2_gimple_stat): Delete.
(build_gimple_modify_stmt, build_gimple_modify_stmt_stat): New
declarations.
* tree-cfg.c (factor_computed_gotos, tree_merge_blocks,
gimplify_val): Use build_gimple_modify_stmt instead of build2_gimple.
* tree-complex.c (set_component_ssa_name, expand_complex_move,
expand_complex_div_wide): Likewise.
* tree-ssa-dom.c (record_equivalences_from_stmt): Likewise.
* tree-ssa-loop-im.c (schedule_sm): Likewise.
* tree-ssa-loop-ivopts.c (rewrite_use_nonlinear_expr): Likewise.
* tree-ssa-loop-manip.c (create_iv): Likewise.
* tree-ssa-phiopt.c (conditional_replacement, minmax_replacement,
abs_replacement): Likewise.
* tree-ssa-pre.c (create_expression_by_pieces, poolify_modify_stmt,
realify_fake_stores): Likewise.
* builtins.c (std_expand_builtin_va_start): Build a MODIFY_EXPR
node rather than a GIMPLE_MODIFY_STMT node.
(std_gimpify_va_arg_expr, expand_builtin_va_copy,
fold_builtin_memset, fold_builtin_memory_op, do_mpfr_sincos):
Likewise.
(integer_valued_real_p): Handle MODIFY_EXPR, not GIMPLE_MODIFY_STMT.
* expr.c (expand_expr_real_1): Handle both MODIFY_EXPR and
GIMPLE_MODIFY_STMT.
* gfortran.dg/pr30391-1.f90: New test case.
From-SVN: r122030
Diffstat (limited to 'gcc/testsuite')
-rw-r--r-- | gcc/testsuite/ChangeLog | 5 | ||||
-rw-r--r-- | gcc/testsuite/gfortran.dg/pr30391-1.f90 | 10 |
2 files changed, 15 insertions, 0 deletions
diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index e05d167..5651917 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,3 +1,8 @@ +2007-02-15 Roger Sayle <roger@eyesopen.com> + + PR middle-end/30391 + * gfortran.dg/pr30391-1.f90: New test case. + 2007-02-15 Andrew Pinski <andrew_pinski@playstation.sony.com> PR middle-end/30433 diff --git a/gcc/testsuite/gfortran.dg/pr30391-1.f90 b/gcc/testsuite/gfortran.dg/pr30391-1.f90 new file mode 100644 index 0000000..28ca754 --- /dev/null +++ b/gcc/testsuite/gfortran.dg/pr30391-1.f90 @@ -0,0 +1,10 @@ +! { dg-do compile } +! { dg-options "-O1" } +SUBROUTINE check_for_overlap (cell_length) + REAL, DIMENSION(1:3), INTENT(IN), OPTIONAL :: cell_length + REAL, DIMENSION(1:3) :: abc, box_length + + IF (PRESENT(cell_length)) THEN + box_length(1:3)=abc(1:3) + ENDIF +END SUBROUTINE check_for_overlap |