[Bug fortran/34558] New: Regression 4.3: ICE with same TYPE in both program and interface

["burnus at gcc dot gnu dot org" <gcc-bugzilla@gcc.gnu.org>]

The following program uses an excessive amount of memory, which causes the
segmentation fault. valgrind shows:

==27188== Process terminating with default action of signal 11 (SIGSEGV):
dumping core
==27188==  Access not within mapped region at address 0x7FE001700
==27188==    at 0x427539: gfc_compare_derived_types (interface.c:365)
==27188== Invalid write of size 8
==27188==    at 0x4A1E348: _vgnU_freeres (in
/usr/lib64/valgrind/amd64-linux/vgpreload_core.so)
==27188==  Address 0x7fe001f70 is on thread 1's stack
==27188== Stack overflow in thread 1: can't grow stack to 0x7FE001F70

! Regression. ICE on valid code.
! The following works with 4.1.3 and 4.2.2, but fails
! (segmentation fault) with 4.3.0.
!
! Found using the Fortran Company Fortran 90 Test Suite (Lite),
! Version 1.4
program error
  implicit none
  type node
    sequence
    type(node), pointer :: next
  end type
  type(node), pointer :: list

  interface
    subroutine insert(ptr)
      implicit none
      type node
        sequence
        type(node), pointer :: next
      end type
      type(node), pointer :: ptr
    end subroutine insert
  end interface
  allocate (list);
end program error


-- 
           Summary: Regression 4.3: ICE with same TYPE in both program and
                    interface
           Product: gcc
           Version: 4.3.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
OtherBugsDependingO 32834
             nThis:


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