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
This commit is contained in:
Kugan Vivekanandarajah 2016-09-26 18:16:23 +00:00 committed by Kugan Vivekanandarajah
parent e73cf9a208
commit 8be59d19f2
4 changed files with 38 additions and 1 deletions

View File

@ -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,

View File

@ -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

View File

@ -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

View File

@ -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);