------- Comment #3 from tkoenig at gcc dot gnu dot org 2007-05-27 09:04 ------- The problem seems to extend to pretty much all array intrinsics:
$ gfortran cshift.f90 cshift.f90: In function 'MAIN__': cshift.f90:3: internal compiler error: Segmentation fault Please submit a full bug report, with preprocessed source if appropriate. See <URL:http://gcc.gnu.org/bugs.html> for instructions. $ cat eoshift.f90 CHARACTER(LEN=3), DIMENSION(10) :: Z CHARACTER(LEN=10) :: res Z(:)="123" write(*,'(10A1)') EOSHIFT(Z(:)(2:2),2) END $ gfortran eoshift.f90 eoshift.f90: In function 'MAIN__': eoshift.f90:3: internal compiler error: Segmentation fault Please submit a full bug report, with preprocessed source if appropriate. See <URL:http://gcc.gnu.org/bugs.html> for instructions. $ cat spread.f90 CHARACTER(LEN=3), DIMENSION(10) :: Z CHARACTER(LEN=10) :: res Z(:)="123" write(*,'(10A1)') SPREAD(Z(:)(2:2),dim=1,ncopies=2) END $ gfortran spread.f90 spread.f90: In function 'MAIN__': spread.f90:3: internal compiler error: Segmentation fault Please submit a full bug report, with preprocessed source if appropriate. See <URL:http://gcc.gnu.org/bugs.html> for instructions. $ cat transpose.f90 CHARACTER(LEN=3), DIMENSION(10,10) :: Z CHARACTER(LEN=10) :: res Z(:,:)="123" write(*,'(10A1)') TRANSPOSE(Z(:,:)(2:2)) END $ gfortran transpose.f90 transpose.f90: In function 'MAIN__': transpose.f90:3: internal compiler error: Segmentation fault Please submit a full bug report, with preprocessed source if appropriate. See <URL:http://gcc.gnu.org/bugs.html> for instructions. -- tkoenig at gcc dot gnu dot org changed: What |Removed |Added ---------------------------------------------------------------------------- CC| |pault at gcc dot gnu dot org http://gcc.gnu.org/bugzilla/show_bug.cgi?id=31258
