https://gcc.gnu.org/bugzilla/show_bug.cgi?id=69395
Bug ID: 69395
Summary: ICE on declaring array with more than 7
dimensions+codimensions
Product: gcc
Version: 6.0
Status: UNCONFIRMED
Severity: normal
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gerhard.steinmetz.fort...@t-online.de
Target Milestone: ---
These variants with sum of dimensions and codimensions
greater than 7 (actual limit) :
$ cat z1.f90
program p
real, dimension(2,2,2,2), codimension[2,2,2,*] :: z4a
real, dimension(2,2,2,2) :: z4b[2,2,2,*]
real, codimension[2,2,2,*] :: z4c(2,2,2,2)
real :: z4x
dimension :: z4x(2,2,2,2)
codimension :: z4x[2,2,2,*]
end
$ cat z3.f90
program p
real, dimension(2), codimension[2,2,2,2,2,2,*] :: z1a
real, dimension(2,2), codimension[2,2,2,2,2,*] :: z2a
real, dimension(2,2,2), codimension[2,2,2,2,*] :: z3a
real, dimension(2,2,2,2), codimension[2,2,2,*] :: z4a
real, dimension(2,2,2,2,2), codimension[2,2,*] :: z5a
real, dimension(2,2,2,2,2,2), codimension[2,*] :: z6a
real, dimension(2,2,2,2,2,2,2), codimension[*] :: z7a
!...
end
yield (with 5.3.1 and 6.0.0) :
$ gfortran -fcoarray=single z1.f90
f951: internal compiler error: free_expr0(): Bad expr type
