The following program gives an ICE w/ 4.3.0 and 4.4.0.

ff.f90:9: internal compiler error: Segmentation fault

==29131== Invalid read of size 4
==29131==    at 0x4C0459: gfc_is_nodesc_array (trans-types.c:1031)
==29131==    by 0x4C2DE5: gfc_sym_type (trans-types.c:1576)
==29131==    by 0x4C2FD7: gfc_get_function_type (trans-types.c:2009)
==29131==    by 0x4C3023: gfc_get_function_type (trans-types.c:2005)

program test
  implicit none
  interface
    subroutine one(a)
      integer a(:)
    end subroutine one
  end interface
contains
  subroutine foo(f)
    procedure(one) :: f
  end subroutine foo
end program test


-- 
           Summary: ICE with PROCEDURE(<interface>)
           Product: gcc
           Version: 4.4.0
            Status: UNCONFIRMED
          Keywords: ice-on-valid-code
          Severity: normal
          Priority: P3
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: burnus at gcc dot gnu dot org


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

Reply via email to