https://gcc.gnu.org/bugzilla/show_bug.cgi?id=61819
--- Comment #18 from Hossein Talebi <talebi.hossein at gmail dot com> ---
I am now trying this bug and the Bug 68415 with the new GCC from trunc and it
is fine. Nevertheless, this other code does not compile.
(gcc version 6.0.0 20151129 (experimental))
Module part_base2_class
implicit none
type :: ty_moc1
integer l
end type ty_moc1
integer,parameter :: MAX_NUM_ELEMENT_TYPE=32
type :: ty_element_index2
class(ty_moc1),allocatable :: element
class(ty_moc1),allocatable :: element_th(:)
endtype ty_element_index2
type :: ty_part_base2
type(ty_element_index2)::element_index(MAX_NUM_ELEMENT_TYPE)
end type ty_part_base2
class(ty_part_base2),allocatable :: part_tmp_obj
End Module part_base2_class
