[Bug fortran/56649] New: ICE gfc_conv_structure with MERGE

[burnus at gcc dot gnu.org]

http://gcc.gnu.org/bugzilla/show_bug.cgi?id=56649

             Bug #: 56649
           Summary: ICE gfc_conv_structure with MERGE
    Classification: Unclassified
           Product: gcc
           Version: 4.8.0
            Status: UNCONFIRMED
          Keywords: ice-on-valid-code
          Severity: normal
          Priority: P3
         Component: fortran
        AssignedTo: unassigned@gcc.gnu.org
        ReportedBy: burnus@gcc.gnu.org
                CC: pault@gcc.gnu.org


The following program, based on MPICH, fails with:

f951: internal compiler error: in gfc_conv_structure, at
fortran/trans-expr.c:6111


module m
  use iso_fortran_env, only: int32
  implicit none

  type MPI_Datatype
    integer :: i
  end type MPI_Datatype

  integer,private,parameter :: dik = kind(0)
  type(MPI_Datatype),parameter,private :: MPIx_I4 = MPI_Datatype( 1275069467)
  type(MPI_Datatype),parameter,private :: MPIx_I8 = MPI_Datatype( 1275070491)
  type(MPI_Datatype),parameter :: MPI_INTEGER = merge(MPIx_I4, MPIx_I8, &
                                                      dik==int32)
end module m