------- Comment #2 from jv244 at cam dot ac dot uk 2009-11-26 17:04 -------
the following is a testcase for the ICE (derived from CP2K bug crashes in the
same place):
> cat bug.f90
MODULE powell
INTEGER, PARAMETER :: dp=8
CONTAINS
SUBROUTINE newuob (n,npt,x,rhobeg,rhoend,maxfun,xbase,&
xopt,xnew,xpt,fval,gq,hq,pq,bmat,zmat,ndim,d,vlag,w,opt)
REAL(dp), DIMENSION(npt, *), &
INTENT(inout) :: xpt
REAL(dp), DIMENSION(*), INTENT(inout) :: fval, gq, hq, pq
120 IF (dsq <= 1.0e-3_dp*xoptsq) THEN
DO k=1,npt
DO i=1,n
gq(i)=gq(i)+temp*xpt(k,i)
END DO
END DO
END IF
END SUBROUTINE newuob
END MODULE powell
gfortran -fgraphite -O1 bug.f90
bug.f90: In function __powell_MOD_newuob:
bug.f90:4:0: internal compiler error: in scan_tree_for_params, at
graphite-sese-to-poly.c:853
Please submit a full bug report,
with preprocessed source if appropriate.
See <http://gcc.gnu.org/bugs.html> for instructions.
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=42181
