https://gcc.gnu.org/bugzilla/show_bug.cgi?id=66577
Bug ID: 66577
Summary: ICE with gfortran-5.1.0 in
generate_finalization_wrapper
Product: gcc
Version: 5.1.0
Status: UNCONFIRMED
Severity: normal
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: Daniel.Kokron at nasa dot gov
Target Milestone: ---
gfortran --version
GNU Fortran (GCC) 5.1.0
Copyright (C) 2015 Free Software Foundation, Inc.
gcc-5.1.0 was build using gmp-6.0.0, mpfr-3.1.2 and mpc-1.0.3
932> cat Minimal.f03
module SingleLinkedListClass
implicit none
private
integer, parameter :: intG_IK = SELECTED_INT_KIND (8)
type SingleLinkItem
integer (kind=4), public :: intTag
logical (kind=4), public :: blnIsPointer
class (*), pointer :: udtData => NULL ()
type (SingleLinkItem), pointer :: udtNext => NULL()
contains
final :: Destroy
end type SingleLinkItem
type SingleLinkedList
private
type (SingleLinkItem), pointer :: udtFirstLink => NULL ()
integer (intG_IK) , public :: intItemCount = 0
contains
procedure, public, pass(this) :: GoToStart
end type SingleLinkedList
contains
function GoToStart (this) result (intSuccess)
implicit none
class (SingleLinkedList), intent (inout) :: this
integer (intG_IK) :: intSuccess = -1
end function GoToStart
subroutine Destroy (this)
implicit none
type(SingleLinkItem), intent(inout) :: this
integer(kind=4) :: intStat
DEALLOCATE (this%udtData, STAT=intStat)
this%intTag = 0
end subroutine Destroy
end module SingleLinkedListClass
935> gfortran -fPIC -cpp -Wall -Wextra -ffree-form -O2 -m64 -I. -c Minimal.f03
f951: internal compiler error: in generate_finalization_wrapper, at
fortran/class.c:1567
0x61ebab generate_finalization_wrapper
../.././gcc/fortran/class.c:1566
0x61ebab gfc_find_derived_vtab(gfc_symbol*)
../.././gcc/fortran/class.c:2401
0x69fcb5 resolve_fl_derived
../.././gcc/fortran/resolve.c:12950
0x69a747 resolve_symbol
../.././gcc/fortran/resolve.c:13230
0x6b2f5b do_traverse_symtree
../.././gcc/fortran/symbol.c:3641
0x69d882 resolve_types
../.././gcc/fortran/resolve.c:14977
0x6994b0 gfc_resolve(gfc_namespace*)
../.././gcc/fortran/resolve.c:15081
0x684df6 gfc_parse_file()
../.././gcc/fortran/parse.c:5477
0x6c43f5 gfc_be_parse_file
../.././gcc/fortran/f95-lang.c:228
