The following code ICEs: MODULE m IMPLICIT NONE
TYPE t PROCEDURE(myproc), POINTER, PASS :: myproc END TYPE t CONTAINS INTEGER FUNCTION myproc (me) CLASS(t), INTENT(IN) :: me myproc = 42 END FUNCTION myproc END MODULE m PROGRAM main USE m IMPLICIT NONE TYPE(t) :: arr(2) arr%myproc => myproc END PROGRAM main Removing the line at the bottom assigning myproc to arr%myproc makes it compile. The relevant error is: [/tmp]# gfortran-dev reduced.f90 reduced.f90: In function 'MAIN__': reduced.f90:17:0: internal compiler error: in gfc_conv_expr_descriptor, at fortran/trans-array.c:5019 Please submit a full bug report, with preprocessed source if appropriate. See <http://gcc.gnu.org/bugs.html> for instructions. -- Summary: ICE in gfc_conv_expr_descriptor for array PPC assignment Product: gcc Version: unknown Status: UNCONFIRMED Severity: normal Priority: P3 Component: fortran AssignedTo: unassigned at gcc dot gnu dot org ReportedBy: domob at gcc dot gnu dot org http://gcc.gnu.org/bugzilla/show_bug.cgi?id=41978