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:
parent
e73cf9a208
commit
8be59d19f2
|
@ -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,
|
||||
|
|
|
@ -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
|
||||
|
|
|
@ -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
|
|
@ -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);
|
||||
|
|
Loading…
Reference in New Issue