diff options
author | Kugan Vivekanandarajah <kuganv@linaro.org> | 2016-09-26 18:16:23 +0000 |
---|---|---|
committer | Kugan Vivekanandarajah <kugan@gcc.gnu.org> | 2016-09-26 18:16:23 +0000 |
commit | 8be59d19f27684eed54b611dcf68f590553d8386 (patch) | |
tree | 239d66ba0e9fad4ca04f30bc7739cc5780580f21 /gcc | |
parent | e73cf9a208d8ef5482f3f3ca7bc78bd38d633595 (diff) | |
download | gcc-8be59d19f27684eed54b611dcf68f590553d8386.zip gcc-8be59d19f27684eed54b611dcf68f590553d8386.tar.gz gcc-8be59d19f27684eed54b611dcf68f590553d8386.tar.bz2 |
re PR tree-optimization/77719 (ICE in pp_string, at pretty-print.c:955)
Fix PR77719
gcc/testsuite/ChangeLog:
2016-09-26 Kugan Vivekanandarajah <kuganv@linaro.org>
PR middle-end/77719
* gfortran.dg/pr77719.f90: New test.
gcc/ChangeLog:
2016-09-26 Kugan Vivekanandarajah <kuganv@linaro.org>
PR middle-end/77719
* tree-ssa-reassoc.c (make_new_ssa_for_def): Use gimple_get_lhs to get lhs
instead of gimple_assign_lhs as stmt can be builtins too.
From-SVN: r240505
Diffstat (limited to 'gcc')
-rw-r--r-- | gcc/ChangeLog | 6 | ||||
-rw-r--r-- | gcc/testsuite/ChangeLog | 5 | ||||
-rw-r--r-- | gcc/testsuite/gfortran.dg/pr77719.f90 | 26 | ||||
-rw-r--r-- | gcc/tree-ssa-reassoc.c | 2 |
4 files changed, 38 insertions, 1 deletions
diff --git a/gcc/ChangeLog b/gcc/ChangeLog index a1c1620..0d529de 100644 --- a/gcc/ChangeLog +++ b/gcc/ChangeLog @@ -1,3 +1,9 @@ +2016-09-26 Kugan Vivekanandarajah <kuganv@linaro.org> + + PR middle-end/77719 + * tree-ssa-reassoc.c (make_new_ssa_for_def): Use gimple_get_lhs to get lhs + instead of gimple_assign_lhs as stmt can be builtins too. + 2016-09-26 Thomas Preud'homme <thomas.preudhomme@arm.com> * tree.h (memmodel_from_int, memmodel_base, is_mm_relaxed, diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index e2b54b9..b9b0996 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,3 +1,8 @@ +2016-09-26 Kugan Vivekanandarajah <kuganv@linaro.org> + + PR middle-end/77719 + * gfortran.dg/pr77719.f90: New test. + 2016-09-26 Thomas Preud'homme <thomas.preudhomme@arm.com> * gcc.dg/tree-ssa/builtin-sprintf-warn-1.c: Adjust regex to accept diff --git a/gcc/testsuite/gfortran.dg/pr77719.f90 b/gcc/testsuite/gfortran.dg/pr77719.f90 new file mode 100644 index 0000000..974d70a --- /dev/null +++ b/gcc/testsuite/gfortran.dg/pr77719.f90 @@ -0,0 +1,26 @@ +! PR middle-end/77719 +! { dg-do compile } +! { dg-options "-O3 -ffast-math" } + +SUBROUTINE urep_egr(erep,derep,surr) + INTEGER, PARAMETER :: dp=8 + REAL(dp), INTENT(inout) :: erep, derep(3) + REAL(dp), INTENT(in) :: surr(2) + REAL(dp) :: de_z, rz + INTEGER :: isp,spdim,jsp,nsp + IF (n_urpoly > 0) THEN + IF (r < spxr(1,1)) THEN + ispg: DO isp = 1,spdim ! condition ca) + IF (isp /= spdim) THEN + nsp = 5 ! condition cb + DO jsp = 0,nsp + IF( jsp <= 3 ) THEN + ELSE + erep = erep + surr(jsp-3)*rz**(jsp) + ENDIF + END DO + END IF + END DO ispg + END IF + END IF +END SUBROUTINE urep_egr diff --git a/gcc/tree-ssa-reassoc.c b/gcc/tree-ssa-reassoc.c index 8fc76e4..d94ff70 100644 --- a/gcc/tree-ssa-reassoc.c +++ b/gcc/tree-ssa-reassoc.c @@ -1158,7 +1158,7 @@ make_new_ssa_for_def (gimple *stmt) use_operand_p use; imm_use_iterator iter; tree new_lhs; - tree lhs = gimple_assign_lhs (stmt); + tree lhs = gimple_get_lhs (stmt); new_lhs = make_ssa_name (TREE_TYPE (lhs)); gimple_set_lhs (stmt, new_lhs); |