https://gcc.gnu.org/bugzilla/show_bug.cgi?id=66679

            Bug ID: 66679
           Summary: ICE with class(*) and transfer
           Product: gcc
           Version: 5.1.1
            Status: UNCONFIRMED
          Severity: minor
          Priority: P3
         Component: fortran
          Assignee: unassigned at gcc dot gnu.org
          Reporter: polajnar.miha at gmail dot com
  Target Milestone: ---

The following program produces an ICE

program main
  implicit none
  class(*), allocatable :: vec(:)
  integer :: var
  allocate(vec(2),mold=var)
  print*, size(transfer(vec,[var]))
  print*, size(transfer(vec(1),[var]))
end program main

$ gfortran bug.f90 
bug.f90:7:0:

   print*, size(transfer(vec(1),[var]))
 1
internal compiler error: Segmentation fault
Please submit a full bug report,
with preprocessed source if appropriate.
See <http://bugs.opensuse.org/> for instructions.

with $ gfortran -v
gcc version 5.1.1 20150518 [gcc-5-branch revision 223286] (SUSE Linux)

Reply via email to