A recent trunk regression between good: r214776 and bad r214808, suspect r214795 > gfortran -c -fipa-pta -O1 bug.f90 bug.f90:23:0: END SUBROUTINE dbcsr_mp_make_env ^ internal compiler error: in get_constraint_for_component_ref, at tree-ssa-structalias.c:3189 0xc537eb get_constraint_for_component_ref ../../gcc/gcc/tree-ssa-structalias.c:3189 0xc537eb get_constraint_for_1 ../../gcc/gcc/tree-ssa-structalias.c:3454 0xc547f2 get_constraint_for_address_of ../../gcc/gcc/tree-ssa-structalias.c:3325 0xc5330f get_constraint_for_1 ../../gcc/gcc/tree-ssa-structalias.c:3393 0xc547f2 get_constraint_for_address_of ../../gcc/gcc/tree-ssa-structalias.c:3325 0xc59d09 find_func_clobbers ../../gcc/gcc/tree-ssa-structalias.c:5042 0xc59d09 ipa_pta_execute ../../gcc/gcc/tree-ssa-structalias.c:7180 > cat bug.f90 MODULE dbcsr_dist_operations TYPE dbcsr_mp_obj END TYPE dbcsr_mp_obj INTERFACE SUBROUTINE dbcsr_mp_new(mp_env, pgrid, mp_group, mynode, numnodes, myprow,& mypcol) IMPORT TYPE(dbcsr_mp_obj), INTENT(OUT) :: mp_env INTEGER, DIMENSION(0:, 0:), INTENT(IN) :: pgrid END SUBROUTINE dbcsr_mp_new END INTERFACE CONTAINS SUBROUTINE dbcsr_mp_make_env (mp_env, mp_group, & nprocs, pgrid_dims, error) TYPE(dbcsr_mp_obj), INTENT(OUT) :: mp_env OPTIONAL :: pgrid_dims INTEGER :: error_handle, group, mynode, & numnodes, pcol, prow INTEGER, ALLOCATABLE, DIMENSION(:, :) :: pgrid INTEGER, DIMENSION(2) :: coord, myploc, npdims CALL dbcsr_mp_new (mp_env, pgrid, group, mynode, numnodes,& myprow=myploc(1), mypcol=myploc(2)) END SUBROUTINE dbcsr_mp_make_env END MODULE dbcsr_dist_operations
Fixed.
Author: rguenth Date: Tue Sep 2 08:22:33 2014 New Revision: 214810 URL: https://gcc.gnu.org/viewcvs?rev=214810&root=gcc&view=rev Log: 2014-09-02 Richard Biener <rguenther@suse.de> PR tree-optimization/62695 * tree-ssa-structalias.c (find_func_clobbers): Add missing vector truncate. * gfortran.dg/pr62695.f90: New testcase. Added: trunk/gcc/testsuite/gfortran.dg/pr62695.f90 Modified: trunk/gcc/ChangeLog trunk/gcc/testsuite/ChangeLog trunk/gcc/tree-ssa-structalias.c